Excel 如何打开指定路径的工作簿

这里，我在第三行得到一个错误，说

下标超出范围。如何打开指定路径的工作簿？
工作簿。打开（“E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY\D8 L538-L550\U 16MY\U动力传动系统度量\U 20131002.xlsm”）

或者，以更结构化的方式

Sub openwb()  
    ChDir "E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY"
    Workbooks("D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm").Open    
End sub

您还可以通过提示打开所需的文件，这有助于从不同路径和不同文件中选择文件

Sub openwb()
    Dim sPath As String, sFile As String
    Dim wb As Workbook

    sPath = "E:\sarath\PTMetrics\20131004\D8 L538-L550 16MY\"
    sFile = sPath & "D8 L538-L550_16MY_Powertrain Metrics_20131002.xlsm"

    Set wb = Workbooks.Open(sFile)
End Sub

Sub-openwb（）
将wkbk设置为工作簿
将新文件作为变量
NewFile=Application.GetOpenFilename（“microsoft excel文件（*.xlsm*），*.xlsm*））
如果NewFile为False，则
设置wkbk=Workbooks.Open（新文件）
如果结束
端接头

Sub openwb()
Dim wkbk As Workbook
Dim NewFile As Variant

NewFile = Application.GetOpenFilename("microsoft excel files (*.xlsm*), *.xlsm*")

If NewFile <> False Then
Set wkbk = Workbooks.Open(NewFile)
End If
End Sub