j'aimerai savoir comment faire en VB pour utiliser la commande autofilter
afin qu'elle me cache les filtres de tout une plage en une fois.
genre un truc comme ça :
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme
ça dont j'aurai besoin.
Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire
disparaître mes 20 filtres...c'est pas très élégant...
En mode enregistrement c'est la commande Données/Filtre/Filtre automatique. Ce qui génère la ligne Selection.AutoFilter qui affiche ou masque. Eventuellement remplacer Selection par un Range.
Camille
-----Message d'origine----- Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la commande autofilter
afin qu'elle me cache les filtres de tout une plage en une fois.
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme
ça dont j'aurai besoin. Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire
disparaître mes 20 filtres...c'est pas très élégant...
Merci pour vos réponses.
Gabriel
.
Bonjour,
En mode enregistrement c'est la commande
Données/Filtre/Filtre automatique.
Ce qui génère la ligne Selection.AutoFilter qui affiche ou
masque. Eventuellement remplacer Selection par un Range.
Camille
-----Message d'origine-----
Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la
commande autofilter
afin qu'elle me cache les filtres de tout une plage en
une fois.
En mode enregistrement c'est la commande Données/Filtre/Filtre automatique. Ce qui génère la ligne Selection.AutoFilter qui affiche ou masque. Eventuellement remplacer Selection par un Range.
Camille
-----Message d'origine----- Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la commande autofilter
afin qu'elle me cache les filtres de tout une plage en une fois.
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme
ça dont j'aurai besoin. Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire
disparaître mes 20 filtres...c'est pas très élégant...
Merci pour vos réponses.
Gabriel
.
Denis Michon
Bonjour Gabriel,
Si tu veux cacher tous les boutons du filtre automatique sur ta plage (ligne d'étiquettes) de tes données lorsque le filtre automatique est actif, essaie ceci :
'---------------------------------- Sub FiltreSansBoutonDuFiltre()
Dim Rg As Range, A As Integer
'À définir selon la disposition de tes données Set Rg = Worksheets("Feuil1").Range("C4").CurrentRegion
With Rg For A = 1 To Rg.Columns.Count .AutoFilter field:=A, visibleDropDown:úlse Next .AutoFilter field:=1, Criteria1:="Toto" End With End Sub '----------------------------------
Salutations!
"Gabriel" a écrit dans le message de news: Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la commande autofilter afin qu'elle me cache les filtres de tout une plage en une fois. genre un truc comme ça :
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme ça dont j'aurai besoin. Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire disparaître mes 20 filtres...c'est pas très élégant...
Merci pour vos réponses.
Gabriel
Bonjour Gabriel,
Si tu veux cacher tous les boutons du filtre automatique sur ta plage (ligne d'étiquettes) de tes données lorsque le filtre
automatique est actif, essaie ceci :
'----------------------------------
Sub FiltreSansBoutonDuFiltre()
Dim Rg As Range, A As Integer
'À définir selon la disposition de tes données
Set Rg = Worksheets("Feuil1").Range("C4").CurrentRegion
With Rg
For A = 1 To Rg.Columns.Count
.AutoFilter field:=A, visibleDropDown:úlse
Next
.AutoFilter field:=1, Criteria1:="Toto"
End With
End Sub
'----------------------------------
Salutations!
"Gabriel" <gabriel@nospam.com> a écrit dans le message de news:um8VKFXvDHA.3468@TK2MSFTNGP11.phx.gbl...
Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la commande autofilter
afin qu'elle me cache les filtres de tout une plage en une fois.
genre un truc comme ça :
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme
ça dont j'aurai besoin.
Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire
disparaître mes 20 filtres...c'est pas très élégant...
Si tu veux cacher tous les boutons du filtre automatique sur ta plage (ligne d'étiquettes) de tes données lorsque le filtre automatique est actif, essaie ceci :
'---------------------------------- Sub FiltreSansBoutonDuFiltre()
Dim Rg As Range, A As Integer
'À définir selon la disposition de tes données Set Rg = Worksheets("Feuil1").Range("C4").CurrentRegion
With Rg For A = 1 To Rg.Columns.Count .AutoFilter field:=A, visibleDropDown:úlse Next .AutoFilter field:=1, Criteria1:="Toto" End With End Sub '----------------------------------
Salutations!
"Gabriel" a écrit dans le message de news: Bonjour,
j'aimerai savoir comment faire en VB pour utiliser la commande autofilter afin qu'elle me cache les filtres de tout une plage en une fois. genre un truc comme ça :
AutoFilter field:="1:20" ne vas pas bien sûr, mais c'est quelquechose comme ça dont j'aurai besoin. Je ne veux pas écrire dans le code 20 lignes à chaque fois pour faire disparaître mes 20 filtres...c'est pas très élégant...
