M
marie
Guest
Bonsoir a tous
J'utilise ce code pour vérifier s'il existe des doublons en colonne 4
aussi j'aimerais vérifier s'il existe des doublons dans la plage A4:C21 indépendamment la colonne 4 et uniquement lorsque je clique sur retour
merci
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 4 Then
If Application.WorksheetFunction. _
CountIf(Range('d4:d21'), Target.Value) > 1 Then
MsgBox 'saisissez un autre compte, celui-ci existe déjà'
Target.Value = ''
Target.Select
End If
End If
End Sub [file name=essais_20051108192035.zip size=8153]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/essais_20051108192035.zip[/file]
J'utilise ce code pour vérifier s'il existe des doublons en colonne 4
aussi j'aimerais vérifier s'il existe des doublons dans la plage A4:C21 indépendamment la colonne 4 et uniquement lorsque je clique sur retour
merci
Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Target.Column = 4 Then
If Application.WorksheetFunction. _
CountIf(Range('d4:d21'), Target.Value) > 1 Then
MsgBox 'saisissez un autre compte, celui-ci existe déjà'
Target.Value = ''
Target.Select
End If
End If
End Sub [file name=essais_20051108192035.zip size=8153]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/essais_20051108192035.zip[/file]