XL 2010 Trier les sheets d'un classeur selon le contenu d'une case

fattah_5791

XLDnaute Occasionnel
Bonjour à toutes & à tous,

merci de m'aider à trier les feuilles d'un classeur excel selon une case bien précise (ici dans mon exemple la case K7).
j'ai un applicatif sous excel (avec macros) qui traite les données des fichiers excel (voir exemple en PJ) mais j ai un petit probleme: les fichiers en questions se composent de plusieurs sheets que je désire les classer selon le contenu de leurs cases K7 (ordre croissant).

Rq: chaque classeur reçu contient au moins sheet

Cordialement
 

Pièces jointes

  • 3ASCG.xls
    145.5 KB · Affichages: 35

phlaurent55

Nous a quittés en 2020
Repose en paix
Bonjour fattah,

avec ce code:

Code:
Sub Trier()
Application.ScreenUpdating = False

tri:
For j = 1 To Sheets.Count - 1
If Sheets(j).[K7] > Sheets(j + 1).[K7] Then
Sheets(j).Move After:=Sheets(j + 1)
GoTo tri
End If
Next j

Application.ScreenUpdating = True
End Sub

à+
Philippe
 
Dernière édition:

Discussions similaires