OVH Cloud OVH Cloud

no data

3 réponses
Avatar
didier
Bonjour

J'ouvre un formulaire =E0 partir d'un =E9tat
Quand il n'y a pas de donn=E9 je souhaite affich=E9 un=20
message puis fermer l'=E9tat er stopper la proc=E9dure du=20
formulaire et retourner =E0 celui-ci
Sur Nodata
Msgbox ....
Docmd.close acreports, "etat"
mais il m'indique qu'il ne peut fermer l'=E9tat
pourquoi?

3 réponses

Avatar
Raymond [mvp]
Bonjour.

tu ouvres le formulaire à partir de l'état, tu veux stopper la procédure du
formulaire et retourner dans ce formulaire ?
il faudrait faire le contraire.
ouvrir le formulaire, ouvrir l'état, si pas de données revenir dans le
formulaire.

dans l'état:
Private Sub Report_Open(Cancel As Integer)
MsgBox "pas de données"
Cancel = True
End Sub

dans le formulaire:
On Error Resume Next
DoCmd.OpenReport "reportname", , , , acDialog


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit dans le message de
news: 449001c52102$f9808d90$
Bonjour

J'ouvre un formulaire à partir d'un état
Quand il n'y a pas de donné je souhaite affiché un
message puis fermer l'état er stopper la procédure du
formulaire et retourner à celui-ci
Sur Nodata
Msgbox ....
Docmd.close acreports, "etat"
mais il m'indique qu'il ne peut fermer l'état
pourquoi?
Avatar
didier
Re
dans ta procédure je vais jamais ouvrir l'état, il faut
que je teste s'il y a des données à moins de placer ta
procédure sur No-data

dans l'état:
Private Sub Report_Open(Cancel As Integer)
MsgBox "pas de données"
Cancel = True

-----Message d'origine-----
Bonjour.

tu ouvres le formulaire à partir de l'état, tu veux
stopper la procédure du

formulaire et retourner dans ce formulaire ?
il faudrait faire le contraire.
ouvrir le formulaire, ouvrir l'état, si pas de données
revenir dans le

formulaire.

dans l'état:
Private Sub Report_Open(Cancel As Integer)
MsgBox "pas de données"
Cancel = True
End Sub

dans le formulaire:
On Error Resume Next
DoCmd.OpenReport "reportname", , , , acDialog


--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit
dans le message de

news: 449001c52102$f9808d90$
Bonjour

J'ouvre un formulaire à partir d'un état
Quand il n'y a pas de donné je souhaite affiché un
message puis fermer l'état er stopper la procédure du
formulaire et retourner à celui-ci
Sur Nodata
Msgbox ....
Docmd.close acreports, "etat"
mais il m'indique qu'il ne peut fermer l'état
pourquoi?


.



Avatar
Raymond [mvp]
oups !

Private Sub Report_NoData(Cancel As Integer)
MsgBox "pas de données"
Cancel = True
End Sub

excuses.
--
@+
Raymond Access MVP
http://OfficeSystem.Access.free.fr/
http://OfficeSystem.Access.free.fr/runtime/
http://users.skynet.be/mpfa/ pour débuter sur le forum


"didier" a écrit dans le message de
news: 32a601c52160$23644cc0$
Re
dans ta procédure je vais jamais ouvrir l'état, il faut
que je teste s'il y a des données à moins de placer ta
procédure sur No-data