combobox dependiente en Visual Basic

[Tenezy]

Estoy trabajando con unos formularios en Excel, y quiero hacer que dos combobox se relacionen, al seleccionar algun dato del primer combobox, aparezca una lista en el otro combobox de los datos que ya estan en excel.

Alguien me puede ayudar??

es sobre una hoja de clientes y proveedores

[lic_dahool]

Simple, cuando si estas usando formularios en excel calculo que sabras VB para Office, al igual que en visual los controles generan eventos, cuando cambie el combo 1 simplemente cambia el origen de datos del combo 2.

Saludos.

[Tenezy]

mi problema es que casi no conozco visual basic, he hecho simples formularios, y queria sabes si me podrias ayudar con un ejemplo para entender.

[lic_dahool]

Es cuestión de investigar un poco, cada control que incertas en un formulario responde a eventos, es muy obvio, fijate el nombre del evento (que esta en ingles) y ahi agregas el código agregar los nuevos datos al otro combo recorriendo la hoja de excel.

Aunque lo importante sería que definas bien que parte es la que no podés hacer, y tal vez así pueda orientarte como hacerlo.

Saludos / Abraços / Regards.

[santimq87]

Pues para que no te compliques (aunque es un poco largo y redundante), podrías hacer códigos condicionales, es decir que si un combobox equivale a "x" valor entonces la lista desplegable del otro combobox será un rango de celdas al cual previamente le des un nombre en la hoja de excel. Por ejm tienes paises y ciudades: en la hoja de excel en una columna pones usa, mexico, españa, francia..a esos 4 paises los sombreas y le das el nombre de "paises", luego pones al lado de cada país varias ciudades que le correspondan, sombreas las ciudades y les das el nombre del pais al que pertenecen...
En modo de diseño de vba, al combobox1 en sus propiedades donde dice "rowsource" escribes paises y en "columncount" pones el nº de paises

Ahora bien, un codigo muy básico y sencillo sería

Private sub combobox1_dropbuttonclick()
combobox2=empty
if combobox1="usa" then
me.combobox2.rowsource="usa"
if combobox1="mexico" then
me.combobox2.rowsource="mexico"
if combobox1="españa" then
me.combobox2.rowsource="españa"
if combobox1="francia" then
me.combobox2.rowsource="francia"
end if
end if
end if
end if
end sub