0

我在 Excel 文档中的用户窗体中使用组合框时遇到困难。组合框要么不出现在用户窗体中，要么组合框保持空白，当我在其中输入任何字符时，项目列表会出现 2 或 3 次，而不仅仅是一次。当我选择一个项目时，所选项目不会出现在框中。似乎 Excel ^ 随机选择一个，无论我从列表中选择哪个项目，最终显示在框中的项目总是相同的。

谁能帮我解决这个问题？非常感谢！！！

这是我使用的代码：

Private Sub ComboBox1_Change()
    Select Case ComboBox1.Text
        Case "Een nieuwe start"
        Case "Alles heeft zijn tijd"
        Case "De wereld aan je voeten"
        Case "Een levend boek"
        Case "Drempels"
        Case "Kerstmis"
        Case "Confituur of choco"
        Case "Hoe groot is de hemel?"
        Case "Ongelovige Thomas"
        Case "Feesten"
        Case "Er is er één jarig!"
        Case "Eén van hart"
        Case "Ervoor gaan"
        Case "Groen gras"
        Case "RELatie"
        Case "Vele plaatjes"
        Case "Iedereen fan"
        Case "Schattenjacht"
        Case "Lichtbakens"
        Case "Rijke Luis"
        Case "Hemel op aarde"
        Case "Op bezoek"

        Case Else
    End Select
End Sub

Private Sub UserForm1_Initialize()
        ComboBox1.Clear
        ComboBox1.AddItem "Een nieuwe start"
        ComboBox1.AddItem "Alles heeft zijn tijd"
        ComboBox1.AddItem "De wereld aan je voeten"
        ComboBox1.AddItem "Een levend boek"
        ComboBox1.AddItem "Drempels"
        ComboBox1.AddItem "Kerstmis"
        ComboBox1.AddItem "Confituur of choco"
        ComboBox1.AddItem "Hoe groot is de hemel?"
        ComboBox1.AddItem "Ongelovige Thomas"
        ComboBox1.AddItem "Feesten"
        ComboBox1.AddItem "Er is er één jarig!"
        ComboBox1.AddItem "Eén van hart"
        ComboBox1.AddItem "Ervoor gaan"
        ComboBox1.AddItem "Groen gras"
        ComboBox1.AddItem "RELatie"
        ComboBox1.AddItem "Vele plaatjes"
        ComboBox1.AddItem "Iedereen fan"
        ComboBox1.AddItem "Schattenjacht"
        ComboBox1.AddItem "Lichtbakens"
        ComboBox1.AddItem "Rijke Luis"
        ComboBox1.AddItem "Hemel op aarde"
        ComboBox1.AddItem "Op bezoek"
        ComboBox1.Text = ComboBox1.List(0)
End Sub
4

1 回答 1

0

你有UserForm1_Initialize它永远不会被调用，它必须是UserForm_Initialize（没有“1”）

于 2010-04-14T19:19:39.727 回答