Discussion :

[chartreuse]

J'essaie de sécuriser mes enregistrements dans un formulaire d'ajout.
Si 2 champs [Dateenlèvement] Et [Nombre de colis enlevé] et une liste déroulante [Nom] n'est pas saisie je ne peux pas enregistrer via un bouton d'enregistrement.
Pour cela j'ai créé une macro.


Le problème est que si je renseigne tous les champs sauf la liste déroulante le formulaire s'enregistre quand même.

[micniv]

Il faut mettre des OU à la place des ET entre les 3 champs : logique ...

cordialement

[chartreuse]

Ok çà fonctionne.
Et si je veux fermer mon formulaire qui si les 3 champs sont vides j'ai mis çà

Fonctionne pas car si je renseigne qu'un seul champ sur les 3 le formulaire se ferme.

[tee_grandbois]

bonjour,
oui mais là, il faut mettre ET à la place de OU car les 3 champs doivent tous être vides : logique

[chartreuse]

tee_grandbois
j'avais essayé avec et mais quand tous les champs sont vides et que je veux sortir j'ai le message d'alerte. Par contre si je renseigne un champ le formulaire se ferme.

[hyperion13]

Salut
A vérifier mais il me semble que EstNull doit être affecté aux 3 champs !
Là tu ne vérifies que Nbre colis enlevés.

[chartreuse]

Aprés un test voilà ce que j'ai :
Si mes 3 champs sont vides je peux pas fermer le formulaire
Si le champ [date enlevement] est renseigné je peux fermer le formulaire
Si le champ [nom] est renseigné je peux pas fermer le formulaire
Si le champ [nombre de colis enleve] est renseigné je peux pas fermer le formulaire
Si tous les champs sont remplis je peux pas fermer le formulaire

[tee_grandbois]

Aprés un test voilà ce que j'ai :
Si mes 3 champs sont vides je peux pas fermer le formulaire
Si le champ [date enlevement] est renseigné je peux fermer le formulaire
Si le champ [nom] est renseigné je peux pas fermer le formulaire
Si le champ [nombre de colis enleve] est renseigné je peux pas fermer le formulaire
Si tous les champs sont remplis je peux pas fermer le formulaire

et donc: OK ? NOK ? et où est le code ?

Si mes 3 champs sont vides je peux pas fermer le formulaire

c'est une erreur d"utiliser le terme "vide" à la place de nul, en plus, sachant qu'au moins un champ (le champ [Nom] est de type string) ne peut pas être nul mais vide (""), la condition risque de ne pas fonctionner.

[chartreuse]

J'ai créé un code en VBA qui me demande si tous les champs sont vides.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub Commande24_Click()
If MsgBox("Est-ce que tous les champs sont vides ?", vbQuestion + vbYesNo, "QUITTER LE FORMULAIRE ?") = vbYes Then
      Me.Undo
      DoCmd.Close acForm, "f_recherche_multicritere_enlevement"
   End If
End Sub

Merci à vous