Expresion que no tiene valor
Publicado por Didac (27 intervenciones) el 21/06/2022 14:26:39
Hola a todos!
He creado un codigo en VBA para que pase el valor de un campo de un informe a una tabla de SQL, hasta aqui todo bien, guardo el valor del campo en una varibale, y esta despues se la paso a la tabla de SQL.
Pero el problema lo tengo cuando en ese valor en el informe es vacio, el sistema me retorna un error "Ha especidicado una expresion que no tiene valor", y cuando miro la variable me dice Vacio.
No se como hacer que si ese campo esta vacio me salte a un msgbox, o que no salte error, alguien me puede ayudar.... os dejo adjunto el codigo
He creado un codigo en VBA para que pase el valor de un campo de un informe a una tabla de SQL, hasta aqui todo bien, guardo el valor del campo en una varibale, y esta despues se la paso a la tabla de SQL.
Pero el problema lo tengo cuando en ese valor en el informe es vacio, el sistema me retorna un error "Ha especidicado una expresion que no tiene valor", y cuando miro la variable me dice Vacio.
No se como hacer que si ese campo esta vacio me salte a un msgbox, o que no salte error, alguien me puede ayudar.... os dejo adjunto el codigo
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Private Sub Detalle_Print(Cancel As Integer, PrintCount As Integer)
Dim pedido
Dim BF, mystr,
BF = Report!bfname
mystr = Left(BF, 4)
pedido = Report!REFERENCIA
DoCmd.SetWarnings FalseDoCmd.RunSQL "Insert Into dbo_control(BF,Fecha,Hora,PE,count)Values('" & mystr & "',DATE(),TIME(),'" & pedido & "','1')"
DoCmd.SetWarnings TrueEnd Sub
Valora esta pregunta
0
