Macro avec fonction recherche

Bonjour à tous,

Voilà je suis très loin d'être une experte en macro et formule, et j'ai besoin d'aide.

Je souhaiterai une macro qui me permette de supprimer toutes les lignes dont il ne retrouve pas le prénom sur la seconde feuille.

Je vais essayer de décrire un peu mieux, j'ai un tableau avec toutes une liste de prénom avec 3 colonne compléter pour le matin, midi et soir que je dois copier tous les jours.

Je dois supprimer tous les jours tous les prénoms qui ne sont pas sur ma feuille 2 colonne A.

Pouvez vous me donner une astuce, sachant que je souhaite une macro car j'ai des collègues qui ne maîtrise pas la rechercheV.

J'ai mis un échantillon de mon fichier.

Par avance merci

Ques

Bonjour

Ci joint une proposition qui répond à ta demande

elle est basée sur le nb de colonnes présentes sur ton fichier test et les données à traiter commencent en A7

La liste des prénoms est sous forme de tableau dynamique et nommée

Macro à lancer avec Ctrl Maj T

A tester

Cordialement

FINDRH

Bonsoir FINDRH, Ques60, le forum

Une variante :

Sub Supprime()
    With Sheets("Feuil1")
        With .Range("a8", .Range("a" & Rows.Count).End(xlUp)).Offset(, 4)
            .Formula = "=match(a8,'Feuil2'!a:a,0)"
            .AutoFilter 1, "=#N/A"
            .EntireRow.Delete
        End With
        .Columns("e").Delete
    End With
End Sub

klin89

Bonjour Klin89

bien plus court que ma macro !

Je vais la tester pour en prendre de la graine !

Merci

Cordialement

FINDRH