Excel - Error de compilación

   
Vista:

Error de compilación

Publicado por Gabriel (1 intervención) el 22/11/2017 17:45:06
Estimados,

Podrían ayudarme, he realizado el siguiente código y me sale error de compilación: No se ha definido Sub o Function.

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub CommandButton1_Click()
 
    If TextBox1.Value = "" Or TextBox2.Value = "" Then
    MsgBox "Por favor ingresar usuario y clave", 16, "Faltan datos"
 
    ElseIf Match(TextBox1.Value, Tabla1(Usuario), 0) = 1 Then
 
    Label11.Visible = False
 
    Else
 
    Label12.Visible = False
 
    End If
 
End Sub
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder
Imágen de perfil de Abraham Valencia

Error de compilación

Publicado por Abraham Valencia (66 intervenciones) el 23/11/2017 02:26:31
Hola:

¿Qué es "Tabla" y qué es "Usuario"? No se ve que hayas definido esas variables, si el error te lo da en esa línea, pues ese es el problema.

Abraham Valencia
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Antoni Masana

Error de compilación

Publicado por Antoni Masana (680 intervenciones) el 23/11/2017 06:53:30
Además de lo que comenta Abraham Match lo he visto escrito de en estos tres formatos en las páginas que he consultado.
No lo conozco y no se cual es la mejor forma de hacerlo.

WorksheetFunction.Match
Application.WorksheetFunction.Match
Application.Match

Saludos.
\\//_
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Imágen de perfil de Abraham

Error de compilación

Publicado por Abraham (66 intervenciones) el 23/11/2017 13:52:24
Hola. Así es Antony, además, no funciona solo tal y como lo puso nuestro amigo. Sobre las tres formas de usarla en VBA, las tres son adecuadas, ninguna es mejor (o peor) que otra)

Saludos

Abraham Valencia
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar
Revisar política de publicidad