Discussion :

[trane51]

Bonjour,

Je suis confronté à un probleme, je viens de mettre en place un code pour trier par ordre croissant un tableau A>N par rapport à la colonne C.
Le souci est que je ne respecte pas la casse donc il tri la colonne C mais la ligne ne suis pas...
Je pensais qu'il falait mettre MatchCase en True pour que la casse soit respectée mai aparement non...
Y a t-il une âme charitable qui pourrait m'éclairer?

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Voici mon code:
 'Tri par ordre croissant
    Range("C14", "C" & Range("C14").End(xlDown).Row).Select
    Selection.Sort Key1:=Range("C15"), Order1:=xlAscending, Header:=xlGuess, _
    OrderCustom:=1, MatchCase:=True, Orientation:=xlTopToBottom, _
    DataOption1:=xlSortNormal

[mercatog]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
Sub Trier()
Dim LastLig As Long
 
With Sheets("Feuil2") 'A adapter
    LastLig = .Cells(.Rows.Count, "C").End(xlUp).Row
    .Range("A14:N" & LastLig).Sort Key1:=.Range("C14"), Order1:=xlAscending, Header:=xlYes, MatchCase:=True
End With
End Sub

[trane51]

Tout marche très bien merci beaucoup!!