[VBA-E]paramètre fonction et tableau

Bonjour,

je réalise une macro avec des tableaux. Ces tableaux sont nommés comme ceci :

Citation:

---

tablo1
tablo2
tablo3
....

---

En fait je voudrais faire une boucle for qui prenne en compte tous mes tableaux comme par exemple :

Code:

---

1 2 3 4 5

Dim i as integer For i=1 to 3 call procedure(tablo & & i) Next

---

Mais ca ne marche pas. Je voudais mettre en paramètre mon nom de tableau suivi du numéro d'incrémentation.

Quelqu'un peut-il m'aider.

Merci d'avance

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24

Option Explicit Option Base 1   Sub tablo() Dim tab1(100) As Double Dim tab2(100) As Double Dim tab3(100) As Double Dim metab As New Collection Dim incr As Variant Randomize For incr = 1 To 100 tab1(incr) = Rnd() tab2(incr) = Rnd() tab3(incr) = Rnd() Next incr metab.Add (tab1) metab.Add (tab2) metab.Add (tab3) For Each incr In metab Debug.Print incr(40) Next incr End Sub

---