drop down menu in form 1

[vttech]

How do you create a drop down menu in a VBA form

example a menu with the following options

Black
Red
Green

Just to be clear this is for a form not the usual way
Goto menu Data>Validation, set Allow to List, and enter the values as comma
delimited list

 

[PHV]

One way:
Private Sub UserForm_Initialize()
ComboBox1.AddItem "Black"
ComboBox1.AddItem "Red"
ComboBox1.AddItem "Green"
End Sub

Another way is to set the RowSource property to an excel range containing the values list.

Hope This Helps, PH.
Want to get great answers to your Tek-Tips questions? Have a look at FAQ219-2884 or FAQ181-2886

 

[SkipVought]

Hi,

How do you create a drop down menu in a VBA form
...
Just to be clear this is for a form not the usual way
Goto menu Data>Validation

These are two contradictory statements.

It sounds to me like Data/Validation and not a VBA UserForm.

You can create a list quite simply on the same sheet in 3 cells, lets say in AA1:AA3
[tt]
Black
Red
Green
[tt]
Then in Data/Validation - List enter in the textbox...
[tt]
=AA1:AA3
[/tt]

Skip,

_{[red]Be Advised![/red] For those this winter, caught in Arctic-like calamity, be consoled...
Many are cold, but few are frozen!}