Copie des donnees d'une feuille a une autre

Bonjour

Je dois copier des donnees d'une feuille vers une autre avec une condition . j'ai une liste déroulante dans la rangée qui contienne 3 options ( complete /in process /cancel) je dois copier toutes les lignes qui ont ''complete'' dans la liste déroulante

j'ai essayce ce code ci dessous mais ca marche toujours pas

Sub copier()
    Dim ws1 As Worksheet, ws2 As Worksheet, src As Range, dest As Range, i As Integer

    Set ws1 = Worksheets("Workload - Charge de travail")
    Set ws2 = Worksheets("Sheet1")

    
    For i = 2 To ws1.Range("A1").SpecialCells(xlLastCell).Row
           

        Set src = ws1.Range("A2:AL50") ' la selection des plages de donnees
        Set dest = ws2.Range("A2:AL50")

        
        If src.Cells(i, 28).Value = "Completed - Appointment made / Complété - Nomination faite" Then
           
           '(i,31) for my drop down list
           
           
           src.Copy Destination:=dest ' page source
           dest.Value = dest.Value 'destination page
      
      End If
    
  ' Next i
End Sub