Enregistrer en fonction d'une cellule

remman -  
 Paf -
Bonjour,

je souhaiterai enregistrer mon fichier dans un dosier spécifique en fonction d'une cellule.
Ma cellule D5 comporte le nom du sous dossier ou je souhaiterais enregistrer mon fichier et ce sous dossier ce trouve dans un dossier fixe.

j'ai essayé ceci :
Do
ActiveSheet.SaveAs Filename:="C:\Documents and Settings\martin\Bureau\martinf\Maintenance\" & Range("D5").Value & Sheets(2).Name & ".xls"

Mais ca fonctionne pas.

pouvez vous m'aider?

Merci d'avance

1 réponse

  1. Paf
     
    bonjour

    Qu'est ce qui ne marche pas? Y a-il un message d'erreur?

    Peut-être,si Range("D5").Value contient le nom du sous dossier, il faudrait écrire: 
    ActiveSheet.SaveAs Filename:="C:\Documents and Settings\martin\Bureau\martinf\Maintenance\" & Range("D5").Value  & "\" & Sheets(2).Name & ".xls"


    A+
    0
    1. remman
       
      Merci pour ta réponse, mais j'ai toujours le même soucis, ca ne me l'enregistre pas dans mon sous dossier.
      0
    2. Paf
       
      Re
      je m'étais focalisé sur la définition du chemin, mais c'est le classeur que tu enrégistre ( et pas la feuille) donc il faut utiliser : 

      ActiveWorkbook.SaveAs ......
      Bonne suite
      0

Discussions similaires

Excel : Remplir une cellule en fonction d'une autre
Alexisarnx -
votre psychiatre -

3 réponses
Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses
Excel ajustement auto taille de la cellule
Mélanie -
Elisabeth -

22 réponses
excel fractionner une cellule horizontalement
jalil -
barbiy -

5 réponses