运行时错误9-下标超出范围

Question

我正在使用以下代码返回工作簿的第一页。

Sub OpenMenu()
   ' Keyboard Shortcut: Ctrl+m

   ActiveWorkbook.Worksheets("Macros").Activate
   ActiveWorkbook.Worksheets("Macros").Cells(1, 1).Select
End Sub

Answer 1

而不是按名称调用，因为您想要第一个，所以可以按其索引进行调用：

Sub OpenMenu()
   ' Keyboard Shortcut: Ctrl+m

   ActiveWorkbook.Worksheets(1).Activate
   ActiveWorkbook.Worksheets(1).Cells(1, 1).Select
End Sub