Arsena
Messages postés190Date d'inscriptionlundi 24 mars 2003StatutMembreDernière intervention27 septembre 2005 5 déc. 2003 à 17:06
Un pretit exemple
Sub Macro1()
''Trie toute la colonne B par exemple
Range("B:B").Select
Selection.Sort Key1:=Range("B1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom
End Sub