DateAdd Erreur de compilation : Sub ou Function non définie

Bonjour,

Je voudrais utiliser DateAdd pour avoir le mois d'avant la date du jour. Cependant je ne peux pas utiliser cette fonction. Problème de référence VBA project ? Si c'est le cas comment je suis censée trouver dans les centaines de références avec des noms qui ne qualifie en rien leurs contenus ? Des idées ? Voici mon code :

Sub test()
Dim Date_debut As Variant
Dim Date_fin As Variant
Dim mois_avant As Variant

mois_avant = DateAddd("m", -1, Date)
Date_debut = Format(mois_avant, "ddmmyyyy")
Date_fin = Format(Date, "ddmmyyyy")

MsgBox Date_debut & "_" & Date_fin

End Sub