Vba 如何将组合框中的项目设置为另一个项目

我正在用工作集中的一些数据填充VBA组合框。由于它是根据用户的选择填充的，因此有时不应填充某些级别，因为它们没有数据。当发生这种情况时，我想用另一个组合框的相同项填充组合框的项。a怎么能做到这一点

---

我想如果有人教我如何循环组合框中的项目，我将能够做我想做的事情。

下面是如何循环组合框

Dim intComboItem As Integer

For intComboItem = 0 To Me.ComboBox1.ListCount - 1
    MsgBox Me.ComboBox1.List(intComboItem)
Next

---

把你目前掌握的代码贴出来。