Macro to run when item is selected from listbox

Hi, kosherboy,

I just had the ListFillRange on the sheet, added a listbox from the ActiveX controls, limited it to single select, assigned the ListFilRange, ended the "developer mode", put the code behind the sheet:

Private Sub ListBox1_Change()
myMacro ListBox1.ListIndex + 1
End Sub

Sub myMacro(lngNumber As Long)
MsgBox "Called from Listbox entry: " & lngNumber
End Sub

Ciao,
Holger