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

  • Initiateur de la discussion Initiateur de la discussion Jouxte
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

Jouxte

XLDnaute Occasionnel
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.
 

Pièces jointes

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
 

Pièces jointes

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.
 
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Retour