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).
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