Use the listindex property if the combobox is filled from Sheet1!A1:A50

Private Sub ComboBox3_Click()
Dim rng as Range
set rng = Worksheets("Sheet1").Range("A1:A50")
msgbox rng(Combobox3.ListIndex + 1).Address
End Sub

"standard code" is not self defining. There is no standard code associated
with a combobox.
--
Regards,
Tom Ogilvy


"chris_za_za" wrote in message
...
I would like to know wheter anyone would be willing to help me with the
standard code for a combo box

Private Sub ComboBox3_Change()
???
End Sub

I would like to lookup values in Sheet 1, Row a1:A50