enregistrement d'un fichier excel

Angelo7891 · 3 Avril 2006

bonjour le forum,

j'ai un petit probleme

deja j'explique la situation:
j'ai un dossier excel contenant un fichier (fichier1.xls) + un autre dossier Sauvegarde

j'aimerai sauvegarder via une macro le fichier.xls dans le dossier Sauvegarde sous le nom Reporting du + la date du jour

pour le moment j'ai fais ce code :

Code:

Sub Enregistrer()
 
 Jour = Day(Now)
 Mois = Month(Now)
 Année = Year(Now)
 ActiveWorkbook.SaveAs Filename:='Sauvegarde\\Reporting du ' & Jour & -Mois & -Année & '.xls', FileFormat:= _
    xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False _
    , CreateBackup:=False
End Sub

mais il me dis impossible d'acceder au fichier

comment régler ce probleme ?

globinours · 3 Avril 2006

Bonjour Angelo,
Il faut que tu indique plus précisément ton chemin d'accès:
C:\\...........

pierrejean · 3 Avril 2006

bonjour angelo

à mon avis et sans avoir testé:
les -Mois et -Année ne doivent pas passer
il vaudrait mieux & '-' & Mois etc
Par ailleurs je mettrais le chemin complet pour plus de sureté

Angelo7891 · 3 Avril 2006

J'ai suvie vos conseil et intégrer une varaible
chemin pour récupérer le chemin complet
ca donne ca :

Code:

Sub Enregistrer()
  
 Jour = Day(Now)
 Mois = Month(Now)
 Année = Year(Now)
 chemin = ActiveWorkbook.Path

 ActiveWorkbook.SaveAs Filename:=chemin & '\\Sauvegarde\\Reporting du ' & Jour & -Mois & -Année & '.xls', FileFormat:= _
   xlNormal, Password:='', WriteResPassword:='', ReadOnlyRecommended:=False _
    , CreateBackup:=False
End Sub

ca semble marcher

@Pierrejean les - mois - Année passent tres bien 😉

enregistrement d'un fichier excel

Angelo7891

Guest

globinours

XLDnaute Junior

pierrejean

XLDnaute Barbatruc

Angelo7891

Guest

Discussions similaires

enregistrement d'un fichier excel

Angelo7891

Guest

globinours

XLDnaute Junior

pierrejean

XLDnaute Barbatruc

Angelo7891

Guest

Discussions similaires

Privacy & Transparency

Privacy & Transparency