dominique35
XLDnaute Occasionnel
Bonjour à vous.
Voila j'ai un problème avec une ligne visual basic et je ne trouve pas l'erreur!
Pouvez me dire ou, mais surtout pourquoi!
car le but est avant de comprendre l'erreur!
numlignevide = ActiveSheet.Columns(1).Find("").Row
'on vérifie les champs obbligatoires sont correctement remplis'
If txtNom.Text = "" Then
MsgBox "Veuillez remplir le nom de votre contact", vbCritical, "Champs manquant", txtNom.SetFocus
ElseIf txtPrénom.txt = "" Then
MsgBox " Veuillez remplir le Prénom de votre contact", vbCritical, "champ manquant", txtPrénom.SetFocus
Else
Merci à vous tous.
Ci joint le fichier
Voila j'ai un problème avec une ligne visual basic et je ne trouve pas l'erreur!
Pouvez me dire ou, mais surtout pourquoi!
car le but est avant de comprendre l'erreur!
numlignevide = ActiveSheet.Columns(1).Find("").Row
'on vérifie les champs obbligatoires sont correctement remplis'
If txtNom.Text = "" Then
MsgBox "Veuillez remplir le nom de votre contact", vbCritical, "Champs manquant", txtNom.SetFocus
ElseIf txtPrénom.txt = "" Then
MsgBox " Veuillez remplir le Prénom de votre contact", vbCritical, "champ manquant", txtPrénom.SetFocus
Else
Merci à vous tous.
Ci joint le fichier