bonjour,
je dois trier un petit tableau de 3 colonnes.
Dans la 1=E8re colonne le n=B0 du client,
2=E8me colonne, son nom
3=E8me colonne les divers pourcentages de remise indiqu=E9=20
dans des cellules l'une en dessous de l'autre.=20
Et c'est l=E0 qu'est le hic.
Lors du tri, ne sont prises en compte que les lignes qui=20
ont quelque chose dans la 1=E8re colonne.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour Pierre,
en supposant qu'il y a les titres de colonne à la ligne 1 et que les données commence à la ligne 2
Sub Macro1() lgn1 = 2 For i = 3 To Range("C65536").End(xlUp).Row If Range("A" & i) <> 0 Then lgn2 = i - 1 Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1), Order1:=xlAscending, Header:=xlNo lgn1 = lgn2 + 1 End If Next lgn2 = i - 1 Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1), Order1:=xlAscending, Header:=xlNo End Sub
isabelle
bonjour, je dois trier un petit tableau de 3 colonnes. Dans la 1ère colonne le n° du client, 2ème colonne, son nom 3ème colonne les divers pourcentages de remise indiqué dans des cellules l'une en dessous de l'autre. Et c'est là qu'est le hic. Lors du tri, ne sont prises en compte que les lignes qui ont quelque chose dans la 1ère colonne.
Comment trier sur base de la 1ère colonne et garder en regard les infos de la 2ème et 3ème colonne ?
grand Merci, Pierre
bonjour Pierre,
en supposant qu'il y a les titres de colonne à la ligne 1
et que les données commence à la ligne 2
Sub Macro1()
lgn1 = 2
For i = 3 To Range("C65536").End(xlUp).Row
If Range("A" & i) <> 0 Then
lgn2 = i - 1
Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1),
Order1:=xlAscending, Header:=xlNo
lgn1 = lgn2 + 1
End If
Next
lgn2 = i - 1
Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1),
Order1:=xlAscending, Header:=xlNo
End Sub
isabelle
bonjour,
je dois trier un petit tableau de 3 colonnes.
Dans la 1ère colonne le n° du client,
2ème colonne, son nom
3ème colonne les divers pourcentages de remise indiqué
dans des cellules l'une en dessous de l'autre.
Et c'est là qu'est le hic.
Lors du tri, ne sont prises en compte que les lignes qui
ont quelque chose dans la 1ère colonne.
en supposant qu'il y a les titres de colonne à la ligne 1 et que les données commence à la ligne 2
Sub Macro1() lgn1 = 2 For i = 3 To Range("C65536").End(xlUp).Row If Range("A" & i) <> 0 Then lgn2 = i - 1 Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1), Order1:=xlAscending, Header:=xlNo lgn1 = lgn2 + 1 End If Next lgn2 = i - 1 Range("C" & lgn1 & ":C" & lgn2).Sort Key1:=Range("C" & lgn1), Order1:=xlAscending, Header:=xlNo End Sub
isabelle
bonjour, je dois trier un petit tableau de 3 colonnes. Dans la 1ère colonne le n° du client, 2ème colonne, son nom 3ème colonne les divers pourcentages de remise indiqué dans des cellules l'une en dessous de l'autre. Et c'est là qu'est le hic. Lors du tri, ne sont prises en compte que les lignes qui ont quelque chose dans la 1ère colonne.