hmmmm so I place the combo box down, double click it and do I just add the above like this:
Code:Private Sub Combo1_Change(Index As Integer) With Combo1 .AddItem "Keyword 1" .AddItem "Keyword 2" .AddItem "Keyword 3" .AddItem "Keyword 4" .AddItem "Keyword 5" End With End Sub




Reply With Quote