Interdire la saisie de doublon

bonjour le forum, j'ai téléchargé "Registre-courrier" la dernière fois, un fichier que j'apprécie beaucoup mais je voudrais faire des modification dedans, comme interdire la Saisie de doublons dans la feuille "Arrivée" sur les colonnes "J" et "AC" via le formulaire "UF_Arrivee", j'ai beaucoup essayé mais hélas!. Pouvez-vous jeter coup d'oeuil. Merci

Salut le forum, comme je n'ai pas eu de solution, je tente de mettre le code que j'utilise actuellement mais qui est sans effet.

If Application.Match(UF_Départs.TB_Correspondant.Value, .[J:J], 0) Then
        If IsNumeric(Application.Match(UF_Départs.TB_Numero.Value, .[AC:AC], 0)) Then
            If Application.Index(.[AC:AC], Application.Match(UF_Départs.TB_Correspondant.Value, .[J:J], 0)) = _
                UF_Départs.TB_Numero.Value Then
                MsgBox "Dossier déjà existant"
                Exit Sub
            End If
        End If
    End If

Je compte sur votre aide. Merci