K khadd XLDnaute Nouveau 19 Février 2016 #1 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
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
J joss56 XLDnaute Accro 19 Février 2016 #2 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 Vote positif 0 Vote négatif
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