Hi
Not sure what do you want.
To get the selected value, try
Code:Private Sub ComboBox1_Change() Dim lngIndex As Long With Me.ComboBox1 lngIndex = .ListIndex If Not lngIndex = -1 Then MsgBox .List(lngIndex) End If End With End Sub
Hi
Not sure what do you want.
To get the selected value, try
Code:Private Sub ComboBox1_Change() Dim lngIndex As Long With Me.ComboBox1 lngIndex = .ListIndex If Not lngIndex = -1 Then MsgBox .List(lngIndex) End If End With End Sub
Cheers !
Excel Range to BBCode Table
Use Social Networking Tools If You Like the Answers !
Message to Cross Posters
@ Home - Office 2010/2013/2016 on Win 10 (64 bit); @ Work - Office 2016 on Win 10 (64 bit)
Bookmarks