heure système et pdf

[buromania]

Bonjour à tous
Lorsque j'édite mes factures en fin de mois, je réalise également une copie automatique via pdf créator.Chaque copie porte le nom de l'heure du système.Dans la même procédure je demande l'heure système dans une feuille synthèse pour pouvoir visualiser ces factures via procédure conné par Ti sur ce forum.

Si la facture fait + d'une feuille, l'heure système diffère de 1 à 3 s

Feuil5.PrintOut "pdf créator"
Feuil8.Range("A65536").End(xlUp).Offset(1, 0) = Format(Date, "yyyymmdd") & Format(Time, "hhmmss")

question:existe t'il un moyen pour que l'heure système soit identique sur la facture pdf et la feuil8

Par avance merci et bonne journée à tous

 

[wilfried_42]

Re : heure système et pdf

Bonjour buromania

il suffit pour cela de tricher

Dim heure_edit as date
heure_edit = time

Feuil5.PrintOut "pdf créator"
Feuil8.Range("A65536").End(xlUp).Offset(1, 0) = Format(Date, "yyyymmdd") & Format(heure_edit, "hhmmss")

bien entendu, ne pas reinitialiser heure_edit à chaque folio

 

[buromania]

Re : heure système et pdf

bjr wilfried, le forum
ta solution ne fonctionne pas.
Merci quand même
si quelqu'un a une autre idée ??