Mlebv de Monterrey

antares18 respondió: Pues igual que has hecho con el 2 Private Sub ComboBox2_Change() ComboBox3.Clear Hoja3.Select columna = ComboBox2.ListIndex + 1 Cells(2, columna).Select Do While ActiveCell <> Empty ComboBox3.AddItem ActiveCell ActiveCell.Offset(1, 0).Select Loop End Sub