Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Annuler un tri Manuel

Fouding

XLDnaute Nouveau
Bonjour à tous et meilleurs voeux 2014.

J'ai besoin de votre aide pour réaliser cette petite macro :

1) j'ai appliquer l'option "Filtrer" (ou "Ctrl+Maj+L") sur les colonnes de mon tableau
2) ensuite, manuellement, j'effectue divers tris sur divers colonnes

Comment annuler ces tris pour revenir à ma feuille d'origine, en conservant "l'option filtrer" ?

La solution "ActiveSheet.AutoFilterMode = False" ne me convient pas, puisqu'elle supprime l'option "Filtrer".

Merci d'avance pour votre coup de main.

Bonne fin de journée
 

Jiheme

XLDnaute Accro
Re : Annuler un tri Manuel

Bonjour Fouding, le Forum

Voila ce que j'utilise (grâce aux membres de ce forum)

Application.ScreenUpdating = False
Dim col As Integer
For col = 1 To 33 'nombre de colonnes _ "d_filtrer"
Selection.AutoFilter Field:=col
Next
Application.ScreenUpdating = True
Call ProtegeFeuilles
End Sub

A+
 
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…