在Excel中创建工作表的列表对象

Question

我想在vba中运行一个for循环，其中包含工作簿的某些工作表，而不是全部。因此，为此，我不知道如何创建列表对象。我可以使用以下代码在工作簿中的所有工作表之间循环，但我不知道如何选择某些特定工作表。

For Each ws In Worksheets

Answer 1

在创建数组的地方这样的事情怎么样？ Excel VBA可以使用的数据结构数量有限。阵列是最适合您需求的阵列。您声明数组，然后遍历它。下面是一个简单的示例，可以解决您的问题。

Sub SelectSheet()

Dim SheetList(1 To 3) As String

SheetList(1) = "Sheet1"
SheetList(2) = "Sheet3"
SheetList(3) = "Sheet6"


For i = 1 To 3
    Sheets(SheetList(i)).Select
    Range("C3").FormulaR1C1 = "Here"

Next i

End Sub