Cargar ComboBox desde hojas variables

Hola! Tengo un Formulario en VBA que, de acuerdo a lo que seleccione en el CB1, le da valores a un Label; éstos valores corresponden a sendas hojas de Excel.

Lo que necesito es que los CB relacionados (del 2 al 7) tomen los datos de la columna "A" de la hoja que corresponda, según el Label.

Gracias!

1 respuesta

Respuesta
1

Si gustas, podría revisar tu formulario, pero necesito que me envíes tu archivo con las macros y una explicación de cómo debo ejecutar tu formulario, también explica en la hoja de excel qué tienes y qué resultado necesitas, escribe los ejemplos con comentarios o con colores.

Saludos. Dam

Enviado correo

Te envié la macro a tu correo

Saludos. Dam

Si es lo que necesitas.

Hola, Dam!
Funciona CUANDO ABRO POR PRIMERA VEZ EL FORMULARIO; si "me equivoqué" de paciente, y corresponde a otra Obra Social, se me queda "tildado" en la primera (ésto es, con los Códigos de la primera búsqueda).

Cambia la macro del command por esta

Private Sub ComboBox1_Change()
Label3.Caption = Application. WorksheetFunction. VLookup(ComboBox1. Value, Sheets("PACIENTES"). Range("A1:D200"), 2)
Label5.Caption = Application. WorksheetFunction. VLookup(ComboBox1. Value, Sheets("PACIENTES"). Range("A1:D200"), 3)
ComboBox2. Clear
ComboBox3. Clear
ComboBox4. Clear
ComboBox5. Clear
ComboBox6. Clear
ComboBox7. Clear
Set hoja = Sheets(Label3.Caption)
For i = 2 To hoja.Range("A" & Rows.Count).End(xlUp).Row
    ComboBox2. AddItem hoja.Cells(i, "A")
    ComboBox3. AddItem hoja.Cells(i, "A")
    ComboBox4. AddItem hoja.Cells(i, "A")
    ComboBox5. AddItem hoja.Cells(i, "A")
    ComboBox6. AddItem hoja.Cells(i, "A")
    ComboBox7. AddItem hoja.Cells(i, "A")
Next
End Sub

Saludos.Dam
Si es lo que necesitas.

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

Asignar el valor de una lista ubicada en una columna a un textbox según cambia un combobox vba

Tengo en mi formulario de captura un combobox al que le he asignado la lista de empresas de la columna b7 de la hoja llamada empresa, en la columna c7 tengo la lista de iniciales de los nombres de dicha empresas. Cada vez que seleccione una empresa...
1 respuesta

Cambiar datos de un textbox según lo seleccionado en un combobox

Quisiera que alguien me ayudara, pues resulta que tengo un formulario en el cual he puesto un ComboBox y quisiera que al seleccionar un valor en el mismo me cambie a su vez los de cuatro TextBox que hay en la misma tabla de la que extraje los datos....
1 respuesta

¿Cómo copio valor de ComboBox en Hoja, a celda de misma Hoja, habiendo usado ya evento Click()?

Estoy aprendiendo VBA y no se como copiar un valor seleccionado en un ComboBox ActiveX, el cual se ubica en una hoja, a una celda de la misma hoja. Lo que pasa es que ya tengo un Evento Click asociado al ComboBox, lo estoy utilizando para seleccionar...
1 respuesta

Uso de vlookup en vba

Resulta que en mi trabajo cree una macro que genera una base de datos de compras. Necesito saber como puedo hacer para que después de registrada una orden de compra en la base, pueda buscarla por su consecutivo y actualizar una fecha en ese registro.
1 respuesta

Formulario Userform de VBA excel 2010 que permita buscar, seleccionar y traspasar información a hoja

Estoy buscando la manera de hacer un formulario(userform de VBA excel 2010), desde el cual pueda buscar y seleccionar la información requerida, la cual esta distribuida en 3 hojas excel 2010. La 1ra hoja contiene 3 columnas con nombres, apellidos, y...
1 respuesta

Activar la fila del Registro Seleccionado, al hacer click, después de un Filtro en TextBox

Rengo una planilla, con columnas útiles, desde la A hasta la R y filas que superan las 1000. Mediante esta macro: Set Rango = Range("M1", Range("M1").End(xlDown)) Rango.AdvancedFilter 2, , Range("IV1"), Unique:=True Range("IV1").Sort Range("IV1"),...
1 respuesta

Buscar si dato existe en una columna y si no existe, copiar fila en otra hoja

Tengo tres hojas: 'Inventario', 'CNC' y 'Nuevos' Necesito buscar si los valores en cada celda de la columna 'B' de 'Inventario' existen en alguna celda de la columna 'A' de 'CNC' y si NO existe alguna coincidencia, entonces copiar la fila completa...
1 respuesta

Cargar un combobox a partir de otro combobox

Necesito crear un código en el cual el 1er combobox me seleccione la hoja con la cual se trabajará el segundo. 1er combobox: se elige la hoja para trabajar 2do combobox: al elegir del 1er combobox, este debería mostrar un listado de columnas de la...
1 respuesta

Cerrar hoja activa en excel

Miren tengo un problema, tengo un excel con aproximadamente 30 hojas todas enumeradas del 1 al 30, tengo un botón en cada una de ellas para cerrar el archivo, pero lo que necesito es una macro para que independiente de el numero de hoja que este osea...
1 respuesta

ComboBox Exccel VBA

Son dos preguntas Primera Quiero ocupar un combobox en excel para hacer una evaluación, ya dibuje el combobox y le anexe las opciones en base a un rango de excel, pero quisiera saber como agregarle una macro para que automáticamente seleccionando una...
1 respuesta