Combo Box Standard code
 

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

Combo Box Standard code
 

Right click on your combo-box

- select controlpanel - input range is A1:A50 - cell link = B1 -
drop down lines eg 6


Private Sub ComboBox3_Change()

Dim choise As Long
choise= Sheet(input).Range("B1")

If choise = 25 then
...
End if

End Su

--
Zur
-----------------------------------------------------------------------
Zurn's Profile: http://www.excelforum.com/member.php...fo&userid=1464
View this thread: http://www.excelforum.com/showthread.php?threadid=26811

Combo Box Standard code
 

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