Buenas, necesito hacer un filtrado con Filter de una base de datos ADO .mdb, lo que intento es añadir los registros de otra base de datos a la mía pero que cumplan dos criterios , que el campo Titulo (texto) no esté vacío y que el campo Codigo (texto) sea null, es ahí donde tengo el problena


Select Case rs.Fields(0).Value
Case Is <> ""
Data1.Recordset.Filter = "Codigo = '" & rs.Fields(0).Value & "'"
Case Is = ""
If InStr(1, rs.Fields(1).Value, "'") <> 0 Then rs.Fields(1).Value = Replace(rs.Fields(1).Value, "'", "’")
Data1.Recordset.Filter = "Titulo = '" & rs.Fields(1).Value & "' and Codigo = ''"
' If Data1.Recordset.EOF Then
' End If
Case Else
Data1.Recordset.Filter = "Titulo = '" & rs.Fields(1).Value & "' and Codigo =''" '*******FALLA********
End Select
If Data1.Recordset.EOF Then
Data1.Recordset.AddNew ........



¿ALGUIEN SABE CÓMO FILTRAR PARA QUE BUSQUE UN CAMPO NULL?