Access - Error [¿mínimo?] en esta línea de código:

Private Sub Comando111_Click()
' ¿Existe registro?
Dim Criterios As String
Dim Cuenta As Integer

Criterios = "IdFinca = " & Me.Finca & " and Campaña = '" & Me.Campaña & "' and DetalleCultivo = '" & Me.DetalleCultivo & "'"

...///...

Al intentar ejecutar la línea de código anterior cuando el campo Finca está en blanco (en mi caso un combo, como los otros dos, pero creo que esto es intrascencendente...) , la aplicación me manda un mensaje del tipo -literal-: "Se ha producido el error '3075' en tiempo de ejecución: Error de sintaxis (falta operador) en la expresión de consulta 'IdFinca= and Campaña= " and DetalleCultivo= '"

...///....

Pienso que es cuestión de que falta lo mismo unas comillas simples o dobles, o algo por el estilo... ¿¿?? pero no doy con ello [no domino el código VBA, me manejo mejor con las macros, pero en esta ocasión no tengo más remedio, creo, que recurrir al código], ¿alquien puede decirme algo, por favor?.

Gracias.

El código completo por si menester fuese necesario:


Private Sub Comando111_Click()
' ¿Existe registro?
Dim Criterios As String
Dim Cuenta As Integer

Criterios = "IdFinca = " & Me.Finca & " and Campaña = '" & Me.Campaña & "' and DetalleCultivo = '" & Me.DetalleCultivo & "'"

Set rcd = CurrentDb.OpenRecordset("SELECT * FROM TbDatosCosechasUva WHERE " & Criterios)
Cuenta = rcd.RecordCount
rcd.Close
If Cuenta > 0 Then
MsgBox "El Registro de Cosecha correspondiente a la Finca, Detalle de Cultivo y Campaña indicados, ya ha sido creado. Si precisa MODIFICAR algún Dato de Detalle o incluso introducir UNO NUEVO hágalo desde el modo modificación previsto en el formulario correspondiente; si no es este el caso modifique el dato que corresponda de los introducidos anteriormente.", vbInformation, "AgroCosechas"
Else
DoCmd.RunMacro "Generac_Reg_Cosecha_Uva_Por_Finca"
End If

End Sub

Hola Rafael

prueba con nz(Me.Finca ,0)


Desde Venezuela
Jefferson

Me quedo sin palabras

Simplemente genial. Muchíííííííííííííísimas gracias.

Un saludo, Jefferson.