macro enregistrer sous...

[Benoit]

Bonsoir à tous

J'ai cette macro qui enregistre mon fichier (mensuel) au nom de 'janvier2005 dans un autre dossier.
Je voudrais la modifier pour que :
- la selection du nom se fasse à partir d'1 ou 2 cellules
- ou alors au nom du mois et de l'année courant...

Sub SaveCopyAs()
ActiveWorkbook.SaveCopyAs 'C:\\Pharmaciel\\Janvier2005.xls'
End Sub

Merci à vous
Benoit

 

[myDearFriend!]

Bonsoir Benoit, le Forum.

Pour le mois en cours :

Sub SaveCopyAs()
Dim Chemin As String
      Chemin = 'C:\Pharmacie\'
      Chemin = Chemin & Format(Date, 'mmmmyyyy') & '.xls'
      ActiveWorkbook.SaveCopyAs Chemin
End Sub

Cordialement.

 

[myDearFriend!]

Oups

D'autre part je te déconseille d'utiliser SaveCopyAs comme nom de procédure. VBA n'aime pas trop ces confusions inopportunes...

 

[Benoit]

bonjour au forum
bonjour didier
Merci pour ta réponse : je vais tester au + vite
effectivement, j'ai eu un rappel de VBA concernant la procedure,
mais ne sachant quoi mettre à la place ...........!!!!

encore merci et bonne journée à vous
Benoît