To add the code remove your userform_initialise code and add the sub Additems above. Then for each combobox you have i.e. all 12 of them add a sub:
Private Sub ComboBoxx_Enter() AddItems x End Sub
Where x is the number of the box i.e. 1 to 12.
To add the code remove your userform_initialise code and add the sub Additems above. Then for each combobox you have i.e. all 12 of them add a sub:
Private Sub ComboBoxx_Enter() AddItems x End Sub
Where x is the number of the box i.e. 1 to 12.
"Computers are useless. They can only give you answers." - Pablo Picasso
Mark Rowlinson FIA | The Code Net
Posting Permissions
Reply With Quote