Aide debutant synthaxe expression et son contraire

[Nicolas]

Bonjour à tous,

Je debute sous excel et je bloque, je m'explique :
Lorsque je lance une nouvelle macro et que je fais mon action, c'est a dire selectionner dans mon champ 19, les lignes ou le critere est egal à 1 (donc filtrer), j obtiens le code suivant :

Selection.AutoFilter Field:=19, Criteria1:="1"

Je voudrais lorsque je clique sur un bouton dans que soit il m affiche tous les champs, soit il ne maffiche que les champs ou le critere est egale à 1.

en gros :
Selection.AutoFilter Field:=19, Criteria1:="1"
est une affirmation et je voudrais un bouton qui puisse afficher le contraire.

Merci

 

[Rai]

Salut Nicolas,

Si j'ai bien tout compris ta question,
tu devrais essayer ce qui suit :

Selection.AutoFilter Field:=19, Criteria1:="<>1"
qui devrait t'afficher tout SAUF 1

Bonne continuation,

Rai

 

[Nicolas]

Merci pour ton aide mais j ai du mal m expliquer.

voici mon instruction :

Selection.AutoFilter Field:=19, Criteria1:="1"

Je lui demande de m'afficher dans le champs 19, les lignes ou le critere est égal à 1.

Mais je voudrais aussi que excel affiche tous mes champs y compris ceux qui corresponde aux critere =1 si le filtre est deja present

en gros, je voudrais affecter à un bouton une macro qui puisse soit m afficher tous mes champs soit filtrer les champs ou le critere =1, mais je narrive pas à l'écrire.

Merci

 

[Dugenou ZopClub]

D'après mes essais avec l'enregistreur de macro je pense qu'il faut écrire :

Selection.autofilter Field:=19

et c'est tout

 

[@+Thierry]

Bonsoir Dugenou, Nicolas

La méthode la plus simple est :

ActiveSheet.ShowAllData

Voici un Sub avec test sur l'autofilter (sinon si il n'y a pas d'autofilter, ShowAllData plante)

Sub FilterShowingAll()
With Sheets("TheSheet")
&nbsp;&nbsp;&nbsp;If .FilterMode = True Then .ShowAllData
End With
End Sub

Bonne Soirée
@+Thierry