Afficher tous les éléments d’une liste d’après un critère

Bonjour à tous !

Je ne sais pas si le problème a déjà été posé, j’ai essayé de chercher mais sans succès (il faut dire que je peine à le formuler…).

Imaginons que j’aie une liste de courses (voir fichier joint), et que je veuille afficher automatiquement tous les intitulés des produits qui sont spécifiés « à racheter »

(Pas avec un filtre, l’idée est de pouvoir les lister ailleurs, pour faire un bon de commande).

Dans l’hypothèse où j’aie réussi à expliciter mon problème suffisamment clairement : est-ce possible ?

Si ce n’est pas clair, n’hésitez pas à me le dire et je ferai de mon mieux pour clarifier !

Merci d’avance

Bonjour Shalena,

voivi une solution, à adapter à ton environnement de travail.

Dès que "A racheter" s'affiche, l'intitulé + la quantité s'ajoutent à la liste de course.

Private Sub Worksheet_Change(ByVal Target As Range)
'
iRow1 = Target.Row
'
If Range("F" & iRow1).Value = "À racheter" Then
    iRow = Range("H" & Rows.Count).End(xlUp).Row + 1
    Range("H" & iRow).Value = Cells(iRow1, 1).Value
    Range("I" & iRow).Value = Cells(iRow1, 5).Value
End If
'
End Sub

A+

Bonjour à tous,

Une autre version avec un clic sur "Liste à Racheter"

Bonjour,

Et encore une autre avec un filtre avancé ...

A+

Merci à tous pour vos réponses si rapides, la dernière solution est exactement ce qu’il me fallait !