CLASSEMENT FEUILLES

[MFA]

Est il possible de classer les feuilles par ordre aphabétique dans un classeur ?

Merci d'avance

 

[Celeda]

Bonjour,


Si tu vas sur ce fil, tu vas pouvoir récupérer la macro de TriFeuilleV1 que Zon avait faite à l'occasion.











Celeda




Mais au fait, jamais le demandeur de ce post est revenu au moins pour dire merci!!
mais bon on est des gens sympas sur ce forum alors...........the show must go on!!! merci Zon.

 

[Celeda]

Bonjour,

oups trop vite la fille, sorry

le voili, le voilà,

Lien supprimé


Celeda

 

[omicron]

Bonsoir MFA

Tu trouveras ci-joint une petite macro qui te permettra en appliquant la méthode dite de "la bulle", de trier les feuilles d'un classeur (classeur actif).

=====================================================
Private Sub Trier_Feuilles()
For i = 1 To Sheets.Count - 1
For j = 1 To Sheets.Count - i
If Sheets(j).Name > Sheets(j + 1).Name Then Sheets(j).Move after:=Sheets(j + 1)
Next j
Next i
End Sub
=====================================================

Cordialement.

Omicron

 

[MFA]

merci pour la solution proposée que je vais appliquer
étant absent quelques jours je n'ai pas eu le temps de répondre et de remercier.

merci beaucoup