Adding items to a combo box

[Phrank]

Hello,

I've got a combo box on a form, and I'm trying to add items to it;
however, the items are not showing up - I believe I'm missing a step.
I've got the following in the code for the combo box right now:

Private Sub cbWhatToProcess_Change()
cbWhatToProcess.AddItem "Draft"
cbWhatToProcess.AddItem "Final"
cbWhatToProcess.AddItem "Other"
cbWhatToProcess.AddItem "Signature Pages"
cbWhatToProcess.AddItem "Regular PDF"
cbWhatToProcess.AddItem "Special PDF"
cbWhatToProcess.AddItem "Colored Graphs"

End Sub

I also want to be able to select multiple items from the list, so is
there anything special I need to do in order to do that? Thanks.

Frank

 

[Mark Ivey]

I am unsure of how to select more than one item from the list at a time...


But to fix your first problem... you need to encase your code into a module
the will run when the userform initializes.

Private Sub UserForm_Initialize()
cbWhatToProcess.AddItem "Draft"
cbWhatToProcess.AddItem "Final"
cbWhatToProcess.AddItem "Other"
cbWhatToProcess.AddItem "Signature Pages"
cbWhatToProcess.AddItem "Regular PDF"
cbWhatToProcess.AddItem "Special PDF"
cbWhatToProcess.AddItem "Colored Graphs"
End Sub

 

[Tom Ogilvy]

If you want multiple selections, then using a combobox would be the wrong
control. Use a listbox instead.

I would say don't use the Change event to populate the Combobox. If you
look at the events of the userform, there are the Initialize events and the
Activate event which might be a more useful place to populate the Combobox.