Funcion No Aplica
Publicado por Irene (30 intervenciones) el 07/02/2008 12:53:57
Hola a todos.
Tengo una función que coge el valor de un campo fecha y si recibe 1/1/1900 quiero que me ponga un N/A pero soy incapaz de que nos entendamos. Mi funcion es esta:
Function NA(campo As Variant) As Variant
If IsNull(campo) Then
NA = Null
Else
If campo = #1/1/1900# Then NA = "N/A" Else NA = Format(campo, "dd/mm/yy")
End If
End Function
¿Sabeis lo que hago mal? Trabajo con Access 2007.
Gracias a todos de antemano
Un saludo
Irene
Tengo una función que coge el valor de un campo fecha y si recibe 1/1/1900 quiero que me ponga un N/A pero soy incapaz de que nos entendamos. Mi funcion es esta:
Function NA(campo As Variant) As Variant
If IsNull(campo) Then
NA = Null
Else
If campo = #1/1/1900# Then NA = "N/A" Else NA = Format(campo, "dd/mm/yy")
End If
End Function
¿Sabeis lo que hago mal? Trabajo con Access 2007.
Gracias a todos de antemano
Un saludo
Irene
Valora esta pregunta
0