Sub footligue1()
'
' footligue1 Macro
' Macro enregistrée le 08/07/2010 par Giorgios
'
' Touche de raccourci du clavier: Ctrl+w
'
Sheets("L1").Select
Range("b1:k21").Select
Selection.Sort Key1:=Range("d2"), Order1:=xlDescending, Key2:=Range("k2") _
, Order2:=xlDescending, Key3:=Range("i2"), Order3:=xlDescending, Header _
:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
Range("b1").Select
End Sub
Bonjour à tous
le fichier ne contient qu'un seul bout de code dans le module 7
................. et celui-là fonctionne correctement lorsque je l'ouvre avec Excel 2007
à+
Philippe
Édit: Bonjour Staple
Bonsoir le fil
giorgios, je t'ai mis en PJ la démarche à suivre (succession d'impressions écran à suivre en pas à pas)
Bonne soirée/nuit,
mth