retablir au deuxieme clic

[kinder53]

bonjour ,
voilà je souhaiterais savoir quel code inserer dans une macro pour annuler l'action, retablir si on clic une deuxieme fois sur le bouton

bon Dimanche
merci

 

[Guest]

Re : retablir au deuxieme clic

Bonjour Kinder,

Ce n'est pas un tri mais un filtre.

Sub trie()
'
' trie Macro
' Macro enregistrée le 11/07/2010 par kinder
'
   If ActiveSheet.FilterMode Then
        ActiveSheet.ShowAllData
   Else
    Selection.AutoFilter Field:=1, Criteria1:="<>0", Operator:=xlAnd
   End If
End Sub

A+

 

[kinder53]

Re : retablir au deuxieme clic

rebonjour Hasco,

merci à toi ca marche nickel