Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

répertoires

guima1642

XLDnaute Occasionnel
bonjour,

Pb dans l'enregistrement :
j'ai un fichier référence qui s'appelle "exp" que je sauve dans un répertoire sauvegarde jusque là c'est bon,

Code:
    Nom = Range("o2").Value
    chemin = ActiveWorkbook.Path & "\sauvegarde\" + Nom + " _exp.xls"
    ActiveWorkbook.SaveAs Filename:=chemin, FileFormat:=xlNormal, _
        password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False

Mon pb est de revenir dans le fichier initial "exp" qui se trouve dans le répertoire au dessus de sauvegarde

Code:
 Nom = "exp.xls"
    chemin = [COLOR="Red"]ActiveWorkbook.Path [/COLOR]& "\" + Nom + "
    ActiveWorkbook.SaveAs Filename:=chemin, FileFormat:=xlNormal, _
        password:="", WriteResPassword:="", ReadOnlyRecommended:=False, _
        CreateBackup:=False

en rouge ce que je pense devoir changer pour ne plus être dans sauvegarde.
 
G

Guest

Guest
Re : répertoires

bonjour,

Regardes du côté de 'SaveCopyAs(Filename)' dans l'aide excel, tu verras que cette méthode ne modifie pas le fichier ouvert mais en enregistre une copie.

A+
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…