Bonjour,

si quelqu'un pourrait éclairer ma lanterne, car la je mis perd

Je désire sélectionner une plage de cellules dans une colonne, et trier ces cellule dans un ordre croissant

j'ai un message d'erreur 1004 erre dans la sélection

Merci d'avance

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
 
With Workbooks("BdC_CC.xlsm").Sheets("Données")
    .Range("A1:A" & .Range("A" & .Rows.Count).End(xlUp).Row).Select
    Selection.Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal
End With