TENGO UNA HOJA LLAMADA BD, dentro de ella tengo la lista CODIGO Y PACIENTE.
EN OTRA HOJA LLAMADA ITI, Estoy creando un userform que me permita ingresar el CODIGO de la hoja BD, pero necesito que en el siguiente cuadro de manera automatica me muestre el nombre del paciente.
Ojo. en la HOJA 2 (ITI) habia puesto la funcion =BUSCARV(A2;BD!$A$1:$B$50;2;0) EN PACIENTE y me venia funcionando bien cuando lo hacia manualmente pero al crear el USEFORM no se como hacerlo.
y ademas creo que deberia crear DOS BOTONES. EL PRIMERO QUE ME PERMITA QUE DESPUES DE INGRESAR EL CODIGO VEA EN EL SEGUNDO EL NOMBRE QUE LE CORRESPONDA y EL SEGUNDO BOTON que me siga permitiendo enviar los demas datos en las siguientes celdas.
Private Sub CommandButton1_Click()
If CODI.Value <> "" Then
Range("a1000000").End(xlUp).Offset(1, 0).Select
ActiveCell.Value = CODI.Value
ActiveCell.Offset(0, 1) = PACI.Value
Else
MsgBox "La casilla CODIGO es requerida"
CODI.SetFocus
End If
End Sub
----Hasta aqui estaba por buenos tiros, pero espero su gentil ayuda
Adjunto | Tamaño |
---|---|
![]() | 18.94 KB |