Insertion date fichier dans cellule

[touareg]

Bonjour,

j'ai une macro qui constitue un tableau (toto.xls) excel à partir d'autres documents excel.

Je souhaite insérer dans l'entête du tableau final (toto.xls) la date de constitution de celui-ci

j'ai inseré dans ma macro la commande suivante :

Range("K1:O1") = CDate(Format(ActiveWorkbook.BuiltinDocumentProperties("creation date"), "dd/mm/yy"))

Le problème c'est que je récupère la date de constitution de mon fichier macro.xls dans lequel sont stockés mes macro et pas la date du fichier toto.
Au moment de l'insertion de la date c'est bien la fenêtre de 'toto' qui est active.

merci d'avance pour votre aide

 

[Guest]

Re : Insertion date fichier dans cellule

Bonjour touareg,

En fin de macro qui constitue le fichier Toto.xls
Mettre:
WorkBooks("Toto.xls").sheets("Feuil1").Range("K1:O1") =Format(date(),"dd/mm/yyy")

Remplacer Feuil1 par le nom de la feuille concernée.

A bientôt

 

[touareg]

Re : Insertion date fichier dans cellule

Super...merci beaucoup !