path du fichier modèle

Bonjour le forum.

J'ai un fichier modèle (toto.XLT). J'aimerai quand je dble-clic sur ce modèle et donc génère un nouveau fichier (toto1.XLS) qu'un autre fichier (popol.xls) qui se trouve dans le mème répertoire que le modèle s'ouvre.
Dans workbooks open du fichier modèle j'ai écrit:

Code:

---

Workbooks.Open (ThisWorkbook.Path & "\popol.xls")

---

Ceci marche au poil si j'ouvre le fichier XLT, mais si je génère un fichier basé sur l'xlt j'obtiens une erreur, logique par ailleurs, car le fichier toto1.xls n'est pas encore sauvegardé et donc n'a pas de path.

Sachant que:
- Je ne veux pas sauvegarder le fichier toto1.xls.
- le répertoire où se trouvent toto.xlt et popol.xlt m'est inconnu (modèle destiné à être utilisé sur plusieurs pc)
Comment connaître le path de popol.xls???

En fait ca revient a demander s'il existe un moyen de connaître le path du fichier modèle qui génère un fichier sans le sauvegarder.

Merci d'avance.

bonjour,

Citation:

---

le répertoire où se trouvent toto.xlt et popol.xlt m'est inconnu

---

Citation:

---

J'ai un fichier modèle (toto.XLT). J'aimerai quand je dble-clic sur ce modèle ...

---

comment fais-tu pour double-cliquer dessus si tu ne sais pas où il est :roll:

cordailement,

Didier

Bonjour Ormoth, le forum.

Merci pour ton intérêt. Et désolé, car je me rend compte que mon post n'était pas très clair...
Je me suis mal expliqué:
Evidemment, je connais le répertoire de mon modèle actuellement, mais ce modèle est destiné à être utilisé par d'autres, sur d'autres PC et donc le répertoire peut avoir un path différent de celui qu'il a maintenant pendant que j'écris le code.
Donc je reformule:
- Le fichier toto1.xls ne doit pas être sauvergardé avant que l'utilisateur ne le veuille.
- Lors de l'écriture de mon code, je ne sais pas où va se trouver le modèle quand un utilisateur va double cliquer dessus.
J'espère que c'est plus clair maintenant et que quelqu'un va pouvoir m'aider.
A bientôt!

Bonjour,

Excel ne renseigne pas (contrairement à Word par exemple), la propriété de document : template qui ressort donc vide.

Une piste possible est de la renseigner par macro dans tes modèles. Genre :

Code:

---

1 2 3

Sub EcritInfo() ThisWorkbook.BuiltinDocumentProperties(6) = ThisWorkbook.Path End Sub

---

Elle ressortira dans les classeurs issus du dit modèle, et sera lisible facilement en vba, cf ce code dans fenêtre exécution d’un classeur concerné :

? activeworkbook.BuiltinDocumentProperties(6)


Ou directement bien sûr, sur la feuille menu Fichier – Propiétés – onglet Résumé.


C’est une pirouette, vu que l’écriture n’est pas dynamique, donc à adapter selon ton contexte, sachant que si le modèle est déplacé, l’info devient fausse….donc préférer du genre (l’@ te servant à traiter facile ton string pour ressortir le chemin seul…) :

Code:

---

1 2 3

Sub EcritInfo2() ThisWorkbook.BuiltinDocumentProperties(6) = " non dynamique, écritue perso @" & ThisWorkbook.Path End Sub

---

Tu peux sinon écrire cette info en dur dans ton modèle dans une case « passage » qui servira à l’ouverture de tes .xls et que tu écrases par macro lors de ton traitement etc…

Sachant que le modèle sera installé ici : ???, tu pourrais mettre l'écriture de l'info (case ou properties) dans la macro open de ton modèle, la filtrer pour qu'elle ne fonctionne que sur un .xlt justement, et dans les directives d'installation signaler aux gens qu'il faut ouvrir le modèle lui-même une fois etc....

OK 2003 & 2007

cordialement,

Didier

Bonjour Didier,

Ta réponse m'apprend (et j'adore aprendre!!!) que mon problème n'est pas si trivial qu'il en a l'air.
Par ailleurs mille merci pour les astuces, je pense que ca sera suffisant pour me sortir de l'impasse.

A bientôt!