Access - ERROR 13 ACCESS 2007

Hola a todos. Tengo un problema al ejecutar un código que tenia en mi base de datos de Access 2000 y que ahora al convertirla a Access 2007 me dá el siguiente error: Error 13 No coinciden los tipos. Igual al convertirla hay que cambiar algo del código pq no funciona bien con el 2007. El código es muy simple solo crea un nuevo registro en una tabla nada mas.
El código es el siguiente:

Dim FECHANOVEDAD As Date
FECHANOVEDAD = Date
Dim Rst As Recordset
Dim db As Database

On Error GoTo AVISO
Set db = CurrentDb ' (El error aparece justo despues de esta línea)
Set Rst = db.OpenRecordset("NOVEDADES MARKETING-TECNICO")

With Rst
.AddNew
!IDERELMARK = ID
!ARTICULO = ARTIC
!DIE_PRODUCTO = "Pedir"
!SILK = "Hacer"
!DIE = "Pedir"
!GIFT = "Hacer"
!FOTOS = "Pedir"
!MANUTOÑO = "Hacer"
!HOJA_NOVEDADES = "Hacer"
!ESPECIFI = "Pedir"
!PART_LIST = "Pedir"
!CE = "Pedir"
!CI = "Hacer"
!ROHS = "Pedir"
!CARACT_CAJA_BLISTER = "1º"
!MANUAL_ESPAPOR = "Hacer"
' !NOVEFECHALIMI = [FECHA]
!HOJNOVTECNICO = "3º"
!PUESTOENMERCADO = "No hacer"
!FECHA = [FECHANOVEDAD]
.Update
MsgBox "Registro Novedad Guardado", vbCritical, "Registro Grabado"

End With
Rst.Close

AVISO:
If Err.Number = 3022 Then
MsgBox ("ERROR"), vbAbortRetryIgnore

Rst.Close
End If

End Sub

Prueba a dimesionar el Recordset así:

Dim Rst As DAO.Recordset

Si te funciona, el problema no es de Access 2007, sino que, por algún motivo, tienes declarada una referencia a ADO por encima de la referencia a DAO o a ACEDAO

Saludos
José Bengoechea Ibaceta