TOP

Trier les feuilles d'un livre

Description

Si le nombre d'onglets de votre livre approche plusieurs dizaines, tôt ou tard il y aura une envie de mettre en œuvre trier les feuilles dans un livre , en les plaçant par ordre alphabétique. Les outils standard Excel ne vous permettent pas de faire cela, écrivons donc une macro simple qui le fera.


Code VBA pour la macro

Ouvrir le menu Service - Macro - Editeur Visual Basic (Tools - Macro - Visual Basic Editor) , insérer le module VBA (menu Insert - Module ) et copiez-y ce texte :

Sub SortSheets()
  'moonexcel.com.ua
  Dim I As Integer, J As Integer

    For I = 1 To Sheets.Count - 1
        For J = I + 1 To Sheets.Count
            If UCase(Sheets(I).Name) > UCase(Sheets(J).Name) Then
                Sheets(J).Move Before:=Sheets(I)
            End If
        Next J
    Next I
    
    MsgBox " Les onglets ont été triés de A à Z "
End Sub

Cette macro peut maintenant être exécutée depuis le menu Service - Macros - Macros (Tools - Macro - Macros) , et il triera rapidement toutes les feuilles du classeur actuel.

Articles sur le sujet :