24、VBA中集合对象的使用与列表框操作

VBA中集合对象的使用与列表框操作

在VBA编程中，我们常常会遇到需要处理多个对象的情况，比如在Excel的用户窗体（UserForm）中处理列表框（ListBox）的选中项。本文将详细介绍如何使用VBA的集合对象（Collection）来存储和管理列表框的选中项，以及如何展示和操作这些选中项的属性。

1. 处理列表框选中项

在VBA的用户窗体列表框中，并没有像Microsoft Access列表框那样的 ItemsSelected 属性来指示哪些项被选中。因此，我们需要使用循环来遍历所有列表框项，检查其 Selected 属性是否为 True ，然后执行相应的操作。示例代码如下：

For intI = 0 to Me.lstNames.ListCount - 1
    If Me.lstNames(intI).Selected = True Then
        ‘ Do something here!
    End If
Next

2. 使用集合对象存储选中项

为了方便处理多个列表框选中项，我们可以使用VBA的集合对象（Collection）来存储这些选中项。集合对象可以用来分组和管理相关对象，它提供了 Add 和 Remove 方法来管理项， Count 属性来指示当前包含的项数，以及 Item 属性来快速恢复集合内的任何数据。

<