ordonner les onglets

[aleftau]

Bonjour,
je cherche un moyen d ordonner mes onglets facilement dans Excel.
Je transfert des onglets d un document à un autre et lors du transfert je dois systématiquement me coltiner à les réordonner.
Existe t il une fonctionnalité d'ordonnancement plus pratique que le 'glisser/déposer' ?
ou éventuellement un outil externe permettant de gérer cet ordonnancement (car je travaille sur 48 onglets c est un peu pénible!)

MERCI A VOUS MES BIENFAITEURS :woohoo:

 

[Rénato]

Bonjour aleftau,

Voici une petite macro qui trie les onglets dans l'ordre suivant :

1 - Numérique
2 - Lettres majuscules
3 - Lettres minuscules.


Sub Tri_des_onglets()


Dim I As Integer, J As Integer, K As Integer
Dim Calc As Long
Calc = Application.Calculation
Application.Calculation = xlCalculationManual
Application.ScreenUpdating = False
For I = 1 To Sheets.Count
J = I
For K = I + 1 To Sheets.Count
If Sheets(K).Name < Sheets(J).Name Then J = K
Next K
If J <> I Then Sheets(J).Move Sheets(I)
Next I
Application.Calculation = Calc

End Sub

Bien cordialement