Excel VBA Sheets（Array（））。選擇下標超出范圍

Question

Excel VBA中的這一小段代碼有一點問題。

我要做的就是在工作簿中選擇多張工作表，然后將它們導出為一個PDF。 我不想隱藏或移動許多表格，因此在我的代碼的前面，我循環並將特定名稱保存在數組中。 我遇到了這個錯誤，因此我想我將僅對它們的名稱進行硬編碼，看看是否可行。

但是即使使用硬編碼的名稱，我也會收到“下標超出范圍錯誤”，因此肯定還有其他問題。

wb.Sheets(Array("Sheet 1", "Sheet 2", "Sheet 3", "Sheet 4", "Sheet 5")).Select

Selection.ExportAsFixedFormat Type:=xlTypePDF, _ ............

是否有與上述陳述有關的已知錯誤？ （我只包括了前兩行，因為它沒有執行到第一行之后），或者有什么建議可以阻止此錯誤的發生？

注意：我已經更改了工作表名稱，因為它們與敏感數據有關。 " 但是，一個示例是“ S＆C ”

Answer 1

確保正確拼寫工作表名稱：

Sub dural()
   Set wb = ActiveWorkbook
   wb.Sheets(Array("Sheet1", "Sheet2", "Sheet3")).Select
End Sub

默認工作表名稱中沒有空格。

Answer 2

感謝大家的幫助。 事實證明，我不小心將其放入循環中，並且必須進行多次選擇然后超出范圍。

無論如何，感謝您的所有幫助。