Excel窗体 删除复合框的某个项目

我们可以使用RemoveItem方法，将复合框的某个项目删除。

但是如果复合框被数据绑定，即通过RowSource属性给复合框设置了数据源时，该方法不能从复合框删除一行，只能通过重新设置复合框的数据源。

这种删除，仅仅是在使用窗体时，复合框项目列表里面不再出现被删除的项目，并不是真正的从源代码中删除了。再次启动窗体的时候，仍会加载全部项目。

下面的案例通过单击窗体上的命令按钮，来删除复合框指定的项目。

' 在窗体初始化事件中，给复合框添加元素 Private Sub UserForm_Initialize() With Me.ComboBox1 .AddItem "财务" .AddItem "HR" .AddItem "信息科" .AddItem "后勤" .AddItem "法务" .AddItem "制造" End With End Sub Private Sub CommandButton1_Click() If vbOK = MsgBox("确定要删除复合框内的第3个值吗？", vbOKCancel) Then With Me.ComboBox1 .RemoveItem 2 ' 删除第3个元素 End With End If End Sub

当从复合框列表删除了某个值后，复合框各个值会重新排序。例如，删除第3个值后，原来的第4个值就会变成第3个值，原来的第5个值就会变成第4个值，以此类推。