Enlever filtres automatiquement

gourdin · 14 Septembre 2009

Bonjour,

Après après filtré plusieurs colonnes avec les filtres automatiques
existe t-il une une procédure rapide (par macro sans avoir à spécifier toutes les colonnes) pour que chaque colonne ne soient plus filtrée (remettre tous les filtres de chaque colonne à "tous")

Merci

Dull · 14 Septembre 2009

Re : Enlever filtres automatiquement

Salut Gourdin, le Forum

peut-être le plus simplement du monde

Code:

ActiveSheet.[A1].AutoFilter

Éventuellement à la commande d'un bouton et Si c'est la feuille active

Edtion: Salut Jean-Marcel
Bonne Journée

gourdin · 14 Septembre 2009

Re : Enlever filtres automatiquement

Merci à vous 2,

Les 2 solutions fonctionnent merci

PS :
Solution 1 : Sheets("Feuil1").ShowAllData
Fonctionne bien mais j'aurais voulu que celà fonctionne même quand il n'y a pas déjà colonne filtrée. Et dans ce cas là un message de débogage arrive

kjin · 14 Septembre 2009

Re : Enlever filtres automatiquement

Bonjour,

Code:

ActiveSheet.AutoFilterMode = False

A+
kjin

gourdin · 14 Septembre 2009

Re : Enlever filtres automatiquement

Merci à tous

J'ai opté pour la solution la plus courte

Enlever filtres automatiquement

gourdin

XLDnaute Impliqué

Dull

XLDnaute Barbatruc

gourdin

XLDnaute Impliqué

kjin

XLDnaute Barbatruc

gourdin

XLDnaute Impliqué

Discussions similaires