Code VBA pour copie automatique de lignes ?

Bonjour,
Je suis en train de réaliser un fichier Excel (.XLSM) pour faire mes compte, gérer mon budget = http://www.cjoint.com/c/FACqAycTATh (fichier de base)
Je souhaite réaliser un tableau au colonne E et F ne regroupant que certaines lignes du tableau principal.
J'ai trouvé sur CCM un fichier .xlsm (http://www.cjoint.com/c/FACqHX5A8Gh) comprenant un code permettant une action similaire à ce que je souhaite : Voila le lien (https://forums.commentcamarche.net/forum/affich-28651561-macro-excel-copier-une-ligne-sous-condition de la discussion mettant le fichier à disposition.

Et voilà la code VBA compris dans son fichier :

Option Explicit
Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Count > 1 Then Exit Sub
    If Target.Column = 16 Then
        If UCase(Target.Value) = "OUI" Then
            Range("A" & Target.Row).Resize(1, 5).Copy
            ActiveSheet.Paste Destination:=Worksheets("Feuil2").Range("A" & Rows.Count).End(xlUp).Offset(1, 0)
            Application.CutCopyMode = False
        End If
    End If
End Sub

Comment pourrais-je adapter ce code à mon fichier ? Pourriez vous m'y aider ? et comment l'utiliser ?
Merci d'avance,
Bien cordialement,
Théo.