OVH Cloud OVH Cloud

Liste de réference

3 réponses
Avatar
Beronf
Bonjour à tous,

Quelqu'un aurait-il une idée pour me dépanner sur le problème suivant:
Dans un tableau la colonne A contient les réferences des produit vendus au
fur et à mesure de leur vente (on peut donc avoir plusieurs fois la même
réference sur des lignes différentes).
Comment faire pour obtenir une liste des references des différents produits
vendus (donc toutes les references sont cette fois différentes) triée par
ordre croissant de numéro, disons sur la ligne 1 par exemple? La mise à jour
se faisant bien-sûr automatiquement dès qu'on rajoute une ligne dans le
tableau principal.
Je ne suis pas sûr que je suis très clair dans ma demande ;-)

Merci pour votre aide.

Pierre

3 réponses

Avatar
Ricky
Bonjour *Beronf*

Données / Rapport de tableau croisé dynamique
Utilise l'assistant pour le créer.
Il faudra tout de même cliquer sur le "!" au moment de la consultation pour mettre les données à jour


| Bonjour à tous,
|
| Quelqu'un aurait-il une idée pour me dépanner sur le problème suivant:
| Dans un tableau la colonne A contient les réferences des produit
| vendus au fur et à mesure de leur vente (on peut donc avoir plusieurs
| fois la même réference sur des lignes différentes).
| Comment faire pour obtenir une liste des references des différents
| produits vendus (donc toutes les references sont cette fois
| différentes) triée par ordre croissant de numéro, disons sur la ligne
| 1 par exemple? La mise à jour se faisant bien-sûr automatiquement dès
| qu'on rajoute une ligne dans le tableau principal.
| Je ne suis pas sûr que je suis très clair dans ma demande ;-)
|
| Merci pour votre aide.
|
| Pierre

--
Ricky [MVP] Visitez les faq....
http://www.faqoe.com http://faqword.free.fr
http://dj.joss.free.fr/faq.htm http://www.excelabo.net
Avatar
Youky
Bonsoir,
Fait un click avec le bouton droit de la souris sur ton onglet et
"visualiser le code"
Fait un copié-coller de cette macro complete ; ensuite rentre toujours tes
données en A1, celles-ci se
mettront à partir de A3 en ordre croissant et sans doublons
cette macro ne sera executée que lorsque la valeur de A1 change
Tu peux meme la faire touner sur un classeur vierge (histoire de voir)
Youky

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.EnableEvents = False
bas = [A56536].End(3).Row
If bas < 2 Then bas = 2
For lig = 2 To bas
If [A1] = Cells(lig, 1) Then GoTo fin
If Cells(lig, 1) > [A1] Then
Cells(lig, 1).Select
Selection.EntireRow.Insert
Cells(lig, 1) = [A1]
GoTo fin
End If
Next
Cells(lig, 1) = [A1]
fin:
[A1] = ""
[A1].Select
Application.EnableEvents = True
End Sub


"Beronf" a écrit dans le message de news:

Bonjour à tous,

Quelqu'un aurait-il une idée pour me dépanner sur le problème suivant:
Dans un tableau la colonne A contient les réferences des produit vendus au
fur et à mesure de leur vente (on peut donc avoir plusieurs fois la même
réference sur des lignes différentes).
Comment faire pour obtenir une liste des references des différents
produits
vendus (donc toutes les references sont cette fois différentes) triée par
ordre croissant de numéro, disons sur la ligne 1 par exemple? La mise à
jour
se faisant bien-sûr automatiquement dès qu'on rajoute une ligne dans le
tableau principal.
Je ne suis pas sûr que je suis très clair dans ma demande ;-)

Merci pour votre aide.

Pierre



Avatar
Beronf
Bonsoir,

Merci de vos interventions.
J'ai peur cependant de ne pas avoir su me faire comprendre.
Je voudrais lister toutes les references differentes de la colonne A de mon
tableau au fur et à mesure de son remplissage et ceci dans une autre colonne
(hors tableau) en les triant automatiquement par ordre croissant.
Exemple: tableau¡:J50 A11 A24 A3S2 A41 A5S2...etc. Je veux
obtenir 111,154,532 dans la colonne L
Est-ce plus clair ainsi?

Pierre

"Youky" wrote:

Bonsoir,
Fait un click avec le bouton droit de la souris sur ton onglet et
"visualiser le code"
Fait un copié-coller de cette macro complete ; ensuite rentre toujours tes
données en A1, celles-ci se
mettront à partir de A3 en ordre croissant et sans doublons
cette macro ne sera executée que lorsque la valeur de A1 change
Tu peux meme la faire touner sur un classeur vierge (histoire de voir)
Youky

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address <> "$A$1" Then Exit Sub
Application.EnableEvents = False
bas = [A56536].End(3).Row
If bas < 2 Then bas = 2
For lig = 2 To bas
If [A1] = Cells(lig, 1) Then GoTo fin
If Cells(lig, 1) > [A1] Then
Cells(lig, 1).Select
Selection.EntireRow.Insert
Cells(lig, 1) = [A1]
GoTo fin
End If
Next
Cells(lig, 1) = [A1]
fin:
[A1] = ""
[A1].Select
Application.EnableEvents = True
End Sub


"Beronf" a écrit dans le message de news:

Bonjour à tous,

Quelqu'un aurait-il une idée pour me dépanner sur le problème suivant:
Dans un tableau la colonne A contient les réferences des produit vendus au
fur et à mesure de leur vente (on peut donc avoir plusieurs fois la même
réference sur des lignes différentes).
Comment faire pour obtenir une liste des references des différents
produits
vendus (donc toutes les references sont cette fois différentes) triée par
ordre croissant de numéro, disons sur la ligne 1 par exemple? La mise à
jour
se faisant bien-sûr automatiquement dès qu'on rajoute une ligne dans le
tableau principal.
Je ne suis pas sûr que je suis très clair dans ma demande ;-)

Merci pour votre aide.

Pierre