Macro de copier coller suite à une recherche

Bonjour,

Je suis débutante en vba,

J'ai 2 feuilles,

et je demande grace à une inputbox d'entrer un numéro

Public Sub Pal1()

Dim Pal As Integer

Pal = Application.InputBox("Entrez le numéro", "Numéro")
                         
                                    Select Case Pal
                                            Case False
                                                MsgBox "Vous avez annulé"
                                                Exit Sub
                                            Case Else
                                                MsgBox ("Numéro  " & Pal)
                                                
                                    End Select


End Sub

En faite, je voudrai que la suite de ma macro recherche cette valeur dans la colonne K de ma première feuille appelé Bordereau et qu'elle recopie Toutes les lignes dont la colonne K contient ce numéro dans la Deuxième feuille appelé extraction.

J'ai vu que l'on peut faire des recherches grace à Find ou autre mais je ne vois pas du tout comment je peux construire ma macro !


Merci d'avance !


Cordialement,

Edaine.