Bonjour,

J'ai un problème de version avec mon code pour trier un tableau.

Voici mon code qui fonctionne parfaitement sur Excel 2003, mais qui ne tourne pas sur Excel 2000 :

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
Rows((Range("DEBUT2").Row + 1) & ":" & (Range("FIN2").Row - 1)).Select
 
    Selection.Sort Key1:=Range("H3"), Order1:=xlAscending, Key2:=Range("A3") _
        , Order2:=xlAscending, Key3:=Range("B3"), Order3:=xlAscending, Header:= _
        xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
        DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
        xlSortNormal
    Range("A3").Select
Y a t-il une solution a ce malheureux disfonctionnement ?