使用宏时的错误问题

打开EXCEL文件 提示启用宏 启用后提示 [运行时错误“75”，路径/ 文件访问错误] 调试时指出问题程序：
SetAttr ThisWorkbook.Path & "\grxi.xls", vbNormal

本人对程序不通 请高手指点！！！

Option Explicit

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Dim w As Workbook
For Each w In Workbooks
If w.Name <> ThisWorkbook.Name Then
w.Close savechanges:=True
End If
Next w
Set w = Nothing

End Sub

Private Sub Workbook_Open()
Application.Visible = False
SetAttr ThisWorkbook.Path & "\grxi.xls", vbNormal
SetAttr ThisWorkbook.Path & "\sj.xls", vbNormal
Workbooks.Open ThisWorkbook.Path & "\grxi.xls", , , , 32351, 32351
Workbooks.Open ThisWorkbook.Path & "\sj.xls", , , , 32351, 32351
Set yiyaoworkbook = Workbooks("grxi.xls")

ThisWorkbook.Activate

SetAttr ThisWorkbook.Path & "\grxi.xls", vbNormal
高深的我也不懂，不过这句提示出错
ThisWorkbook.Path & "\grxi.xls"意思就是本工作簿目录下的grxi.xls文件，你没有这个文件

使用网上银行支付错误的问题! 急!!!!!!!!!!!!!!! 使用紫光时的错误 使用MAYA时出现的错误 MFC使用switch时的错误 关于在错误的用户里使用电脑的问题 关于PQ使用过程断电分区错误的问题 VB使用select语句查询出现错误的问题 帮我解决“HTTP错误500.100 内部服务器错误 ASP错误 文件已在使用中”的问题。 outlook的使用中的错误 Netterm使用中的问题！“winmgmt 错误日志”