列表框多值选择答案

【问题标题】：List Box multiple value selection列表框多值选择
【发布时间】：2013-06-13 07:31:56
【问题描述】：

我已经根据查询输出创建了表单。我使用了三个组合框和一个列表框。第一个组合框给我部门列表，第二个部门的选择给我该部门的位置（不同的），第三个给我从那个位置（不同的）项目，然后是显示该项目的一些代码的列表框。问题是我只能从该列表中选择一个代码并在 Excel 中获得输出。

如果我想一次选择两个值，我该怎么做？

如果我从列表框属性中选择 Multi Select，我可以选择多个值，但我没有得到输出。

【问题讨论】：

当您在列表框中选择一行时，您的 Excel 输出是否会触发，如果是这样，您可能需要将其移动到导出按钮等。您需要遍历列表框行并检查那些选择哪些，然后将它们写入您的 Excel 文件。

【解决方案1】：

当列表框的Multi Select 属性设置为“无”时，您可以通过简单地引用来检索选定的值

Me.List0.Value

但是，对于多选列表框控件，您需要遍历 ItemsSelected 集合以确定被选中的项目：

Dim ItemIndex As Variant
For Each ItemIndex In Me.List0.ItemsSelected
    MsgBox Me.List0.ItemData(ItemIndex)
Next

【讨论】：