Trier une plage de données variables (résolu)

[Cougar]

Bonjour le forum,

Je cherche comment je peux trier une place de données variable. La cellule de départ n'étant pas toujours la même j'ai essayé ceci :

ActiveWorkbook.Worksheets("Cédule").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Cédule").Sort.SortFields.Add Key:=Range(ActiveCell, ActiveCell.Offset(0, 2).End(xlDown)).Select, SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Cédule").Sort
.SetRange Range(ActiveCell, ActiveCell.Offset(0, 2).End(xlDown)).Select
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With

sans succès.

Comment pourrais-je corriger la situation ?

Merci

 

[job75]

Re : Trier une plage de données variables

Bonsoir Cougar,

On ne sait pas trop ce que vous voulez faire, c'est peut-être ceci :

With ActiveCell.CurrentRegion
  .Sort ActiveCell, xlAscending, Header:=xlYes
End With

Edit : ou bien :

With ActiveCell.CurrentRegion
  .Sort .Columns(3), xlAscending, Header:=xlYes
End With

A+

 

[Usine à gaz]

Re : Trier une plage de données variables

Bonjour le Frum,
Bonjour Cougar,

Ce n'est pas de moi mais peut-être pourriez-vous intégrer cela dans votre macro tri ?

Bonne journée à tous,
Amicalement,
Lionel,

 

[Cougar]

Re : Trier une plage de données variables

Bonjour à vous,

Fonctionne très bien.

Merci encore pour votre aide.

 

[job75]

Re : Trier une plage de données variables

Bonjour,

Fonctionne très bien.

Très bien, et par curiosité quel code utilisez-vous ?

A+