訪問宏所屬的工作表

Question

我想訪問宏所屬的工作表。要做到這一點，我使用這段代碼片段。 有沒有另一種方式來做到這一點，而不使用這個文件的名稱？

Workbooks("file.xlsm").Activate 
Dim sheet As Worksheet 
Set sheet = ActiveWorkbook.Sheets(1) 

sheet.Cells(1,1).Value = "message" 

在此先感謝。

Answer 1

有可能訪問宏所在的工作簿。在這種情況下使用：

ThisWorkbook 

，你必須：

Workbooks("file.xlsm")