Excel VBA Sheets(Array()).Select 下标超出范围
Excel VBA Sheets(Array()).Select Subscript out of range
ExcelVBA.
中的这一小段代码有点问题
我想要做的就是 select 工作簿中的多张纸并将它们导出为一个 PDF。
我有很多 Sheet 不想隐藏或四处移动,所以在我的代码的前面我循环并将特定名称保存在一个数组中。我遇到了这个错误,所以我想我会简单地对他们的名字进行硬编码,看看它是否有效。
但即使使用硬编码名称,我也得到 'Subscript out of range error',所以一定是其他地方出了问题。
wb.Sheets(Array("Sheet 1", "Sheet 2", "Sheet 3", "Sheet 4", "Sheet 5")).Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _ ............
是否存在与上述声明相关的已知错误? (我只包括前两行,因为它不会执行超过第一行)
或者有什么建议可以阻止此错误的发生吗?
注意:我更改了 Sheet 名称,因为它们与敏感数据有关。然而,一个例子是 "S&C vendor1"
务必正确拼写工作表名称:
Sub dural()
Set wb = ActiveWorkbook
wb.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
End Sub
默认工作表名称中没有space。
感谢大家的帮助。结果是我不小心把它放在了一个循环中,一定是选择了多次,然后 运行 out of 运行ge。
谢谢大家的帮助。
ExcelVBA.
中的这一小段代码有点问题我想要做的就是 select 工作簿中的多张纸并将它们导出为一个 PDF。 我有很多 Sheet 不想隐藏或四处移动,所以在我的代码的前面我循环并将特定名称保存在一个数组中。我遇到了这个错误,所以我想我会简单地对他们的名字进行硬编码,看看它是否有效。
但即使使用硬编码名称,我也得到 'Subscript out of range error',所以一定是其他地方出了问题。
wb.Sheets(Array("Sheet 1", "Sheet 2", "Sheet 3", "Sheet 4", "Sheet 5")).Select
Selection.ExportAsFixedFormat Type:=xlTypePDF, _ ............
是否存在与上述声明相关的已知错误? (我只包括前两行,因为它不会执行超过第一行) 或者有什么建议可以阻止此错误的发生吗?
注意:我更改了 Sheet 名称,因为它们与敏感数据有关。然而,一个例子是 "S&C vendor1"
务必正确拼写工作表名称:
Sub dural()
Set wb = ActiveWorkbook
wb.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
End Sub
默认工作表名称中没有space。
感谢大家的帮助。结果是我不小心把它放在了一个循环中,一定是选择了多次,然后 运行 out of 运行ge。
谢谢大家的帮助。