如何通過將值傳遞到VBA中的變量來打開工作表

Question

我正在嘗試通過從一個單元格獲取值並連接期望的文件名來打開工作表，但它顯示錯誤：對象變量或未設置塊變量，我正在使用以下代碼：其中“ 123.xlsx”是工作簿的名稱我要打開。

Dim output_path As Workbook
dim xlwkbrpt1  as workbook
output_path = Application.ActiveWorkbook.ActiveSheet.Range("F14").Value
Set xlwkbrpt1 = xlApp.Workbooks.Open(output_path & "\" & "123.xlsx")

Answer 1

您聲明變量output_path類型錯誤。 嘗試這個：

Dim output_path As String
Dim xlwkbrpt1  As Workbook
output_path = Application.ActiveWorkbook.ActiveSheet.Range("F14").Value
Set xlwkbrpt1 = Workbooks.Open(output_path & "\" & "123.xls")