XL 2013 Générer une liste à partir de produits retenus

Jouxte · 24 Mars 2022

Bonjour à toutes et tous,

Je n'ai pas la capacité de faire ce que je souhaite faire, aussi, je vous demande un sacré coup de main. Merci par avance pour votre aide.

J'ai dans un onglet une feuille tarif qui me donne la totalité des produits et de leurs conditionnements.
Je souhaite créer dans un onglet différent "Produits éligibles", une liste (en colonne C) de tous les conditionnements des produits repris en colonne A.
Ce n'est peut-être pas très clair. Je vous joins un tableau test.

chris · 24 Mars 2022

Bonjour

Utiliser un filtre avancé, éventuellement automatisé par VBA

Ou éventuellement un pseudo TCD

Dans les 2 cas il est préférable de mettre les tarifs sous forme de tableau structuré

JHA · 24 Mars 2022

Bonjour à tous,

Avec excel 2013, une proposition par TCD qui est me semble-t-il la plus facile à mettre en œuvre.

JHA

sylvanu · 24 Mars 2022

Bonjour Jouxte, Chris, JHA,
Une approche en VBA avec :

VB:

Sub Remplit()
    Application.ScreenUpdating = False
    DL = Sheets("Tarif").Range("A65500").End(xlUp).Row
    T = Sheets("Tarif").Range("A2:G" & DL)
    Range("C2:E65000").ClearContents: L = 2
    For i = 1 To Range("A65500").End(xlUp).Row
        Produit = Cells(i, "A")
        For j = 1 To UBound(T)
            If T(j, 2) = Produit Then
                Cells(L, "C") = T(j, 1)
                Cells(L, "D") = T(j, 2)
                Cells(L, "E") = T(j, 3)
                L = L + 1
            End If
        Next j
    Next i
End Sub

Jouxte · 24 Mars 2022

Bonjour chris, JHA, sylvanu,

Merci pour vos réponses si rapides.
Vos propositions qui sont toutes efficaces. Je vais choisir la solution vba de sylvanu qui me parait la plus facile à mettre en œuvre dans le cadre d'un fichier beaucoup plus grand.
Merci encore.

XL 2013 Générer une liste à partir de produits retenus

Jouxte

XLDnaute Occasionnel

Pièces jointes

chris

XLDnaute Barbatruc

JHA

XLDnaute Barbatruc

Pièces jointes

sylvanu

XLDnaute Barbatruc

Pièces jointes

Jouxte

XLDnaute Occasionnel

Discussions similaires