Bonjour,

Je veux que toutes mes zones de texte avec un astérisque soient remplis.
J'ai mis ca comme code mais il me met une erreur (voir piece jointe)
J'ai mis aussi dans ma table les champs avec "Null interdit = oui" mais je voulais un message perso, cela fait doublon ?

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
Private Sub CommandButton_save_close_Click()
 
If societe.Text = "" Or adresse.Text = "" Or cp.Text = "" Or Ville.Text = "" Or tel.Text = "" Then
    MsgBox("Tous les champs précédés d'une astérique doivent être remplis", vbInformation, "Attention") = vbAbort
Else
    DoCmd.Save
    DoCmd.Close
    Forms![Liste des Clients].Requery
End If
 
End Sub
Est-ce qu'il faut que je fasse une cascade de if...then ? ou que je mette Me. avant mes zones de texte ?

merci par avance

@+