0

En un código VBA de un botón de un formulario de Access, tengo el siguiente código:

introducir la descripción de la imagen aquí

El resultado es un error como este:

introducir la descripción de la imagen aquí

¿A qué se debe y cómo resolverlo?

1

2 respuestas 2

2

Lo primero, siempre que pongas código, ponlo como texto, nunca como imagen, por favor..

Lo segundo, utilizas IsNull solamente una vez. Pero viendo tu código, entiendo que quieres comprobar si alguno de los 4 campos es nulo. Tal cual lo tienes escrito, solamente estás comprobando el primero. La sentencia correcta sería algo así como:

If IsNull(campo1) = True Or IsNull(campo2) = True Or IsNull(campo3) = True Or IsNull(campo4) = True Then

Lo copiaría con tus datos, pero como has puesto el código como imagen.... ;)

1
  • Entendido! Buena respuesta.
    – AccessOPS
    Commented el 10 jul. 2018 a las 14:37
0

Al realizar ese tipo de validaciones, como buena practica, te recomiendo dos formas;

*La que muestras en tu pregunta:

If Nz(fieldString, "") = "" Or Nz(FirldNumeric, 0) = 0, Or Nz(FieldVariant, "") = "" Then
     MsgBox "Lo que tenga que ocurrir...", vbInformation + vbokonly, "Ejemplo"
End If

*La forma que yo te recomiendo: En lo personal, yo preferiria realizar las validaciones por separado, por una razon, ya que luego el entorno de vba de acceess almacena ciertas cosas en Cache, no te ha sucedido que de repente ¿no te marca los errores?, o se salta alguna validacion en estos "If Then Else End If", Yo para asegurar la calidad del codigo prefiero esto:

If Nz(Fieldstring, "") = "" Then
    MagBox "Lo que tenga que pasar.", vbInformation + vbokonly, "Error"
    Exit Sub/Function 
End If

If Nz(FieldNumeric, 0) = 0 Then
    MagBox "Lo que tenga que pasar.", vbInformation + vbokonly, "Error"
    Exit Sub/Function         
End IF

Asi de esta forma, aseguras la calidad del funcionamiento de las validaciones, ahora, con respecto a tu error 13, este se produce cuando intentas meter un tipo de dato Variant a una tipo de dato especifico, es decir, un String en un Float, o integer o algun tipo de dato ageno a lo que esta establecido en el campo de la BD, te recomiendo que verifiques el dato que manipulas.

Tu Respuesta

By clicking “Publica tu respuesta”, you agree to our terms of service and acknowledge you have read our privacy policy.

¿No es la respuesta que buscas? Examina otras preguntas con la etiqueta o formula tu propia pregunta.