Macro heure, minute

Résolu/Fermé
bonnandr Messages postés 33 Date d'inscription mardi 15 mars 2011 Statut Membre Dernière intervention 31 mai 2023 - 16 mars 2011 à 18:57
bonnandr Messages postés 33 Date d'inscription mardi 15 mars 2011 Statut Membre Dernière intervention 31 mai 2023 - 17 mars 2011 à 08:59
Bonjour, comment écrire heure et minute dans une macro sous word 2007.
Merci



4 réponses

Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
16 mars 2011 à 19:13
Bonjour,

Compte-tenu de l'absence totale de précision dans la question, il existe une multitude de réponses possibles, en voici une :

Sub test()
MsgBox "Heure : " & Hour(Time) & vbCr & "Minute : " & Minute(Time)
End Sub
0
bonnandr Messages postés 33 Date d'inscription mardi 15 mars 2011 Statut Membre Dernière intervention 31 mai 2023 1
16 mars 2011 à 21:42
Voici ma macro : ActiveDocument.SaveAs FileName:="C:\Users\xxxxx wwww\Desktop/xxxx/xxxxx" & Format(Date, "dd") & Format(Date, "mm") & Format(Date, "yy") & ".doc"
J'aimerais pouvoir ajouter l'heure et les minute. Car autrement les formulaires se remplacent et je n'en ais qu'un par journée.
Merci pour t'on aide.
0
Patrice33740 Messages postés 8556 Date d'inscription dimanche 13 juin 2010 Statut Membre Dernière intervention 2 mars 2023 1 779
16 mars 2011 à 23:49
Re,
ActiveDocument.SaveAs Filename:="C:\Users\xxxxx wwww\Desktop/xxxx/xxxxx" & _
Format(Date, "dd") & Format(Date, "mm") & Format(Date, "yy") & _
Format(Time, "hh") & Format(Time, "mm") & ".doc"

0
lermite222 Messages postés 8724 Date d'inscription dimanche 8 avril 2007 Statut Contributeur Dernière intervention 22 janvier 2020 1 191
17 mars 2011 à 06:17
Bonjour,
Bonjour Patrice, je n'y croyais pas non plus... mais ça marche,
ActiveDocument.SaveAs Filename:="C:\Users\xxxxx wwww\Desktop/xxxx/xxxxx" & _
Format(Now, "ddmmyyhhmm") & ".Doc"
A+
0
bonnandr Messages postés 33 Date d'inscription mardi 15 mars 2011 Statut Membre Dernière intervention 31 mai 2023 1
17 mars 2011 à 08:59
Merci beaucoup.
0