I asume that the combox is on a userform so try this:

Private Sub UserForm_Initialize()
ComboBox1.AddItem ("Open App1")
ComboBox1.AddItem ("Open App2")
ComboBox1.AddItem ("Open App3")
ComboBox1.AddItem ("Open App4")
End Sub

//Björn
"Philosophaie" skrev:

The ComboBox1 doesn't initialize the list automatically. It only puts up a
blank ComboBox . Here is the code I am using:

Private Sub Form1_Load()
ComboBox1.Items.Add ("Open App1")
ComboBox1.Items.Add ("Open App2")
ComboBox1.Items.Add ("Open App3")
ComboBox1.Items.Add ("Open App4")
End Sub