Combobox in Useform not populating

[mmrfs]

Hello all,

I am trying to create a very simple useform, but my combobox is not populating.

1- I opened a new UseForm
2- I inserted a new ComboBox
3- Double click in the Combobox
4- I inserted the code in


Private Sub ComboBox1_Initialize()
.AddItem "Paris"
.AddItem "New York"
.AddItem "London"
End Sub


When I run the macro, the window with combobox appear, but the options are empty.

 

[Fluff]

How about

Private Sub UserForm_Initialize()
   With Me.ComboBox1
      .AddItem "Paris"
      .AddItem "New York"
      .AddItem "London"
   End With
End Sub

 

[mmrfs]

It works! Thank you!

 

[Fluff]

You're welcome & thanks for the feedback.