VBA：引用活動工作簿中的工作表

Question

盡管這似乎很基本，但是在嘗試在我的宏的工作簿中的某個工作表中選擇一個單元格時，我不斷收到錯誤消息。 有誰知道為什么這行不通嗎？ 我收到錯誤消息運行時錯誤'1004'。 工作表名稱為“ Sheet1”，我的代碼如下：

 Application.ActiveWorkbook.Worksheets("Sheet1").Range("N2").Select

Answer 1

不需要時使用ActiveWorkbook是一種不好的做法。 最好將工作簿和工作表設置為可以調用的實際變量。 我認為您的代碼正在激活另一個工作簿，然后嘗試在無法找到的工作表中選擇一個范圍。

Sub TryThis()

    Dim wbk As Workbook
    Dim ws As Worksheet

    Set wbk = Workbooks("myWorkbook.xlsm")
    Set ws = wbk.Worksheets("Sheet1")

    'Now when we say "ws." it is actually "Workbooks("myWorkbook.xlsm").Worksheets("Sheet1")."

    'This is okay to start with but it's better to work with the cells directly
    ws.Select
    Range("N2").Select
    Selection = "myText"

    'This is much faster and you won't have to worry about what is currently selected
    ws.Range("N2") = "myText"

End Sub