mois en cours - 1 mois

[mrjim80]

Bonjour,
je souhaite importer un classeur via une macro. Le classeur est du type "nom 09 2008" pour Septembre 2008

Je doit importer le fichier du mois précedent. J'ai fait ca:
Workbooks.Open Filename:= _
"Y:\repertoire\nom " & Format(Date - 31, "mm yyyy") & ".xls"

mais je souhaiterais plus avoir un truc du style "- 1 Mois" ou mois precedent...est ce que cette variable existe?

merci d'avance!

 

[Catrice]

Re : mois en cours - 1 mois

Bonjour,

Tu peux essayer ceci :

Sub Test2()
MsgBox "Y:\repertoire\nom " & Format(DateSerial(Year(Date), Month(Date) - 1, 1), "mm yyyy") & ".xls"
End Sub

 

[gege31]

Re : mois en cours - 1 mois

Bonjour,
Dans une cellule (ex : C1) tu récupère la date système : =AUJOURDHUI(), dans une autre tu insère la formule "MOIS(C1)-1" tu n'as plus qu'à récupérer la valeur de cette cellule dans ta macro.
voila j'espère avoir répondu à ton problème.
Bon courage

 

[mrjim80]

Re : mois en cours - 1 mois

impec j'ai choisi la soluce de Catrice!

MERCI a tous