Bonjour à tous,
Mon idée de base était de pouvoir trier, grâce à une macro, les valeurs contenues d’une colonne par ordre alphabétique. Grace à votre forum, j’ai cette macro qui me permet de trier correctement ma colonne B par ordre alphabétique.(voir la macro ci-dessous).
Mon problème est que les informations des lignes qui sont associées à ma colonne B (de la colonne C à M) ne se réorganisent et ne suivent pas avec le tri par ordre alphabétique de la colonne B.
Puisqu’un exemple est toujours plus parlant, je vous propose de visionner mon souci :
Imaginons mes données de départ :
colonne B colonne C ....
2 -------> 😉
3 -------> 🙁
1 -------> 😀
après le tri de ma macro j'ai :
colonne B colonne C ....
1 -------> 😉
2 -------> 🙁
3 -------> 😀
Or je souhaiterais :
colonne B colonne C ....
1 -------> 😀
2 -------> 😉
3 -------> 🙁
Voilà un super exemple (fictif bien sur)
Je vous remercie d’avance pour votre aide
VOICI LA MACRO POUR LE TRI PAR ORDRE ALPHABETIQUE :
Sub trier()
Range("B22:B110").Select
Selection.Sort Key1:=Range("B22"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Merci encore !
Mon idée de base était de pouvoir trier, grâce à une macro, les valeurs contenues d’une colonne par ordre alphabétique. Grace à votre forum, j’ai cette macro qui me permet de trier correctement ma colonne B par ordre alphabétique.(voir la macro ci-dessous).
Mon problème est que les informations des lignes qui sont associées à ma colonne B (de la colonne C à M) ne se réorganisent et ne suivent pas avec le tri par ordre alphabétique de la colonne B.
Puisqu’un exemple est toujours plus parlant, je vous propose de visionner mon souci :
Imaginons mes données de départ :
colonne B colonne C ....
2 -------> 😉
3 -------> 🙁
1 -------> 😀
après le tri de ma macro j'ai :
colonne B colonne C ....
1 -------> 😉
2 -------> 🙁
3 -------> 😀
Or je souhaiterais :
colonne B colonne C ....
1 -------> 😀
2 -------> 😉
3 -------> 🙁
Voilà un super exemple (fictif bien sur)
Je vous remercie d’avance pour votre aide
VOICI LA MACRO POUR LE TRI PAR ORDRE ALPHABETIQUE :
Sub trier()
Range("B22:B110").Select
Selection.Sort Key1:=Range("B22"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
End Sub
Merci encore !