Excel 문서의 Userform에서 콤보 상자에 문제가 있습니다. 콤보 상자가 userform에 나타나지 않거나 콤보 상자가 비어있는 상태에서 아무 문자 나 입력하면 항목 목록이 나타나지만 단 한 번이 아니라 2 ~ 3 번 나타납니다. 항목을 선택하면 선택한 항목이 상자에 표시되지 않습니다. Excel ^이 무작위로 선택하는 것처럼 보이며 목록에서 선택한 항목이 항상 상자에 표시되는 것과 같습니다.Excel VBA Userform Combobox 문제
아무에게도 도움이 될 수 있습니까? 고마워요 !!!
이 내가 사용하는 코드입니다 :
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
는 존재하는 모든 코드가 있다는 것을입니까? 귀하의 정확한 코드를 내 자신의 userform 모듈에 복사했고, 문제없이 실행했습니다. –
안녕하세요, 문제가 이미 해결되었습니다. 감사! Marc – Marc