将工作簿存储在集合或数组中

Question

我最近发布了一个关于如何“分组”几个打开的工作簿（不是所有工作簿）的问题。提到了几种技术，我认为所有这些我都可以发挥作用，但一种技术似乎对我来说很突出，因为这正是我所需要的。创建集合并将工作簿放入集合中。然后我可以根据需要在整个程序中引用这个集合。所以...我开始阅读/了解收藏。但是，有几篇文章将集合与数组进行了比较。这让我第二次猜测自己应该使用哪一个。我无法理解数组是否甚至可以存储“对象”？例如，一个数组可以存储几个“对象”吗？即：存储几个“工作簿”？

Answer 1

要将工作簿存储在一个数组中，我们可以创建一个工作簿数组：

Sub kjkj()

    Dim wkbks(1 To 4) As Workbook

    Set wkbks(1) = workbooks.Open(....)
    Set wkbks(2) = workbooks.Open(....)
    Set wkbks(3) = workbooks.Open(....)
    Set wkbks(4) = workbooks.Open(....)

    Dim i As Long
    For i = 1 To 4
        With wkbks(i)
            'do something
        End With
    Next i


End Sub