Tri et macro

Résolu
Blondy485 Messages postés 71 Date d'inscription   Statut Membre Dernière intervention   -  
via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   -
Est-ce qu’il y a un moyen d’avoir une seule macro TRI pour toutes les feuilles d’un workbook?

Je suis perdu :-(

https://www.cjoint.com/c/IIrwsygKhZl

Merci d'avance

1 réponse

  1. via55 Messages postés 14391 Date d'inscription   Statut Membre Dernière intervention   2 759
     
    Bonsoir

    Oui
    Place cette macro dans un module
    Sub tri()
    
        Columns("A:B").Select
        ActiveWorkbook.ActiveSheet.Sort.SortFields.Clear
        ActiveWorkbook.ActiveSheet.Sort.SortFields.Add2 Key:=Range("A1:A1000") _
            , SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
        With ActiveWorkbook.ActiveSheet.Sort
            .SetRange Range("A1:B1000")
            .Header = xlGuess
            .MatchCase = False
            .Orientation = xlTopToBottom
            .SortMethod = xlPinYin
            .Apply
        End With
    End Sub

    Tu peux lancer ensuite la macro depuis la feuille que tu veux c'est celle-ci sont les colonnes A et B seront triées sur la colonne A

    Cdlmnt
    Via
    0