XL 2016 Macro qui active le filtre sur une ligne de tableau

Sissou71

XLDnaute Occasionnel
Bonjour,

Je cherche une macro qui me permet dans un tableau Excel de positionner le filtre sur la 1ere ligne (sans filtrer de données juste activer le mode filtre sur cette ligne)
Quelqu'un saurait-il m'aider ?
 

Lolote83

XLDnaute Accro
Salut SISSOU71,
Exemple si ta plage est A1:H1
Code:
Sub PoseLesFiltres()
    Range("A1:H1").Select
    Selection.AutoFilter
End Sub
@+ Lolote83
 

job75

XLDnaute Barbatruc
Bonjour Sissou71, Lolote83,

La solution de Lolote83 place/ôte le filtre un coup sur 2.

Pour que le filtre soit toujours présent :
Code:
Sub PlacerFiltreAuto()
ActiveSheet.AutoFilterMode = False
Range("A1:H1").AutoFilter
End Sub
A+
 

job75

XLDnaute Barbatruc
Re,

Si le tableau est organisé en tableau Excel (ListObject) on utilisera :
Code:
Sub PlacerFiltreAuto()
On Error Resume Next
ActiveSheet.ListObjects(1).ShowAutoFilterDropDown = True
If Err Then ActiveSheet.ListObjects(1).Range.AutoFilter
End Sub
A+
 

Sissou71

XLDnaute Occasionnel
Merci à vous. C'est un tableau en utilisant l'onglet tableau par "Mettre sous forme de tableau" donc un objet tableau
Cécile
 

Discussions similaires


Haut Bas