Discussion :

[Enjou]

Bonjour à tous,

Je débute sous VB. Mon problème est le suivant :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
ActiveSheet.Range("A1").AutoFilter Field:=1, Criteria1:="Date"
ActiveSheet.Range("A1", [AUcomptuid]).AutoFilter Field:=1, Operator:= _
        xlFilterValues, Criteria1:=Array(1, tab_date(0), tab_date(1), tab_date(2)...tab_date(50))

Comment sélectionner d'un coup toutes les variables de mon tableau de variable prédéfinie sans avoir à coder tous mes tab_date(0), tab_date(1)...tab_date(50) ?
Mon tableau pour l'instant fixe, sera d'une grandeur variable plus tard.

En vous remerciant,

Enjou

[Kimy_Ire]

Bonjour Enjou,

Il me semble que tu as justes à enlever , Criteria1:=Array(1, tab_date(0), tab_date(1), tab_date(2)...tab_date(50)).

Cordialement,
Kimy

[pc75]

Bonjour,

je n'ai peut-être pas bien compris le sens de ta question, mais regarde les fonctions lBound() et uBound().

[Enjou]

Je vous remercie de vos réponses rapides. Je réexplique ma demande plus clairement :

J'ai une feuille de donnée avec 300 000 données environ. Où j'analyse les jours où toutes les données me semble correcte. Je répertorie tous ces jours dans mon tableau de variable. Ce dernier doit me permettre dans ma feuille de donnée, de ne garder que mes jours souhaités.

Donc Kimmy si j'enlève criteria:= Array..... cela ne va rien filtrer dans ma feuille de donner.

@PC 75, la fonction Ibound et Ubound ne servent elles pas à sélectionner les variables les plus élevés et les plus faibles?

En vous remerciant,

Enjou

[pc75]

Re,

Tu peux expliquer plus en détail ce que tu cherches à faire ?

Tu as une variable tableau avec toutes les dates possibles ?
Cette variable va servir à quoi ?
...

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

.AutoFilter Field:=1, Operator:=xlFilterValues, Criteria1:=tab_date