Excel VBA Populando un Combobox en una forma de usuario de una gama de celdas

Private Sub UserForm_Initialize()
    ComboBox1.List = [Sheet1!A1:A10].Value
End Sub
Excel Hero