通過變量引用工作簿和工作表

Question

引用不同工作簿的工作表的正確語法是什么？ 以下代碼在最后一行引發錯誤。 謝謝！

'Instantiate Workbook variables
 Dim mWB As Workbook 'master workbook

'Instantiate Worksheet variables
 Dim mWS As Worksheet 'master worksheet

'Open Workbook, set variables and reference range
 Workbooks.Open ("Local 500GB HD:Users:user:Public:file.xlsx")
 Set mWB = ActiveWorkbook
 Set mWS = Sheets("Invoices")
 mWB.mWS.Range("A1").FormulaR1C1 = "Import Date" ' <---- This is the where the error is

Answer 1

更改

Set mWS = Sheets("Invoices")

至

Set mWS = mWb.Sheets("Invoices")

然后在最后一行寫下mWS.Range("A1").FormulaR1C1 = "Import Date" 。

實際上，您可以將最后一行更改為我放在上面，因為您的ActiveWorkbook沒有更改，但是，最佳做法是准確地限定所有變量，因此不會發生意外行為。