** NORMAS DEL FORO **
Inicio del foro Inicio del foro > Access y VBA > Access y VBA
  Mensajes nuevos Mensajes nuevos RSS - IF Dlookup
  Preguntas frecuentes Preguntas frecuentes  Buscar en el foro   Eventos   Registro Registro  Iniciar sesion Iniciar sesion

Tema cerradoIF Dlookup

 Responder Responder
Autor
Mensaje
Faccess Ver desplegable
Nuevo
Nuevo


Unido: 12/Septiembre/2017
Localización: Mexico
Estado: Sin conexión
Puntos: 11
Enlace directo a este mensaje Tema: IF Dlookup
    Enviado: 12/Septiembre/2017 a las 20:52
Alguien sabra el equivalente de =iferror(vlookup(blabla)),"xvalue" en Codigo de VBA?

actualmente tengo:

Textbox.value = Dlookup(x,y, z=b)

y necesito hacer que cuando el Dlookup no encuentre la condicion z=b (osea algo asi como error) me envie una leyenda como "no se encontro el valor buscado"

Gracias por su ayuda
Arriba
emiliove Ver desplegable
Moderador
Moderador


Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 4361
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 21:06
Que te parece usar un DCount y si es = 0 es que no encontró resultado.

Saludos.
Arriba
Faccess Ver desplegable
Nuevo
Nuevo


Unido: 12/Septiembre/2017
Localización: Mexico
Estado: Sin conexión
Puntos: 11
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 21:34
Algo asi como Dcount(dlookup()) ?
Arriba
Faccess Ver desplegable
Nuevo
Nuevo


Unido: 12/Septiembre/2017
Localización: Mexico
Estado: Sin conexión
Puntos: 11
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 22:11
Ya, no funcionó :( ya que es necesario utilizar Dlookup() para obtener valores de una tabla
Arriba
emiliove Ver desplegable
Moderador
Moderador


Unido: 16/Junio/2009
Localización: Mexico
Estado: Sin conexión
Puntos: 4361
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 23:06
Pero ¿por que?

If DCount("XXX","xxx"","xxx")>0 then
DLookup/ lo que quieras)
Else
MsgBox "Lo siento no hay datos que mostrar, intenta con otra busqueda"
End if

Saludos.

Arriba
Faccess Ver desplegable
Nuevo
Nuevo


Unido: 12/Septiembre/2017
Localización: Mexico
Estado: Sin conexión
Puntos: 11
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 23:42
Creo que eres un master Brother, lo que buscaba no era exactamente lo que comentas pero sin ese feedback no llego a la solucion:

If DCount("[blabla]", "[blabla]", "[blabla] = " & "'" & Combox.Value & "'" & "") > 0 Then
   Combobox2.Value = DLookup("[blabla]", "[blabla]", "[blabla] = " & "'" & Combox.Value & "'" & "")
   Else: Combox2.Value = "Not in this Country"
End If
Arriba
Faccess Ver desplegable
Nuevo
Nuevo


Unido: 12/Septiembre/2017
Localización: Mexico
Estado: Sin conexión
Puntos: 11
Enlace directo a este mensaje Enviado: 12/Septiembre/2017 a las 23:43
muchas gracias :)
Arriba
 Responder Responder
  Compartir tema   

Ir al foro Permisos de foro Ver desplegable