Sub test()
Dim objXL
Set objXL = CreateObject("Excel.Application")
Dim FileName As Variant
Dim UpdateLinks As Variant
Dim ReadOnly As Variant
With objXL
.Workbooks.Open(FileName:= "test.xls",UpdateLinks:=0,ReadOnly:=False)
.Visible = True
End With
Set objXL = Nothing
End Sub
這裏是我用來打開宏的Excel文件的代碼,但它與Workbooks.Open 8號線報語法錯誤( )功能。我試過但無法弄清楚我錯了什麼地方。有關Workbooks.Open()函數的更多信息可以在這裏找到:http://msdn.microsoft.com/en-us/library/office/ff194819(v=office.15).aspx如何獲得寫權限,當我使用宏來打開一個xls文件
感謝您的關注!