Bonsoir à tous.
Me revoilà avec mon pb de tri. j'explique ce dont je désire, à savoir faire en VBA Excel dans un tableau (A2: AD'N'; où n représente le nombre de personnel )un tri ascendant sur la colonne A et Décroissant sur la colonne C. J'ai pour cela écrit:
Sub Ordre ()
n = Sheets('Données').Cells(12, 3).Value2
Worksheets('Personnels').Range(Cells(2, 1), Cells(n + 1, 7)).Sort _
Key1:=Worksheets('Personnels').Range(Cells(2, 1)), order1:=xlDescending, _
Key2:=Worksheets('Personnels').Range(Cells(2, 3)), Order2:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, _
MatchCase:=False, Orientation:=xlTopToBottom
End sub
Ainsi posé la procédure ne fonctionne pas ERREUR 1004
par contre si j'écris
Sub odre()
PersDiv = Sheets('Données').Cells(12, 3).Value2 '
Worksheets('Personnels').Range('A2:G38').Sort _
Key1:=Worksheets('Personnels').Range('A2'), order1:=xlDescending, _
Key2:=Worksheets('Personnels').Range(Cells('C2'), Order2:=xlAscending, _
Header:=xlGuess, OrderCustom:=1, _
MatchCase:=False, Orientation:=xlTopToBottom
End Sub
Cela fonctionne ????
je ne comprends pas mon erreur aussi j'en appel à un généreux spécialiste et l'en remercie par avance. Et encore mille excuses si je n'ai pas été aussi explicite lors de mes précedents messages.