Remise à zéro après filtre

[pynatha]

Bonsoir à tous,

De retour devant la scène, je souhaiterais pouvoir trouver un moyen (bouton ?) pour remettre à zéro tous les filtres lorsque je fais des recherches dans un tableau.

Suivez cet exemple :

tableau recherche.xlsx

(9.2 Kio) Téléchargé 15 fois

Ici, les filtres permis, déchargement et opérations sont activés, me permettant d'isoler les personnes recherchées.

Je voudrais donc pouvoir "remettre à zéro" l'ensemble des filtres pour effectuer une nouvelle recherche avec des critères différents.

Cordialement,

[Nad]

Bonjour

Avec un petit code :

Code: Tout sélectionner

Sub AfficheTout()
Worksheets("Feuil1").ShowAllData
End Sub

pynatha.xlsm

(16.21 Kio) Téléchargé 8 fois

Amicalement
Nad

[dubois]

Bonjour à tous, bonjour Nad,

ShowAllData déclenche une erreur si les filtres sont déjà libérés,
ajouter cette ligne

Code: Tout sélectionner

Sub AfficheTout()
    On Error Resume Next
    Worksheets("Feuil1").ShowAllData
End Sub

Bonne journée
Claude

[pynatha]

Merci à vous deux pour ces réponses rapides.

En revanche, j'ai dû "rater" le cours concernant la création du bouton de commande et la liaison ad-hoc vers la macro...

Pourriez-vous éclairer ma lanterne plutôt faiblarde ?

Cordialement,

Pynatha