Macro para buscar códigos según la descripción en el textbox
Espero puedan ayudarme en esta oportunidad tengo una userform que carga las compras o asientos Contables diarios pero necesito una macro para que al buscar el nombre de la cuenta en el textbox1 me aparezca el código contable del plan de cuenta en el textbox2. El plan de cuentas lo tengo en una Hoja llamada Cuentas
1 Respuesta
Respuesta de Adriel Ortiz Mangia
[Hola
Te paso la macro
Private Sub CommandButton1_Click()
Set h = Sheets("Cuentas")
'
Set r = h.Columns("A") ' columna cuenta contable
Set b = r.Find(TextBox1, lookat:=xlWhole) '
If Not b Is Nothing Then
TextBox2 = h.Cells(b.Row, "B") ' columna código contable
Else
MsgBox "El código no existe"
End If
End SubValora la respuesta como bueno o Excelente para finalizar saludos
