Visual basic : trier une colonne par ordre alphabétique

Fermé
nuggy - 12 avril 2013 à 15:00
totodunet Messages postés 1377 Date d'inscription mercredi 18 mars 2009 Statut Membre Dernière intervention 5 mars 2020 - 12 avril 2013 à 15:23
Bonjour,

je cherche à trier par ordre alphabétique une colonne dont le nombre de ligne est variable (de A1 à Ax, ou x varie) sur une feuille spécifique. JE dois apparemment utiliser la fonction sort, mais je ne sais pas comment elle marche et ne comprend pas bien l'aide fournie par le logiciel.
MAlgré tout, je me suis dépatouillé pour avoir un code, qui évidemment ne marche pas :

nbval = Sheets("listes").Cells(2, 2).Value
'nbval compte le nombre de valeurs dans ma colonne.
Range("A1:A" & nbval).Sort Key1:=Range("A1"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal

pouvez vous m'indiquer ce qui ne va pas ?
merci

A voir également:

3 réponses

totodunet Messages postés 1377 Date d'inscription mercredi 18 mars 2009 Statut Membre Dernière intervention 5 mars 2020 199
12 avril 2013 à 15:15
nbval = Sheets("listes").Cells(2, 2).Value
'nbval compte le nombre de valeurs dans ma colonne.


tu as mis un compteur ? il y a un nombre dans ta cellule 2;2 ?
1
bonjour,

d'abord merci pour la réponse.

la cellule 2;2 contient une formule qui compte le nombre de valeurs dans la colonne A (=nbval(A:A))
0
totodunet Messages postés 1377 Date d'inscription mercredi 18 mars 2009 Statut Membre Dernière intervention 5 mars 2020 199
Modifié par totodunet le 12/04/2013 à 15:24
Sub Tri()

Range("A1:A"&nbval).Select
Selection.Sort Key1:=Range("A1"), Order1:=xlDescending, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom

End Sub

???

https://forums.commentcamarche.net/forum/affich-1242956-tri-en-vba-sous-excel
Qui ne tente rien n'a rien
0