Re : Msgbox pour informer qu'il ya un doublon dans une colonne
salut tout le monde
un bonjour ne coute rien !!!
avec ce code sur le bouton de validation
Private Sub CommandButton1_Click()
Dim c
With Sheets(1).Columns(1) 'recherche dans le feuille 1 colonne A
Set c = .Find(TextBox1)
If Not c Is Nothing Then
MsgBox "la valeur existe"
End If
End With
End Sub
__________________
 Kénavo
|