[planning excel]classer les onglets par ordre alphabétique

Bonjour,

Dans ce topic, Eriiic m'a donné les solutions nécessaires à l'élaboration de mon planning.

Cependant, un soucis (mineur) demeure.

comment puis-je classer mes onglets par ordre alphabétique ?

merci d'avance

Salut,

Un code trouvé sur le net (mais il fonctionne )

Option Explicit

Sub TriDesOnglets()
Dim i As Integer, j As Integer

For i = 1 To Sheets.Count
    For j = i + 1 To Sheets.Count
        If UCase(Sheets(i).Name) > UCase(Sheets(j).Name) Then Sheets(j).Move before:=Sheets(i)
    Next j
Next i
End Sub

Cordialement

un grand merci !!

bonne journée !