Re,
Je viens de relire ta question initiale, et c'est vrai il manque des choses
Set fso = CreateObject("Scripting.FileSystemObject" )
Set f = fso.GetFolder(LeRepertoire)
Set fc = f.Files
For Each f1 in fc
DateDiff("d", date1, date2)
Now
f1.DateCreated
f1.DateLastModified
Next
Ce bout de code permet de balayer le répertoire.
DateDiff("d", date1, date2) renvoie le nombre de jours entre 2 dates
Now contient la date du jour
f1.DateCreated renvoie la date de création du fichier
f1.DateLastModified renvoie la date de modification du fichier
Dans la boucle, tu peux alors tester si un des fichiers a été modifié.