Merci pour ton retour,
If DatePart("yyyy", FileItem.DateLastModified) = DatePart("yyyy", Date) Then
c'est pour tout les années en cours.
Si je remplace "yyyy" par "d", il me copie que les même jours des mois et année précedente.
Je pense modifié mon besoin,par un nouveau pour éviter...