OVH Cloud OVH Cloud

Compter des lignes

2 réponses
Avatar
Charles Tosi
Bonjour,
J'ai un tableau dans lequel je liste des articles à livrer. Le nombre
d'articles à livrer à chacun des destinataires est variable mais la quantité
est toujours la même (1). J'entre dans chaque ligne de mon tableau les
destinataires, puis je trie le tableau par destinataire et N° d'ordre de
l'article. Je veux pouvoir numéroter en séquence et automatiquement les
lignes d'articles à livrer aprés le tri. Je m'explique
Tableau original
Article Destinataire
A X
A Y
B Y
C Y
D X

AOPrés le tri j'ai donc

Article Destinataire Numéro
A X
D X
A Y
B Y
C Y

Je veux mettre automatiquement la sequence dans la colonne numéro
Article Destinataire Numéro
A X 1
D X 2
A Y 1
B Y 2
C Y 3
A part générer une série manuellement y-at-il un moyen de faire ça
automatiquement (plusieurs centaines de lignes) par une macro. Le problème
c'est de gérer la rupture (nbre de lignes varuables) sur le destinataire

Merci de vos lumières

Charles Tosi

2 réponses

Avatar
Ardus Petus
en C2:
=SI(B2<>B1;1;C1+1)
puis recopie vers le bas

Cordialement,
--
AP

"Charles Tosi" a écrit dans le message de
news:%
Bonjour,
J'ai un tableau dans lequel je liste des articles à livrer. Le nombre
d'articles à livrer à chacun des destinataires est variable mais la
quantité

est toujours la même (1). J'entre dans chaque ligne de mon tableau les
destinataires, puis je trie le tableau par destinataire et N° d'ordre de
l'article. Je veux pouvoir numéroter en séquence et automatiquement les
lignes d'articles à livrer aprés le tri. Je m'explique
Tableau original
Article Destinataire
A X
A Y
B Y
C Y
D X

AOPrés le tri j'ai donc

Article Destinataire Numéro
A X
D X
A Y
B Y
C Y

Je veux mettre automatiquement la sequence dans la colonne numéro
Article Destinataire Numéro
A X 1
D X 2
A Y 1
B Y 2
C Y 3
A part générer une série manuellement y-at-il un moyen de faire ça
automatiquement (plusieurs centaines de lignes) par une macro. Le problème
c'est de gérer la rupture (nbre de lignes varuables) sur le destinataire

Merci de vos lumières

Charles Tosi




Avatar
Youky
en colonne A B C avec entete de tableau
mettre les données en A et C ceux ci seront triées et la col C remplie
Youky

Sub Macro1()
Application.ScreenUpdating = False
Columns("A:B").Select
Selection.Sort Key1:=Range("A2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom
nb = 1
nnn = Cells(2, 1)
For lig = 2 To [A65536].End(xlUp).Row
If Cells(lig, 1) <> nnn Then nb = nb + 1
Cells(lig, 3) = nb
Next
Columns("A:C").Select
Selection.Sort Key1:=Range("B2"), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:úlse, Orientation:=xlTopToBottom
Application.ScreenUpdating = True
[A1].Select
End Sub

"Charles Tosi" a écrit dans le message de news:
%
Bonjour,
J'ai un tableau dans lequel je liste des articles à livrer. Le nombre
d'articles à livrer à chacun des destinataires est variable mais la
quantité est toujours la même (1). J'entre dans chaque ligne de mon
tableau les destinataires, puis je trie le tableau par destinataire et N°
d'ordre de l'article. Je veux pouvoir numéroter en séquence et
automatiquement les lignes d'articles à livrer aprés le tri. Je m'explique
Tableau original
Article Destinataire
A X
A Y
B Y
C Y
D X

AOPrés le tri j'ai donc

Article Destinataire Numéro
A X
D X
A Y
B Y
C Y

Je veux mettre automatiquement la sequence dans la colonne numéro
Article Destinataire Numéro
A X 1
D X 2
A Y 1
B Y 2
C Y 3
A part générer une série manuellement y-at-il un moyen de faire ça
automatiquement (plusieurs centaines de lignes) par une macro. Le problème
c'est de gérer la rupture (nbre de lignes varuables) sur le destinataire

Merci de vos lumières

Charles Tosi