Récupérer le mois d'une date au format MM

[olivepao]

Bonjour le forum

Je désire savoir comment récupérer le mois courant au format MM et non au format M.

Je m'explique :

Je sauvegarde mon fichier en le nommant par des valeurs de cellules et la date.

Voici mon code :

ActiveWorkbook.SaveAs Chemin & "\" & ValeurCelA4 & " - " & ValeurCelB4 & " - " & Annee & "-" & Mois & " - " & ".xls", _
FileFormat:=xlNormal, password:="", WriteResPassword:="", ReadOnlyRecommended:=False, CreateBackup:=False

Mon fichier est ainsi sauvegardé ainsi : DUPONT - Jean - 2008-8.xls

Je désire qu'il soit sauvegarder ainsi : DUPONT - Jean - 2008-08.xls

Pour info, je récupère le mois de cette façon : Mois = (Month(Now))

Merci à tous pour votre précieuse aide.

 

[Pierrot93]

Re : Récupérer le mois d'une date au format MM

Bonjour Olivepao

essaye comme ci-dessous :

ActiveWorkbook.SaveAs Chemin & "\" & ValeurCelA4 & " - " & ValeurCelB4 & " - " & Annee & "-" & Format(Mois, "00") & " - " & ".xls"

bon après midi
@+

 

[olivepao]

Re : Récupérer le mois d'une date au format MM

Bonjour Olivepao

essaye comme ci-dessous :

ActiveWorkbook.SaveAs Chemin & "\" & ValeurCelA4 & " - " & ValeurCelB4 & " - " & Annee & "-" & Format(Mois, "00") & " - " & ".xls"

bon après midi
@+

Merci Pierrot 93

Ta proposition fonctionne à merveille !