Optimaisation d'un code pour trier.

[khadd]

Bonjour,

je viens de saisir un code pour trier un tableau. Si cela marche, je ne trouve pas ce code très optimisé.

En effet, il reste, lorsque le code est fini, le tableau de selectionné.

Pouvez vous m'aider à l'optimiser et surtout m'aider à comprendre mes erreurs. 😕

With ActiveWorkbook.Worksheets("Annuaire").Sort 'tri croissant des numéros d'agent
.SetRange Range("J9:N1300")
.Header = xlNo
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With

Merci à tous et à toutes

 

[joss56]

Re : Optimaisation d'un code pour trier.

Bonjour,

Sans le fichier, difficile d'être affirmatif mais peut-être qu'en ajoutant
.cells(1).select
juste avant le end with

Bonne journée,

Jocelyn