How to select item using combo-box in ms-excel?

I'm trying to populate a combobox (in excel using vba) which ad items from a range.
It's doing that.
But when I click an item from the dropdown list, it's not showing any item as it's text. (it's text is blank)
If i ad a code to display a msgbox (with anything) in the click event, it's showing the selected item in the combobox!!
The code I used are below:
---
Private Sub ComboBox1_DropButtonClick()
ComboBox1.Clear

For i = 1 To 5
ComboBox1.AddItem Worksheets("Sheet1").Range("a" & i)
Next
End Sub

Private Sub ComboBox1_Click()
'MsgBox “anything”
End Sub
----

The msgbox is not required and I can find no reason of this behavior.
can any one pls help me..
1 answer Last reply
More about select item combo excel
  1. [Hi polashd,

    This is probably way too late to help you but it may help someone else.

    I did what you did and of course got the same result. Put your routine in Initialize, not DropButtonClick.

    For a full explanation see http://www.contextures.com/Excel-VBA-ComboBox-Lists.html

    Hope this helps others.
Ask a new question

Read More

Programming Excel Apps