| Part | Description | |
| object | Required. A valid object. | |
Private Sub CommandButton1_Click()
ComboBox1.DropDown
End Sub
Private Sub UserForm_Initialize()
ComboBox1.AddItem "Turkey"
ComboBox1.AddItem "Chicken"
ComboBox1.AddItem "Duck"
ComboBox1.AddItem "Goose"
ComboBox1.AddItem "Grouse"
End Sub