Ed Merry
Ed Merry

Reputation: 3

Why is my VBA ComboBox blank until I type

I created a simple UserForm ComboBox with a list of items:

Private Sub CourseComboBox_Change()
CourseComboBox.List = Sheets("Course Lists").Range("G2:G15").Value
End Sub

When I run the UserForm the drop down list appears empty until I type something. At this point the full list displays for me to choose from. Is there something I'm doing wrong that makes the text in my ComboBox not show up until I type?

I tried adding CourseComboBox.ListIndex = 0 (a previous solution on here), which had no effect.

Upvotes: 0

Views: 1110

Answers (1)

Joseph
Joseph

Reputation: 5160

I think the issue is that you're loading the contents of the Combobox when the combobox changes (i.e. the Combobox' Change event) where you should be loading the combobox on the UserForm_Initialize() event handler instead.

Try moving this line:

CourseComboBox.List = Sheets("Course Lists").Range("G2:G15").Value

To here:

Private Sub UserForm_Initialize()
    CourseComboBox.List = Sheets("Course Lists").Range("G2:G15").Value
End Sub

And delete the other CourseComboBox_Change() event code.

Upvotes: 2

Related Questions