Classement feuilles ordre alpha dans classeur

Bonjour,

Je voudrais connaître la manip pour classer les feuilles dans un classeur dans l'ordre chrono ou alphabétique, sans les déplacer une par une

Merci beaucoup

Alex33

Bonjour,

Essaie ce code :

Sub TrierFeuilles()
'Macro Dan pour alex33 le 28/11/2010
Dim WS As Worksheet
Dim I As Byte
Application.ScreenUpdating = False
For Each WS In thisWorkbook.Sheets
For I = 2 To ThisWorkbook.Sheets.Count
If Sheets(I - 1).Name > Sheets(I).Name Then
Sheets(I - 1).Move After:=Sheets(I)
End If
Next
Next
End Sub

Code à associer éventuellement à un bouton ou à exécuter par Outils / Macro / Macro et sélectionner la macro puis cliquer sur le bouton "Exécuter"

Si ok, n'oublie pas ce cliquer sur le V vert pour cloturer le fil..

Amicalement

Bonsoir,

J'arrive à mettre mes feuilles en surbrillance et après j'ai visual basic et là je suis larguée , mes connaissances sont trop petites , je ne sais pas aller au bout et l'anglais pas trop non plus

merci quand même

re,

J'arrive à mettre mes feuilles en surbrillance...

Pas sur d'avoir compris le pb mais bon je suppose que le souci est pour placer le code.

• ALT + F11 pour aller dans VBA
• Menu Insertion et choisir Module
• coller le code que j'ai donné ci-avant
• fermer VBA

Ensuite pour exécuter le code, aller dans Outils / Macro / macro puis sélectionne le code et clique sur "Exécuter"

Edit de Nad : sous 2007, aller dans l'onglet Développeur==> Macro puis sélectionne le code et clique sur "Exécuter"

Si tu ne vois pas l'onglet Développeur, Bouton OFFICE ==> Options excel - coche "Afficher l'onglet Développeur dans le ruban"

Amicalement