darkspoilt
Messages postés254Date d'inscriptionjeudi 13 janvier 2005StatutMembreDernière intervention10 octobre 2013
-
23 août 2007 à 15:35
eltino
Messages postés8Date d'inscriptionmardi 16 septembre 2003StatutMembreDernière intervention16 décembre 2008
-
28 août 2007 à 17:28
Bonjour,
voila mon problème si mes valeurs sont null
lorsque je fais
Debug.Print Me!mois
Debug.print me!année
cela m'affiche deux fois Null
mais après des que je fais
If Me!mois2 Null Or Me!année2 Null Then
MsgBox "Veuillez remplir les cases"
Exit Sub
End If
Il ne rentre pas dans le if
Si quelqu'un peut me dire pourquoi ou a une solution annexes
merci d'avance
darkspoilt
Messages postés254Date d'inscriptionjeudi 13 janvier 2005StatutMembreDernière intervention10 octobre 2013 23 août 2007 à 15:44
bah Me!mois2 et Me!année2 sont des valeurs rentreé par l'utilisateur dans un formulaire Access et je veux justement géré quand l'utilisateur met rien alors qu'il doit mettre quelque chose.
Sinon oui c'est dans un formulaire Access
Vous n’avez pas trouvé la réponse que vous recherchez ?
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 23 août 2007 à 15:51
rahh la galère ce Access 07..
essaie conventionnellement :
If Me.mois2.Text vbNullString Or Me.année2.Text vbNullString Then
MsgBox "Veuillez remplir les cases"
Exit Sub
End If
mortalino
Messages postés6786Date d'inscriptionvendredi 16 décembre 2005StatutMembreDernière intervention21 décembre 201118 23 août 2007 à 16:14
j'en sais rien..
En fait, apparemment, faut selectionner le contrôle avant de le tester, sinon, j'ai une erreur de me*de !!
Et vu que t'en as 2.. bref, je te propose une solution secours, mais c'est à corriger car il y a obligatoirement mieux à faire (mais bon, c'est solution dépannage) :
Me.mois2.SetFocus
If Me.mois2.Text = vbNullString Then
Me.année2.SetFocus
If Me.année2.Text = vbNullString Then
MsgBox "Veuillez remplir les cases"
Exit Sub
End If
End If
C'est pour ça que j'aime pas access, c'est différent et pas top en code. Bref, j'espère que quelqu'un pourra me corriger et te proposer mieux que ma daube
tubafat
Messages postés79Date d'inscriptionlundi 17 juillet 2006StatutMembreDernière intervention25 septembre 2007 24 août 2007 à 12:00
Bonjour,
j'ai eu un problème similaire sur VBA Excel et il fallait écrire "Null"
If Me!mois2 "Null" Or Me!année2 "Null" Then
MsgBox "Veuillez remplir les cases"
Exit Sub
End If
Je n'ai pas Access pour tester, mais bon si ça marche, tant mieux!
eltino
Messages postés8Date d'inscriptionmardi 16 septembre 2003StatutMembreDernière intervention16 décembre 2008 28 août 2007 à 17:28
Bonjour ! Si je peux me permettre, la solution de Darkspoilt est correcte :
If IsNull(Me!mois2) Or IsNull(Me!année2) Then
MsgBox "Veuillez remplirs les cases"
Exit Sub
End If
Mais, il ne faut pas oublier de traiter le cas chaine vide :
If IsNull(Me!mois2) Or IsNull(Me!année2) Then
MsgBox "Veuillez remplir les cases"
Exit Sub
End If
Me!mois2=trim(Me!mois2)
Me!année2=trim(Me!année2)
if len(me!mois2)=0 or len(Me!année2)=0 then
MsgBox "Veuillez remplir les cases"
Exit Sub
endif