VBA code to ComboBox (ActiveX Control)

Hi All,

Please someone help me to put a drop down list to an combo box in which I need to assign a separate macro for each selected item in the drop down to gather data from different sheet.

this is the code which i used but when i select an item from the list the list keep getting accumulated and getting longer one by one.

Private Sub ComboBox1_Change()

With Sheet1.ComboBox1
.AddItem "Paris"
.AddItem "New York"
.AddItem "London"
End With

End Sub


Thanks!