Macro Word depuis Excel avec tableau comme argument

Bonjour,

Je souhaite à partir d'une feuille Excel créer un fichier Word.
Pour cela, sous Excel, dans une même Sub j'ai déclaré un tableau

Code:

---

tableau (500,3) As Variant

---

que je remplis comme je souhaite. Pas de problème.
Je lance ensuite ma macro Word va en Excel y mettant 5 paramètres dont ce tableau.

Code:

---

wrdApp.Run "macro_word",param1,param2,...,tableau

---

Word récupère bien les paramètres 1 à 4 qui sont des variables de type Long ou String. Pas de souci.
En revanche, il ne récupère pas les valeurs contenues dans tableau, celui-ci est vide.

Code:

---

1 2	Sub macro_word (param1 as Long,..., tableau As Variant) Msgbox tableau (1,1) & " " & tableau (20,3)

---

ne me renvoie rien alors que ce tableau est bien rempli sous Excel.
Je n'ai rien trouvé qui puisse m'aider sur internet. Auriez vous une idée de mon erreur?
Très cordialement.

Bonjour,
Il serait préférable d'afficher le code complet (avec les balises) de la procédure que tu utilises (j'imagine que cela ne doit pas faire plus de 20 lignes d'après ce que tu décris) et de dire les lignes qui posent problèmes.

Pour passer une table comme argument à une procédure, tu peux passer la variable directement
Petit exemple ci-dessous

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13

Sub Test() Dim maTable() maTable = Range("A1").CurrentRegion dMatable maTable End Sub Sub dMatable(t()) Dim Elem1 As Long, elem2 As Integer For Elem1 = 1 To UBound(t, 1) For elem2 = 1 To UBound(t, 2) Debug.Print t(Elem1, elem2) Next Next End Sub

---

Merci pour réponse claire et précise.
Cela a bien répondu à mon problème.