Discussion :

[Phyl]

Bonjour,

Je voudrais lancer un message en cas de champ vide. J'ai fait un code un peu tarabiscoté car je n'ai pas réussi avec les formules IsNull ou IsEmpty.

Code :

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

1
2
3
4
5
    If Not [Forms]![Form Modif RueDistrib]![SelectDistrib].Column(1) = False Then
    Me![N°Distr] = [Forms]![Form Modif RueDistrib]![SelectDistrib].Column(1)
    Else
    MsgBox "Veuillez Choisir un Distributeur"
    End If

En fait la condition du champ renseigné fonctionne, mais la condition du champ vide (else) ne marche pas ?

Merci de m'aider

[Invité]

Bonjour

C'est normal, car ton test est faux, tu fais un test comme si c'était un champ booléen.

Voici un exemple de test d'une combobox http://www.developpez.net/forums/sho...d.php?t=409822
Regardes comment contrôler la valeur, c'est cela que tu dois utiliser.

Starec

[Phyl]

C'est super intéressant, et cela correspond exactement à ce que je recherchais. Mais avant de l'utiliser, je vais essayer de comprendre ce code.

Merci beaucoup

[Phyl]

En fait , j'ai parlé trop vite et malgré plusieurs recherches je n'ai pas trouvé, je suis plutôt dépassé même si je comprend la démarche.
Deux problèmes :

1) Je travaille sur un Formulaire avec sous formulaire les 2 champs à remplir sont dans le Formulaire et les champs du sous formulaire ne sont pas forcément renseignés. Le contrôle va donc toujours dans les champs de ce sous formulaire.

2) Lorsque je renseigne tous les champs j'ai alors un message d'erreur sur mon code :

Code :

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

Me![N°Distr] = [Forms]![Form Modif RueDistrib]![SelectDistrib].Column(1)

"Vous avez essayé de donner une valeur Null à une variable qui n'est pas du type de données variant"
Le message est normal puisque c'est ce que je voulais éviter par le contrôle

Mais pourquoi ... ?

[Phyl]

ouf cela y est j'ai réussi.

c'est aussi bien de conseiller et de ne pas tout donner

merci à tous