Probleme d appel tableau vba

Version imprimable

28/08/2017, 22h57
tamazir

Probleme d appel tableau vba

Bonsoir
En vba excel 2013, j’ai 4 tableaux dénommés
tableau1(5,6)
tableau2 (5.6)
tableau3(5,6)
tableau4 (5.6)

Dans mon programme c’est le code qui détermine quel tableau utiliser. Ils ne diffèrent que par l’indice 1.2.3 ou 4
Comment faire pour appeler le bon tableau

Merci pour votre aide

Citation:

Envoyé par tamazir

Bonjour,

Si votre code vous donne l'indice dans une variable, avec un code comme celui-là par exemple :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
 
Sub QuelTableauUtiliser(ByVal IndiceTableau As Integer)
 
Dim I As Long
 
Select Case IndiceTableau
           Case 1
                 For I = LBound(tableau1, 1) To UBound(tableau1, 1)
                 '.....
                 Next I
           Case 2
                 For I = LBound(tableau2, 1) To UBound(tableau2, 1)
                 '.....
                 Next I
           Case 3
                 'etc
           Case 4
                ' etc
    End Select
End Sub

Et pour son utilisation :

Code:

1
2
3
4
5
6
7
8
9
 
Sub Essai()
 
Dim MonIndice As Integer
 
    MonIndice = 1
    QuelTableauUtiliser MonIndice
 
End Sub

29/08/2017, 08h34
tamazir

bonjour
super, merci beaucoup , c' est exactement ce qu' il me fallait.
bonne journée à vous