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

Réponse 1 / 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
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
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

Remplir une cellule (texte) en fonction d'une autre (texte).
SOMUM -
SOMUM -

4 réponses
Excel : colorer une cellule sous condition d'une autre ?
KAKEPATHEL -
Pascal -

15 réponses
Excel : Remplir une cellule en fonction d'une autre
Alexisarnx -
votre psychiatre -

3 réponses
[Excel 2010] Remplir cellule d'après contenu d'une autre
nlbmoi -
amelie -

8 réponses
colorer une cellule en fonction de la valeur d'une autre cellule
simonngangue -
Hcc -

4 réponses