Comment restreindre l’exécution d’une macro à une date déterminée ?

Ce type de demande est fréquent par exemple pour empêcher la saisie accidentelle de données d’une année financière qui n’est pas commencée. Dans cet exemple, la saisie est impossible si la date est inférieure au 1 octobre 2006. En revanche, elle peut s'exécuter si cette date est dépassée.

sub SaisieDesDonnees()
  If Now() < #10/1/2006# Then
  MsgBox "L'année financière 2007 n'est pas commencée, elle commence le 1 octobre 2006. Utilisez le fichier xxxx.xls pour saisir vos données"
  Else
  ‘Mettre l’exécution de la macro ici  
 End If
 end sub