Question

EXCEL VBA组合框中添加新的项

我先建立了一个窗体form1，里面有一个组合框，有红，白，黄 三个选项 现在我建立了一个窗体form2，里面有一个输入框，我想通过输入框，将黑这个项，添加到form1的组合框选项中。请问高手怎么实现。

Answer 1

唉，本来不想加上过程的，看了上面的回答不得不提醒你下。
不能把代码像上面那样放到 Change事件中，因为这个事件，你输入一个字符就会触发一次，如果你输入 123 结果就是 组合框有 1，12，123.我想这不是你希望的吧？
加一个按钮，点击按钮后再赋值

Private Sub CommandButton1_Click()
UserForm1.ComboBox1.AddItem TextBox1.Text
End Sub

Answer 2

Private Sub TextBox1_KeyDown(ByVal KeyCode As MSForms.ReturnInteger, ByVal Shift As Integer)
If KeyCode = 13 Then
if textbox1.text<> ""
UserForm1.ComboBox1.AddItem TextBox1.Text
UserForm1.Show
end if

End If
End Sub

Answer 3

Private Sub TextBox1_Change()
UserForm1.ComboBox1.AddItem TextBox1.Text
UserForm2.Hide
End Sub