De un elemento de ComboBox llenar un textBox

Tengo un ComboBox que lo lleno de un rango de datos que están en una columna (a) ya teniendo esto deseo llenar 2 textbox de acuerdo a la posición que tiene el ComboBox...
Ejemplo:
               A B C
1 351 daniel manzano moreno
2 352 adrian quaas blanco
3 5402 ricardo núñez negro
4 ...
5 ...
6 ...
ETC
ENTONCES SI yo escojo el elemento del comboBox 352 quiero que me ponga en el textBox1 Adrian Quaas y en el TextBox2 blanco...
Ya intente con aplicattion. WorksheetFunction. Vlookup y no funciona...
No se si puedas ayudarme de Antemano

1 respuesta

Respuesta
1
Te dejo la parte de la rutina que te falta:
dato = Combobox1.value  'ver *

Set busco = Sheets(1).range("A1:A100").Find(dato, lookin:=xlvalues, lookat:=xlWhole)  'ver **
'si encontró el dato lo mostrará en los demás textbox
If Not busco Is Nothing Then
textbox1 = busco.offset(0,1).value
textbox2= busco.offset(0,2).value
else   'si no lo encontró limpia el textbox de posibles valores anteriores

textbox1 = "": textbox2= ""
End If
set busco = nothing     'libero la variable
* Si el dato aparece como numérico debes convertir el valor del combo a nro
dato = Val(Combobox1.value)
** Ajustá el nombre de tu hoja y rango
Sdos. No olvides finalizar la consulta cuando el tema esté resuelto

Añade tu respuesta

Haz clic para o

Más respuestas relacionadas

4 combobox dependientes en un userform

Tengo un primer combobox1 donde se van a cargar dos nombres:willian, jose Como hago para que al seleccionar willian en el combobox2 me cargue mi apellido=vargas Y en el tercer combobox3 me cargue mi segundo apellido=ramírez, en el cuarto combobox me...
1 respuesta

Ayuda! Vincular un textbox con un valor de Combobox.

Mi pregunta es bien simple, pero no le encuentro solución... Tengo un Combobox y varios TextBox en un formulario. Y mi pregunta es ¿Cómo hago para que al seleccionar un valor del combobox, éste me rellene los TextBox? Tengo una hoja donde sale estos...
8 respuestas

Buscar hoja señalada en CmBx1 y atraer en los TxBx contenidos de las celdas especificas

Tengo esta macro que anexo y su función es: al seleccionar la obra en el cmbx1 y clickear “buscar”, debe buscar la hoja respectiva en el libro y visualizar en los textbox el contenido que encuentre en las celdas específicas. Si se desea modificar un...
1 respuesta

¿Cómo hago para añadir en una nueva hoja de calculo?VBA

Tengo el siguiente código que copie de un ejemplo que descargue pero cuando quiero añadir lo que hace es hacerlo en la misma hoja de calculo toda la información de las textbox, ¿Cómo haría para hacer que cada vez que añada un nuevo cliente aparezca...
3 respuestas

Crear un filtro para un combobox

Algún experto que me pueda ayudar con este detalle, tengo 2 combobox en un userform en el primero quiero que me filtre por familias( a, b, .. F) y en el segundo combo muestre las claves que pertenezca a la familia elegida. Yo lo inicialice en el form...
1 respuesta

BuscarV o Bucador en TextBox de Formulario!

Espero tener suerte. Tengo un formulario con varios TEXTBOX, dentro de los cuales tengo textBox1 (donde coloco el código del repuesto), texbox3 (donde me dice la marca del repuesto) y textbox4 (donde me dice que repuesto es). Todos estos datos yo los...
1 respuesta

Imprimir los datos de consulta

Ahora puedes ayudarme... Mira Tengo la siguiente consulta... Lo que quiero es esta misma consulta imprimirla, que ya no se envíe a pantalla sino a la impresora... Besos Private Sub CommandButton1_Click() On Error GoTo noencontro...
1 respuesta

Vlookup o BuscarV en VBA Excel

Estoy Tratando de Crear unos Vlookup en unos cuadros de texto que cuando se seleccione un código por ejemplo, me traiga el nombre y el lugar de trabajo.
1 respuesta

VBA excel: autofiltro con varias condiciones

He hecho un formulario de carga de datos de comprobantes, el cual tiene unos 30 campos entre textbox y combobox. Quisiera saber como puedo hacer para poder buscar un comprobante ya almacenado con hasta 4 datos de búsqueda. Por ejemplo: necesito poder...
1 respuesta