我们会通过组合框下拉来筛选需要的数据。有的时候我们需要的条件是多个的，也是随机组合的。那么我们就不可能把所有组合都列举出来。

第一步我们需要先选择筛选条件。如何组合框多选条件？即每下拉一次选择条件后，再下拉选择更多的条件。

效果如下图：

1.下拉组合框，选择Word

2.再一次选择Excel

3.自动添加“、”，添加多个筛选条件

详细代码：

通过以下代码（插入组合框的更新后事件中），可以实现用组合框重复多选，也可以手工修改录入内容：Private Sub Combo0_AfterUpdate()Dim i As Integer, strList As String    With Combo0        For i = 1 To .ListCount            strList = IIf(Nz(strList) = "", "", strList & ";") & .ItemData(i)        Next        If Nz(.Text) <> "" Then            If InStr(1, .Tag, .Text) = 0 And InStr(1, strList, .Text) > 0 Then                .Value = IIf(Nz(.Tag) = "", "", .Tag & "、") & .Text            End If            .Tag = .Text        Else            .Tag = ""        End If    End WithEnd Sub