OVH Cloud OVH Cloud

Documents.Add puis chemin relatif ?

2 réponses
Avatar
Seb
Bonjour je suis en train d'écrire une macro qui me permet d'ouvrir des
modeles de document

Ce qui est bizarre c'est que je n'arrive pas à trouver la façon d'écrire un
chemin relatif.
Au début je mettais mes modeles sous le meme repertoire donc un
Documents.Add(Modele.dot) suffisait
J'ai réorganisé mes modeles : j'ai précisé le répertoire racine dans word
sauf que
quand je fais un Documents.Add(LeNomduDossier\Modele.dot) ca ne marche pas.
J'ai essayé des \, des "", des "/ " ça coince

Quelqu'un aurait la syntaxe correcte ?

Merci d'avance
Seb

2 réponses

Avatar
Corona
Bonsoir Seb,
As-tu essayé ceci ?
Documents.Add Template:="LeNomduDossierModele.dot", NewTemplate:úlse,
DocumentType:=0
Et si a mis tes modèles dans le répertoire par défaut, tu peux connaitre
celui-ci par 'Application.NormalTemplate.Path
Philippe

"Seb" a écrit dans le message de news:
421db528$0$15775$
Bonjour je suis en train d'écrire une macro qui me permet d'ouvrir des
modeles de document

Ce qui est bizarre c'est que je n'arrive pas à trouver la façon d'écrire
un chemin relatif.
Au début je mettais mes modeles sous le meme repertoire donc un
Documents.Add(Modele.dot) suffisait
J'ai réorganisé mes modeles : j'ai précisé le répertoire racine dans word
sauf que
quand je fais un Documents.Add(LeNomduDossierModele.dot) ca ne marche
pas.
J'ai essayé des , des "", des "/ " ça coince

Quelqu'un aurait la syntaxe correcte ?

Merci d'avance
Seb





Avatar
Corona
Mal lu ta question

Sub AjouterModele()
' Exemple pour un modèle se trouvant dans le répertoire "Test" qui
est lui-même un sous-répertoire du répertoire où se trouve les modèles par
défaut
Dim Chemin As String
Chemin = Application.NormalTemplate.Path & "Test"
Documents.Add Chemin & "Test Save.dot" ' ou Documents.Add (Chemin
& "Test Save.dot")
End Sub

Philippe

"Seb" a écrit dans le message de news:
421db528$0$15775$
Bonjour je suis en train d'écrire une macro qui me permet d'ouvrir des
modeles de document

Ce qui est bizarre c'est que je n'arrive pas à trouver la façon d'écrire
un chemin relatif.
Au début je mettais mes modeles sous le meme repertoire donc un
Documents.Add(Modele.dot) suffisait
J'ai réorganisé mes modeles : j'ai précisé le répertoire racine dans word
sauf que
quand je fais un Documents.Add(LeNomduDossierModele.dot) ca ne marche
pas.
J'ai essayé des , des "", des "/ " ça coince

Quelqu'un aurait la syntaxe correcte ?

Merci d'avance
Seb