Tri et macro

Résolu/Fermé
Blondy485 Messages postés 69 Date d'inscription lundi 4 avril 2016 Statut Membre Dernière intervention 30 octobre 2020 - 18 sept. 2019 à 00:18
via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 - 18 sept. 2019 à 01:24
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
A voir également:

1 réponse

via55 Messages postés 14403 Date d'inscription mercredi 16 janvier 2013 Statut Membre Dernière intervention 24 avril 2024 2 703
18 sept. 2019 à 01:24
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