Mostrar en un Textbox o en un label el valor relacionado al ingresar un dato en otro textbox.
Lo que trato de hacer es que cuando yo ingrese información en un textbox automáticamente se muestre la información relaciona en otro textbox o label. Por ejemplo. Ingreso un numero de parte en un textbox y en otro textbox se muestra de inmediato la descripción de ese numero de parte. Estos información la envío a la hoja de excel con un botón. Aquí pongo ejemplo del código:
Private Sub CommandButton1_Click()
Dim strfila$
Dim ctr As Control
Dim Nombre As String
Dim Rango As Range
strfila$ = [A65536].End(xlUp).Offset(1, 0).Row
Range("A" & strfila$) = TextBox1
Set Rango = Sheets("Hoja2").Range("A1:B10")
Nombre = Application.WorksheetFunction.VLookup(Me.TextBox1.Value, Rango, 2, 0)
Me.TextBox2.Value = Nombre
Range("B" & strfila$) = TextBox2
For Each ctr In Me.Controls
If TypeOf ctr Is MSForms.TextBox Then
ctr = ""
End If
Next ctr
End Sub
1 Respuesta
Prueba lo siguiente:
Private Sub TextBox1_Exit(ByVal Cancel As MSForms.ReturnBoolean)
Dim strfila$
Dim ctr As Control
Dim Nombre As String
Dim Rango As Range
strfila$ = [A65536].End(xlUp).Offset(1, 0).Row
Range("A" & strfila$) = TextBox1
Set Rango = Sheets("Hoja2").Range("A1:B10")
Nombre = Application.WorksheetFunction.VLookup(Me.TextBox1.Value, Rango, 2, 0)
If Nombre <> "" Then
Me.TextBox2.Value = Nombre
Range("B" & strfila$) = TextBox2
End If
End Subsaludos.dam
Gracias por tu respuesta pero hay un problema con esa modificación:
Al ingresar la info en el textbox1 en ese momento envía la info a las celdas respectivas, es decir, no espera a que presione el commandbutton, se que el principio del código cambio. Mi error fue no mencionar que esto es solo parte del formulario, en este formulario tengo 9 textbox y después de estos dos todavía quedan dos por llenar asi si lo pongo de esta manera enviaría la información incompleta a la hoja de excel.
Habrá otra manera de hacerlo?
Lo que pasa es que tu mencionaste esto: "cuando yo ingrese información en un textbox automáticamente se muestre la información relaciona en otro textbox"
Si gustas explicarme nuevamente lo que necesitas con ejemplos
Saludos. Dam
Que tal,
Aquí te dejo un enlace donde bajar el formulario completo, gracias por tu ayuda.
Ya vi el archivo y no vienen explicaciones y lo más importante no hay un ejemplo de lo que necesitas.
Si puedes enviarme un ejemplo con imágenes, comentarios y colores de cómo lo tienes y qué esperas de resultado.
Saludos. Dam
Hola, no se si aún continúe en la comunidad; tengo una duda similar a la que plantea la persona, pero veo que no se le dio respuesta. Tengo en una hoja de Excel en la columna A unos códigos y en la columna B unas descripciones. En un userform, tengo un combobox mediante el cual se el usuario despliega una lista y selecciona un código de la lista. Necesito que, una vez el usuario seleccione un código, en un textbox se haga la búsqueda de ese código en la hoja de excel (como un buscarv) y me traiga la descripción a la que corresponde dicho código, es decir que me muestre desde el text box dicha descripción encontrada.. ¿se puede hacer? ¿Podría ayudarme..? Muchas gracias - Leonardo Paez Rodriguez
Hola: Con mucho gusto te ayudo con todas tus peticiones, pero es difícil explicar o enviar código en los comentarios.Crea una nueva pregunta en todoexpertos, en el tema de microsoft excel, en el desarrollo de la pregunta escribe: "para Dante Amor", ahí me describes con detalle lo que necesitas.Sal u dos - Dante Amor