Macro Recherche par mots clés

Bonjour à tous,

Je suis débutant et je bloque sur une macro. Voici ce que je veux faire :
Dans une première feuille ("Recherche"), je souhaite renseigner 3 mots clés. Grâce à une macro, toutes les lignes de la 2ème feuille ("Base de données") contenant ces 3 mots clés sont copiées et insérées dans la première feuille (en ligne 24 et en dessous).

J'ai réalisé cette macro en m'inspirant de ce que j'ai trouvé sur le net et sur mes faibles connaissances en VB. Seulement, elle ne fonctionne pas...

Sub CopieConditions()

 
Dim PlageUtile As Range

Dim Ligne As Range

Dim Origine As Worksheet

Dim Destination As Worksheet

Dim LigneDestination As Integer

 
Set Origine = Worksheets("Base de données")

Set Destination = Worksheets("Recherche")

 
Set PlageUtile = Range(Origine.Cells(1, 1), Origine.Cells(1, 1).SpecialCells(xlLastCell))

 
LigneDestination = 1

For Each Ligne In PlageUtile.Rows

    If Ligne.Cells(1, 9).Value = Origine.Cells(6, 3) And Ligne.Cells(1, 2) = Origine.Cells(8, 3) Then

        Ligne.Copy

        LigneDestination = LigneDestination   1

        Destination.Cells(24, 1).Insert Shift:=xlDown

    End If

Next

 
End Sub

Help me please!
Merci d'avance.

Jordy