nom de fichier avec une date

foucher maurice · 28 Mars 2005

je produis chaque nsemaine un fichier de même nature. je le produis à l'aide d'une macro. je cherche à faire en sorte qu'à la fin le fichier se sauvegarde et comporte outre le nom du fichier, la date du jour.
de cette façon le nouveau fichier n'écrase pas le précédent. y-a-t-il une solution? merci

_Thierry · 29 Mars 2005

Bonsoir Maurice,

Bonsoir le Forum !

Tu trouves pas que ton message est un peu rabougri, ça rend de suite bien plus sympathique, une ptit bonjour et quelques sauts de lignes... M'enfin...

Sinon et bien il suffit de faire comme ceci :

Sub SaveAsWithDate()
Dim MonChemin As String, MonFichier As String

With ThisWorkbook
    MonChemin = .Path 'ou alors en dûr 'C:/mes documents/mes fichiers/'
    MonFichier = Left(.Name, Len(.Name) - 4)
    .SaveAs MonChemin & '/' & MonFichier & Format(Date, '-YYYY-MM-DD')
End With

End Sub

Bonne Soirée (nuit)
@+Thierry

Message édité par: _Thierry, à: 29/03/2005 00:18

nom de fichier avec une date

foucher maurice

Guest

_Thierry

XLDnaute Barbatruc

Discussions similaires