3

別のワークブックのワークシートを参照するための適切な構文は何ですか?次のコードは、最後の行にエラーをスローしています。ありがとう!

'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
4

1 に答える 1

7

変化する

Set mWS = Sheets("Invoices")

Set mWS = mWb.Sheets("Invoices")

mWS.Range("A1").FormulaR1C1 = "Import Date"次に、最後の行に書き込みます。

実際には、最後の行を変更して上記のように読み取ることができます。変更されてActiveWorkbookいないためですが、すべての変数を正確に修飾することをお勧めします。これにより、予期しない動作が発生しなくなります。

于 2012-10-30T19:47:25.500 に答える