Execution d'une macro Word avec passage de parametre à partir d'une macro Excel

Bonjour à tous,
Je souhaite exécuter une macro Word avec passage de parametres à partir d'une macro Excel.
Mon problème est que j'arrive à exécuter la macro word sans le passage de parametre mais dès que j'essaie de lui passer un parametre j'obtiens l'erreur :

"Erreur d'éxecution '483'
Propriété ou methode non gérée par cet objet"

Alors que l'éditeur m'indique que je peux ajouter des parametres !!!

Voici ma macro Excel :

Code:

---

1 2 3

Public Sub Macro_Executer(WordApp As Word.Application, document$, module$, macro$, Optional parametre1$ = "") WordApp.Run document$ + module$ + "." + "!" + macro$, parametre1$ End Sub

---

et ma macro word :

Code:

---

1 2 3

Public Sub TexteMasque_Ajouter(Texte$) MsgBox Texte$ End Sub

---

SVP aidez mais, je suis coincé et sans ça je ne peux pas avancer :(
Merci

Bonjour,

Personellement ca bloque lorsque j'insere le nom du fichier dans le chemin,
mais les syntaxes suivantes fonctionnent correctement:

Code:

---

1 2 3 4 5 6 7 8

Dim Parametre As String   Parametre = "bonjour"   WdApp.Run "MacroLanceParExcel", Parametre   WdApp.Run "Module1.MacroLanceParExcel", Parametre

---

Cordialement,

Tirex28/

bonsoir


Refait un essai en plaçant la procédure Word dans le module objet ThisDocument:

Code:

---

1 2 3

Sub TexteMasque_Ajouter(Texte$) ThisDocument.Range.Text = Texte$ End Sub

---

michel

Merci pour votre aide precieuse, à present le passage de parametre entre mes macros fonctionne.