"implant" ActiveX ComboBox value into if eq'n
Private Sub ComboBox1_Change()
Select Case ComboBox1.Text
Case "Item1"
MsgBox ("Item1")
Case "Item2"
MsgBox ("Item2")
Case "Item3"
MsgBox ("Item3")
Case "Item4"
MsgBox ("Item4")
Case "Item5"
MsgBox ("Item5")
End Select
End Sub
Substitute the name of the text and the code you want to execute for the
Msgbox .
"Steve" wrote:
Morning all.
Ok, I've got my combox active to where I can read the names in the list.
I'd now like to have an if equation that will pull the value I select in the
combobox.
Do I have to write a secondary macro/function for that, or can I do it
directly on the worksheet?
|