Bonjour
J'ai fait une macro pour trier par rapport à deux colonnes.
Je voudrai savoir si je peux faire le trie par rapport à un nom de colonne et non par par rapport a ça réf:
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7 Sub Tri() [A1].CurrentRegion.Sort _ Key1:=[H1], Order1:=xlAscending, _ Key2:=[A1], Order2:=xlAscending, _ Header:=xlYes End Sub
Dans mon code j'ai mis comme premiere trie H1.Dans mon tableau en H1 il y a le nom de la colonne qui est "offer" Donc je pensai faire ça:
car la col Offer ne se trouve pas toujour en H.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12 Sub Tri() nbColonnes = Cells.Find("*", Range("A1"), , , xlByColumns, xlPrevious).Column Dim coloffer As Integer For i = 1 To nbColonnes If Cells(1, i).Text = "Offer" Then coloffer = i Next i [A1].CurrentRegion.Sort _ Key1:=[cells(1,coloffer)], Order1:=xlAscending, Key2:=[A1], Order2:=xlAscending, _ Header:=xlYes End Sub
Merci
Alban
Partager