Excel 工作表中传输的VBA运行时错误“9”（下标超出范围）

这是我的第一篇文章，我是VBA编程新手。我有一个很大的excel文件，试图创建一个宏来删除多个选项卡。我的代码如下所示，它在提示我是否要永久删除时起作用：

Option Explicit

Sub delSheet()

Worksheets("sheet2").Delete

End Sub

但是，当我从另一个文件传入一个选项卡名为sheet92'时，我使用相同的代码得到了这个错误

Option Explicit

Sub delSheet()

Worksheets("sheet92").Delete

End Sub

---

是什么原因导致代码删除sheet2，它是我在打开.xlsb文件并创建新工作表时创建的选项卡，而不是从现有文件复制到文件时的错误消息？提前感谢您的帮助。

您的问题不是很清楚，但您可能需要参考正确的工作簿，如下所示：

Workbooks("file.xlsx").Worksheets("sheet92").Delete

---

如果工作簿尚未激活，仅提供工作表Sheets92将不起作用。

您的问题不是很清楚，但您可能必须参考正确的工作簿，如下所示：

Workbooks("file.xlsx").Worksheets("sheet92").Delete

---

如果工作簿尚未激活，仅提供工作表Sheets92将不起作用。

我解决了第一个编程错误！我使用了错误的名称，我使用了字段名与选项卡的实际名称，我在这里截屏！！一旦我使用了姓名表1，我就可以删除了。谢谢你的帮助@cub

我解决了我的第一个程序错误！我使用了错误的名称，我使用了字段名与选项卡的实际名称，我在这里截屏！！一旦我使用了姓名表1，我就可以删除了。感谢您的帮助@cub

我更改了代码以引用工作簿。工作簿名称为WW奥运会组委会6月17日通过2次测试手册，我输入的新代码为Workbooks WW奥运会组委会6月17日通过2次测试手册。xlsm.worksheetsSheets92.Delete。但是，我现在得到了错误消息，编译错误子函数或未定义的函数。此外，当我输入文本时，在输入工作簿代码后，我会获得自动填充选项，例如切换活动工作表或工作表，但在输入工作表链接后，VBA不会给我任何选项来自动选择代码字符串中的下一项。@JSBach对我有效。你忘了带s什么的吗？我也没有自动选择工作表之后，但这不是一个问题。如果用Activate替换Delete是否有效？@JSBach作为参考，说明了类工作表的所有方法。请注意，该类是“工作表”，但要选择一个特定的类，请使用s编写Worksheetsname。当我从worksheetssheet92.Select或WorksheetsSheetsSheet92.Copy中更改代码中的方法时，将描述引用活动工作簿的Worksheets集合，而所有打开的工作簿的Workbooks集合将被描述。我仍然收到相同的运行时错误9。但是，我可以使用Workbooks WW OCOGS Jun 17 Pass 2.xlsm.Close激活工作簿，文件会提示我是否要关闭。我也可以使用“工作表.添加”，它会添加一张新的工作表。我再次不确定为什么此文件不允许我删除图纸。感谢您的持续帮助，我希望我们能一起解决这个问题。我更改了代码以引用工作簿。工作簿名称为WW奥运会组委会6月17日通过2次测试手册，我输入的新代码为Workbooks WW奥运会组委会6月17日通过2次测试手册。xlsm.worksheetsSheets92.Delete。但是，我现在得到了错误消息，编译错误子函数或未定义的函数。此外，当我输入文本时，在输入工作簿代码后，我会获得自动填充选项，例如切换活动工作表或工作表，但在输入工作表链接后，VBA不会给我任何选项来自动选择代码字符串中的下一项。@JSBach对我有效。你忘了带s什么的吗？我也没有自动选择工作表之后，但这不是一个问题。如果用Activate替换Delete是否有效？@JSBach作为参考，说明了类工作表的所有方法。请注意，该类是“工作表”，但要选择一个特定的类，请使用s编写Worksheetsname。当我从worksheetssheet92.Select或WorksheetsSheetsSheet92.Copy中更改代码中的方法时，将描述引用活动工作簿的Worksheets集合，而所有打开的工作簿的Workbooks集合将被描述。我仍然收到相同的运行时错误9。但是，我可以使用Workbooks WW OCOGS Jun 17 Pass 2.xlsm.Close激活工作簿，文件会提示我是否要关闭。我也可以使用“工作表.添加”，它会添加一张新的工作表。我再次不确定为什么此文件不允许我删除图纸。谢谢你的持续帮助，我希望我们能一起解决这个问题。