mikael2403
XLDnaute Junior
Bonjour,
Je rencontre une problématique avec une macro.
Je demande à ce qu'un fichier soit enregistré. Il peut être enregistré plusieurs fois par jour.
La problématique que je rencontre c'est que si le fichier est enregistré 1 fois, la 2e fois il va écraser le 1er.
Existe-t-il un moyen de vérifier si un fichier du même nom existe déjà ? si oui, ajouté "- 1" ou "- 2" etc...
Voici mon code :
Il me semble avoir déjà vu sur un forum cette solution mais impossible de la retrouver.
Merci d'avance pour votre aide.
Mikael.
Je rencontre une problématique avec une macro.
Je demande à ce qu'un fichier soit enregistré. Il peut être enregistré plusieurs fois par jour.
La problématique que je rencontre c'est que si le fichier est enregistré 1 fois, la 2e fois il va écraser le 1er.
Existe-t-il un moyen de vérifier si un fichier du même nom existe déjà ? si oui, ajouté "- 1" ou "- 2" etc...
Voici mon code :
Code:
Dim Fichier As String
x = Range("D5").Value
Fichier = Format(Date, "yymmdd") & " - " & x & ".xls"
Sheets("Propale").Copy
ActiveWorkbook.SaveAs Filename:="T:\PROPALE\" & Fichier, _
FileFormat:=xlNormal, Password:="", WriteResPassword:="PROPALE", ReadOnlyRecommended:=True _
, CreateBackup:=False
Il me semble avoir déjà vu sur un forum cette solution mais impossible de la retrouver.
Merci d'avance pour votre aide.
Mikael.