P
pitchoune85
Guest
bonjour.
j'ai une nvelle fois besoin de votre aide :
j'ai un tableau que j'ai nommé école.
la dernière ligne est vide et me sert à inserer d'autres lignes au dessus afin de rentrer de nvx élèves.
j'ai deux boutons qui me permettent soit de trier ma liste par ordre alpha (colonne a), soit de la trier par classe (colonne c) puis par alpha (colonne a).
La deuxième fonctionne parfaitement, ie que même s'il y a des lignes vides à la fin du tableau, elles restent en bas ; mais le tri alpha me met les lignes vides en haut ET CA JE NE VEUX PAS :evil: : il faut qu'elles restent en bas : voici ma macro :
Sub tri_alpha_ecole()
Range('ECOLE').Select
selection.Sort Key1:=Range('A25'), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range('A25').Select
End Sub
si quelqu'un avait une solution a me proposer, ca serait vraiment EXCELlent.
j'ai une nvelle fois besoin de votre aide :
j'ai un tableau que j'ai nommé école.
la dernière ligne est vide et me sert à inserer d'autres lignes au dessus afin de rentrer de nvx élèves.
j'ai deux boutons qui me permettent soit de trier ma liste par ordre alpha (colonne a), soit de la trier par classe (colonne c) puis par alpha (colonne a).
La deuxième fonctionne parfaitement, ie que même s'il y a des lignes vides à la fin du tableau, elles restent en bas ; mais le tri alpha me met les lignes vides en haut ET CA JE NE VEUX PAS :evil: : il faut qu'elles restent en bas : voici ma macro :
Sub tri_alpha_ecole()
Range('ECOLE').Select
selection.Sort Key1:=Range('A25'), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
Range('A25').Select
End Sub
si quelqu'un avait une solution a me proposer, ca serait vraiment EXCELlent.