Modification du code VBA

Bonjour Ce code sert à empêcher la duplication de valeurs dans certaines colonnes avec l'apparition d'un message d'alerte indiquant que les valeurs sont déjà dans l'une des cellules de la colonne. ......

La question est de savoir comment créer ou modifier le code pour obtenir le même résultat mais avec des lignes au lieu de colonnes

Private Sub Worksheet_Change(ByVal Target As Range)
    With Target
       If (.Column <> 1 And .Column <> 4 And .Column <> 8 And .Column <> 12) Or .Cells.Count > 1 Then Exit Sub
        If WorksheetFunction.CountIf(Columns(.Column), .Value) > 1 Then
            Application.DisplayAlerts = False
            .ClearContents
            Application.DisplayAlerts = True
            MsgBox "La valeur existe déjà !"
        End If
    End With
End Sub

Bonjour Arwasoha,

Avez-vous essayé de remplacer .Column par .Row ?

bonjour,

une proposition

Merci beaucoup, mais je ne veux pas généraliser la formule à toute la classe, il n'y a que des colonnes spécifiques