problema con funcion buscarv (VLookup) no me devuelve
publicado
Hola gente acudo a ustedes ya que realmente no se que hacer;
tengo un userform que al ingresar "x" valor en el textbox1 buscara en la base de datos especificada y devolvera el resultado en textbox2. Si bien el formulario funciona, lo hace solo si busco numeros, es decir si busco el numero "1" me devuelve corretamente el valor que necesito, pero si busco por ejemplo "una palabra" ya no la encuentra.
el código es el siguiente
Private Sub CommandButton1_Click()
On Error GoTo error:
nombre = Application.WorksheetFunction.VLookup(VBA.CInt(Me.TextBox1), Sheets("datos").Range("A:B"), 2, 0)
Me.TextBox2 = nombre: Exit Sub
error:
Me.TextBox1 = "": Me.TextBox2 = ""
Me.TextBox1.SetFocus
MsgBox "Dato no encontrado"
End Sub[/CODE]
Hola gente acudo a ustedes ya que realmente no se que hacer;
tengo un userform que al ingresar "x" valor en el textbox1 buscara en la base de datos especificada y devolvera el resultado en textbox2. Si bien el formulario funciona, lo hace solo si busco numeros, es decir si busco el numero "1" me devuelve corretamente el valor que necesito, pero si busco por ejemplo "una palabra" ya no la encuentra.
el código es el siguiente
BAJAR ARCHIVO AQUI
Adjunto el archivo con el formulario para que lo ejecuten
Les agradezco si me pueden dar una mano.
un abrazo!