Discussion :

[lolipop65]

Bonjour,

Je voudrais, a partir d un bouton de commande "OK NEXT", obliger l utilisateur de mon formulaire a remplir le formulaire et un sous formulaire avant de passer a l enregistrement suivant.

(Tant que l utilisateur n a pas saisie au mois UN champ, le bonton ne fonctionne pas... avec un MsgBox pour expliquer...)

Comment puis je faire ??

Merci pour votre aide

(le probleme reside dans le fait que mon formulaire contient un certain nombre de champs... et que je ne peux definir de champ obligatoire...)

[willcartley]

Tu testes les champs en question s'ils sont vides avant de poursuivre.
Avec des

Code :

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

not isnull(TonChamp.value)

ou

Code :

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

TonChamp.Value <> ""

Par exemple

[Jean-Philippe André]

salut,
une méthodo que j'utilise au boulot, un peu longue à mettre en place, mais une fois développée, très pratique :
- 1 table avec
-- Nom du formulaire
-- Liste des champs obligatoires à remplir

- 1 fonction qui
-- vérifie que chacun des champs du formulaire en cours ont été remplis
--- si oui, enable à true du bouton
--- sinon enable reste à false + msgbox d'alerte
--- en plus value, passage en backcolor du champs en rouge si nécessite une valeur

[lolipop65]

et je dois faire ca sur tous les champs ???

[lolipop65]

que je ne peux definir de champ obligatoire...

N y a t il pas un moyen de detecter si l utilisateur a au moins saisie UN champ n importe lequel ??

J ai oublié de preciser : il s agit de check box en majorite...

[willcartley]

Oui (Edit: pour la question d'avant),
Voici un exemple très archaïque

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
 
    With Me
            If (IsNull(.Civilite.Value) Or .Civilite.Value = "") Then
                MsgBox "ton message d'erreur"
            ElseIf (IsNull(.nom.Value) Or .nom.Value = "") Then
                MsgBox "ton message d'erreur"
            'ainsi de suite avec des elseif pour chaque champ
 
            Else
                'tout est rempli alors et tu continue
            End If
    End With

Edit: pour au moins un champ, il ne devrais y avoir qu'un seul if avec des "and" pour tous les test oui c'est archaïque