Conversion minute

Bonjour,

J'utilise la fonction

ActiveWorkbook.SaveAs Filename:= _
"C:\test\test-" & Day(Date) & "." & Month(Date) & "." & Year(Date) & " " & Hour(Time) & "-" & Minute(Time) & ".xls", _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, _

Il me retourne test-20.7.2021 21-11.xls et a la fin pour les minute si c'est 3 minute il affiche 3 au lieu de 03 comment modifier ?

Merci

Bonjour,

Pour le principe :

"c:\test-\" & Format(Now, "yyyy.mm.dd hh-mm") & ".xls"

Cdlt.

J'ai une erreur

ActiveWorkbook.SaveAs Filename:= _
"c:\test-\" & Format(Now, "yyyy.mm.dd hh-mm") & ".xls", _
FileFormat:=xlOpenXMLWorkbookMacroEnabled, _
ReadOnlyRecommended:=False, CreateBackup:=False

Re,

Remplace xls par xlsm.

Regarde l'aide VBA pour FileFormat.

Cdlt.

Merci ça fonctionne je voudrais mettre au debut du nom du fichier un texte au lieu que ça commence par 2021

Re,

Peux-tu préciser ?

Sinon, indique ta version Excel dans ton profil...

Cdlt.

C'est good merci

Re,

C'est un peu confus !
C'est quoi NomFichier ?
Essaie "c:\test\poste 1-" & Format(Now, "yyyy.mm.dd hh-mm") & ".xlsm"

Cdlt.

Rechercher des sujets similaires à "conversion minute"