如何获得工作表代码名称来激活特定的工作表？

Question

我有一个工作表，其“选项卡”名称为“ Rpt_Group”。我还将其代号重命名为shData。当我使用VBA通过“ Rpt_Group”激活工作表时，它运行良好。但是，当我使用代码名称时，会收到一条错误消息

  

”下标超出范围。

这有效：WBA.Worksheets("Rpt_Group").Activate

这不起作用：WBA.Worksheets("shData").Activate

这不起作用：WBA.shData.Activate

Dim WBA As Workbook

'Open the desired workbook
Set WBA = Workbooks.Open(Filename:="path & file name")

'Activate the desired worksheet
WBA.Worksheets("Rpt_Group").Activate 'this works

这不起作用：WBA.Worksheets("shData").Activate

这不起作用：WBA.shData.Activate

Answer 1

这是一种解决方案：

capacity

可能想在尝试对返回值进行任何操作之前。