Tengo en mi proyecto el Textbox1 que es el resultado de unir el Combobox4 y el Combobox3. Lo que deseo es que el resultado del Textbox1 busque en la columna G de la hoja Prueba y devuelva el resultado de la columna H al Textbox2. Estoy intentándolo con estas líneas, pero no consigo reaolverlo. ¿Podrían ayudarme?
Un saludo
TextBox1.Text = ComboBox4.value & ComboBox3.value
Set h = Sheets("Prueba")
Set b = h.Columns("G").Find(TextBox1)
If Not b Is Nothing Then
TextBox2 = h.Cells(b.Row, "H")
End If
Featured Replies
Archivado
Este tema está ahora archivado y está cerrado a más respuestas.
Buenos días
Tengo en mi proyecto el Textbox1 que es el resultado de unir el Combobox4 y el Combobox3. Lo que deseo es que el resultado del Textbox1 busque en la columna G de la hoja Prueba y devuelva el resultado de la columna H al Textbox2. Estoy intentándolo con estas líneas, pero no consigo reaolverlo. ¿Podrían ayudarme?
Un saludo
TextBox1.Text = ComboBox4.value & ComboBox3.value
Set h = Sheets("Prueba")
Set b = h.Columns("G").Find(TextBox1)
If Not b Is Nothing Then
TextBox2 = h.Cells(b.Row, "H")
End If