Discussion :

[dav787]

Bonjour,

Je tourne en rond sur un problème qui semble être simple.

Voilà, j'ai dans un formulaire créer un bouton qui me permet d'afficher des données. jusque là, ça va
Un petite case d'option permettra d'ouvrir l'état selon la condition voulue par l'utilisateur à savoir :

- si case cochée, alors les données renvoyées seront différentes de 0(peut être négatifs parfois)
-si cache non cochée, alors toutes les données seront renvoyées.

Seulement, avec ce code :
si la cache est cochée,toutes les données sont renvoyées. ça ne marche pas
case décochée : j'ai bien le message

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
 private sub_click()
 
On Error GoTo erreur
 
 
 
If Me.optchoix.Value = -1 Then
DoCmd.OpenReport "Analyse mensuelle ecart", acViewReport, , "ecarts <>0"
 
 
ElseIf Me.optchoix.Value = 0 Then
MsgBox ("Pas d'écarts")
End If
 
erreur:
 
Exit Sub
End Sub

Merci pour votre aide

[brunog63]

Bonjour

Ton code pour imprimer ton état dans le cas où le champ "ecarts" est différent de zéro semble correct.
Reste à vérifier :

• Visiblement tu n'utilises pas une cas à cocher mais des cases à option. Ce n'est donc pas forcément binaire. Reste à vérifier si la valeur -1 est bien la bonne.
• Est-ce que ton champ ecarts est bien disponible dans la source de ton état.

Sinon, tu as du remarquer que ton exit sub est après ton etiquette erreur mais c'est un autre sujet.

Bruno

[dav787]

Bonjour et merci pour la réponse.

En fait, le code fonctionne si et seulement si, je renvoie dans mon état un champ "ecart" déjà présent dans une requête, mais vu que les résultats renvoyés
étaient partiels, j'ai opté pour un champ calculé directement dans l'état et là, ça ne fonctionnait pas
Je suis revenu avec ma requête que j'ai bidouillée un peu, et là, tout fonctionne à merveille, mais je me suis frotté la tête sur ce coup.

Merci pour la réponse en cout cas.