Savecopyas dossier courant?

adinnn · 17 Novembre 2009

Bonjour,

question stupide:

est-il possible avec la fonction savecopyas de faire une copy de la feuille mais dans le dossier ou le fichier se trouve?

Workbooks("Model.xlsm").SaveCopyAs ("c:\test\" & Sheets("feuil1").Range("b5").Text & ".xlsm")

Merci!

jp14 · 17 Novembre 2009

Re : Savecopyas dossier courant?

Bonsoir

ThisWorkbook.Path permet de connaitre le sous répertoire ou se trouve le fichier.
Pour l'exploiter lors d'une sauvegarde il faut écrire ThisWorkbook.Path & "\" .

Workbooks("Model.xlsm").SaveCopyAs (ThisWorkbook.Path & "\" & Sheets("feuil1").Range("b5").Text & ".xlsm")

A tester

JP

coco_lapin · 17 Novembre 2009

Re : Savecopyas dossier courant?

Bonjour adinnn et le forum,

Tu peux utiliser ActiveWorkbook.Path pour trouver le chemin du classeur actif.

Bonjour jp14, je vois que tu a été plus rapide que moi de quelques secondes.

adinnn · 17 Novembre 2009

Re : Savecopyas dossier courant?

Haaaa Merci à vous 2, c'est en plein ce que je cherchais!

Savecopyas dossier courant?

adinnn

XLDnaute Occasionnel

jp14

XLDnaute Barbatruc

coco_lapin

XLDnaute Impliqué

adinnn

XLDnaute Occasionnel

Discussions similaires

Savecopyas dossier courant?

adinnn

XLDnaute Occasionnel

jp14

XLDnaute Barbatruc

coco_lapin

XLDnaute Impliqué

adinnn

XLDnaute Occasionnel

Discussions similaires

Privacy & Transparency

Privacy & Transparency