Problème VBA (création de multi variable)

Version imprimable

09/05/2012, 19h36
vanessa B

Problème VBA (création de multi variable)
Bonjour à tous et à toutes ;-)

Voila, j'ai un petit problème VBA...

Je dois pouvoir charger une liste de données dans une seule variable (une sorte de multi variable) pour pouvoir réutiliser ces données comme filtres sur une autre feuille excel...
ex:
cell F3: 101010:jean
cell F4: 101011:paul
cell F5: 101012:max
Le nombre de ligne est variable.

puis pouvoir filtrer:
Code:

1 2 ActiveSheet.Range("$A$1:$T$10000").AutoFilter Field:=11, Criteria1:= _ "<>101010:jean", Operator:=xlOr, Criteria2:="<>101011:paul"", Operator:=xlOr, Criteria3:="<>101012:max"
J'ai l'habitude de travailler sous SAS : il s'agirait de construire une macrovariable du style "call symput" dans une boucle.

Je ne sais vraiment pas comment faire en VB si l'un de vous peut m'aider c'est super!!!

Merci d'avance et bonne soirée

Bonsoir,

Un tableau de tableaux peut être ? Un petit exemple :

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
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
 
Sub Tablo()
 
    Dim TBLPrincipal()
    Dim TBL_1()
    Dim TBL_2()
    Dim TBL_3()
 
    'dimensionne les tableaux
    'peuvent être redimesionnés avec Preserve
    'si ils contiennent déjà des valeurs
    ReDim TBLPrincipal(1 To 3)
    ReDim TBL_1(1 To 3)
    ReDim TBL_2(1 To 3)
    ReDim TBL_3(1 To 3)
 
    'alimente les tableaux
    TBL_1(1) = "TBL_1 valeur 1"
    TBL_1(2) = "TBL_1 valeur 2"
    TBL_1(3) = "TBL_1 valeur 3"
 
    TBL_2(1) = "TBL_2 valeur 1"
    TBL_2(2) = "TBL_2 valeur 2"
    TBL_2(3) = "TBL_2 valeur 3"
 
    TBL_3(1) = "TBL_3 valeur 1"
    TBL_3(2) = "TBL_3 valeur 2"
    TBL_3(3) = "TBL_3 valeur 3"
 
    'les stockent dans le tableau principal
    TBLPrincipal(1) = TBL_1()
    TBLPrincipal(2) = TBL_2()
    TBLPrincipal(3) = TBL_3()
 
    'retourne certaines valeurs
    Debug.Print TBLPrincipal(1)(3)
    Debug.Print TBLPrincipal(2)(2)
    Debug.Print TBLPrincipal(3)(1)
 
End Sub

Hervé.

11/05/2012, 16h39
vanessa B

Un grand merci Hervé, très bonne piste!
ABonne continuation