Macro Excel pour copier les données en fonction d'un critère

Bonjour à tous,

j'ai besoin de votre aide.

J'aimerai avoir une macro qui permet de copier automatiquement les lignes selon un critère.

Ci-joint un exemple de fichier Excel avec le détail.

je vous remercie pour votre aide.

Pauline

Bonjour le forum, bonjour Pauline,

Un essai :

Sub test()

Dim derligliste, derliganalyse, lig As Integer

derlig = Range("A1").End(xlDown).Row

For Each cell In Sheets("Liste").Range("C2:C" & derlig)
    lig = cell.Row
    If cell.Value = "Donnée 2C" Then
        Sheets("Liste").Range("A" & lig & ", C" & lig & ", D" & lig).Select
        Selection.Copy
        Sheets("Analyse").Activate
        derliganalyse = Range("A1").End(xlDown).Row
        Range("A" & derliganalyse + 1).Select
        Selection.PasteSpecial Paste:=xlPasteValues
        Sheets("Liste").Activate
    End If
Next cell
Sheets("Analyse").Activate
End Sub