@+Thierry

Salut Utna et le Forum

Tu es en train de me dire que Sous XL97 ceci marche :
Sub Macro1()
' Macro1 Macro
' Macro enregistrée le 25/02/03 par Utna
'
Sheets(1).Range("A1").Select
'
Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub


ET PAS CECI : (?)

Sub Macro2()

Sheets(1).Range("A1").Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub

Alors là, je conseille vivement de passer au moins à 2000 ! car j'y perds mon latin !

Bon ben bon courage, car moi je suis assez débordé en ce moment et mes dents m'ont mises dedans quant à mon timing, c'est pour çà qu'on ne me voit pas trop cette semaine encore.

Bonne Soirée
@+Thierry