OVH Cloud OVH Cloud

Problème de tri

1 réponse
Avatar
Linebaker
Bonjour,

De quelle manière je dois écrire le code pour que, lors du tri, les cellules
vides se retrouvent en haut de ma feuille ?

Pour le moment je n'ai que cela :

Cells.Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B2") _
, Order2:=xlAscending, Key3:=Range("C2"), Order3:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
xlSortNormal

mais les cellules vides se retrouvent à la fin.

Il se peut que, bien que ma cellule soit vide, elle ait contenu un caractère
qui fut effacé ce qui pourrait être mon problème. Si c'est le cas, comment
écrire le code pour que le tri soit comme souhaité.

Merci

1 réponse

Avatar
TMQA
Bonjour Line,

Ton codage VB ne semble pas effacer des valeurs contenues dans ta base de
données.

1 - Sachant qu'il n'y a pas de valeurs 0 (zéro) dans ta base de données, tu
peux préparer un codage VB qui va inscrire la valeur 0 dans les cellules
vides (qui sont comprises dans ta base de données).

2 - Ensuite ton codage (que tu as déjà préparé) va mettre les valeurs 0 en
haut de liste.

3 - Ensuite un codage VB pourrait effacer les valeurs 0 comprises dans ta
base de données.

Au revoir.

TMQA


Bonjour,

De quelle manière je dois écrire le code pour que, lors du tri, les cellules
vides se retrouvent en haut de ma feuille ?

Pour le moment je n'ai que cela :

Cells.Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Key2:=Range("B2") _
, Order2:=xlAscending, Key3:=Range("C2"), Order3:=xlAscending, Header:= _
xlYes, OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal, DataOption2:=xlSortNormal, DataOption3:= _
xlSortNormal

mais les cellules vides se retrouvent à la fin.

Il se peut que, bien que ma cellule soit vide, elle ait contenu un caractère
qui fut effacé ce qui pourrait être mon problème. Si c'est le cas, comment
écrire le code pour que le tri soit comme souhaité.

Merci