Formulario con ComboBox1 vincular ComboBox2

2 envíos / 0 nuevos
Último envío
PCDrCaps
Imagen de PCDrCaps
Offline
última acción: Hace 11 años 3 meses
alta: 21/01/2013 - 18:00
Puntos: 6
Formulario con ComboBox1 vincular ComboBox2

uen día estimados Foristas,

Tengo la duda de como vincular el resultado obtenido de ComboBox 1 con el ComboBox2

Es decir en ComboBox1 tengo los siguientes países:

MEXICO
USA 
CANADA

En ComboBox1 seleccione USA pero quiero que en el ComboBox2 me aparezcan a seleccionar las ciudades de dicho país.

 

LOS ANGELES

DENVER

CHICAGO

ETC

 


Anexo Libro de excel para su analisis y respuesta, los Paises y ciudades se encuentra en la hoja "Datos".

Gracias anticipadas y saludos

AdjuntoTamaño
File formulario_combobox.xlsm21.69 KB
Cron
Imagen de Cron
Offline
última acción: Hace 8 meses 3 semanas
Nivel 1 - 200 puntosNivel 2 - 500 puntosNivel 3 - 1000 puntosNivel 4 - 2000 puntosNivel 5 - 4000 puntos
alta: 23/06/2010 - 12:30
Puntos: 12735
Re: Formulario con ComboBox1 vincular ComboBox2

Prueba con este código rupestre.

 

Funciona perfectamente para pocos datos. Imagino que será muy mejorable en caso de haber muchos datos.

 

Private Sub ComboBox1_Change()

 

Application.ScreenUpdating = False

ComboBox2.Clear

Worksheets("Datos").Activate

Range("E3").Select

While ActiveCell.Value <> ComboBox1.Text

ActiveCell.Offset(0, 2).Select

Wend

Do

ActiveCell.Offset(1, 0).Select

ComboBox2.AddItem (ActiveCell.Value)

Loop While ActiveCell.Offset(1, 0).Value <> ""

Worksheets("Registro").Activate

 

 

End Sub

 
 
Saludos