créer repertoire au format mois

[David]

Hello le forum,

Une question simple
Voici une procédure qui me permettrait de créer un repertoir avec le mois en cours mais, il crée bien le repertoir mais pas au format mois, mais plutôt : & month(ce qui à vrai dire, ne m'arrange pas vraiment)
Je compte donc sur vous pour me dépanner

Sub NomClasseur1()
Dim Month As Date
Mois = Now()
Mois2 = Format(Mois, "mmmm")
MkDir "c:\mes documents\ & month"

End Sub

Merci

 

[michel]

bonsoir David

tu peux essayer

Sub NomClasseur1()
Dim Mois As String
Mois = Format(Now, "mmmm")
MkDir "c:\mes documents\" & Mois
End Sub


bonne soire
MichelXld

 

[David]

Bonsoir Michel,

eh bien on peut dire que je n'en n'étais pas loin
Merci
Bonne soirée