Llenar Combobox Con Datos De Celdas

[JoaoM]

Parece que anda un mundo buscando como llenar combobox en excel

Pregunto donde se aplica ese codigo?
Sheets("hoja2").Select
Range("a1").Select
Do While ActiveCell <> Empty
ComboBox1.AddItem ActiveCell.Value
ActiveCell.Offset(1, 0).Select
Loop

Crear un Modulo y agregarle este codigo?

Caray, tampoco me di cuetna de la fecha (2007) y eso que yo siempre critico por revivir temas QUE NO ESTAN CERRADOS pues si pasados 6 meses cerraran los temas, nada de esto pasaria