It probably doesn't know where the combo box is

Private Sub Workbook_Open()
Worksheets("Sheet1").ComboBox1.List = Array("Item1", "Item2", "Item3")
End Sub

"Sören_Marodören" wrote:

Hi,

I want to fill a ComboBox with items when I open the Workbook.
But I don't want to take the items from cells in the worksheet.
So I tried these lines:

Private Sub Workbook_Open()
ComboBox1.List = Array("First", "Second", "Third", "Forth")
End Sub

But this does not work.
What is missing.

Thanks in advance,
/Sören