Tri alpha debut macro puis suppression du tri en fin de macro

[samimi94]

Bonsoir le forum,

J'ai une question qui peu paraitre étrange, mais je me lance.
J'ai un fichier qui contient un filtre avec des données masquées.

Je souhaite executer une macro qui prend en compte ces données.
Pour que cela fonctionne j'ai décidé de faire un tri pour afficher mes données avant de lancer la macro.

Je souhaiterai savoir s'il est possible de faire au tout début de l'execution de la macro un tri par ordre alphabétique puis remettre mon fichier comme avant en supprimant le tri et en masquant de nouveau mes données masquées.

Voici ce que j'ai mis au début du code via l'enregistreur de macro :

ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Feuil1").Sort.SortFields.Add Key:=Range("B12"), _
        SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Feuil1").Sort
        .SetRange Range("A13:AA75")
        .Header = xlNo
        .MatchCase = False
        .Orientation = xlTopToBottom
        .SortMethod = xlPinYin
        .Apply
    End With

Par avance, merci et bonne soirée.

 

[Pierrot93]

Re : Tri alpha debut macro puis suppression du tri en fin de macro

Bonjour,

peut être rajouter une colonne à ton tableau en numérotant les lignes... La macro fera son tri puis ses actions et tu pourras terminer ensuite par un tri sur la colonne supplémentaire que tu as rajouté au départ.... Maintenant sans plus de détails, en autre pourquoi ce tri, difficile de t'en dire plus...

bonne journée
@+