Err_Commande91_Click:
MsgBox Err.Description
Resume Exit_Commande91_Click
=20
End Sub
Tout fonctionne bien, mais j'aimerais savoir comment=20
faire pour qu'il n'imprime que les =C9tats contenant des=20
donn=E9es au lieu de tout imprimer malgr=E9 que les =E9tats=20
soient vide ?
Bonjour, Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer) MsgBox "Aucune donnée à imprimer pour la période sélectionnée.", vbExclamation, Titre_Msg Cancel = True End Sub
et dans la procédure qui lance tes états Sub TaProc On Error GoTo Erreur DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ FinSub: Exit Sub Erreur: If err.Number = const_AnnuleDoCmd Then Resume Next Else MsgBox err.Number & " " & err.Description, , Titre_Msg_Err End If Resume FinSub End Sub
Cordialement Gilbert
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady
Bonjour,
Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer)
MsgBox "Aucune donnée à imprimer pour la période sélectionnée.",
vbExclamation, Titre_Msg
Cancel = True
End Sub
et dans la procédure qui lance tes états
Sub TaProc
On Error GoTo Erreur
DoCmd.OpenReport ........
DoCmd.OpenReport ........
DoCmd.OpenReport ........
DoCmd.OpenReport ........
FinSub:
Exit Sub
Erreur:
If err.Number = const_AnnuleDoCmd Then
Resume Next
Else
MsgBox err.Number & " " & err.Description, , Titre_Msg_Err
End If
Resume FinSub
End Sub
Cordialement
Gilbert
"Sady.." <anonymous@discussions.microsoft.com> a écrit dans le message de
news:20b4501c459a7$2d612c10$a101280a@phx.gbl...
Bonjour à tous, je suis vraiment novice en Access et VB,
soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette
commande:
Private Sub Commande91_Click()
On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String
Dim Schema As Long
VariableNuméro = InputBox("Entrer le numéro du
rapport")
Tout fonctionne bien, mais j'aimerais savoir comment
faire pour qu'il n'imprime que les États contenant des
données au lieu de tout imprimer malgré que les états
soient vide ?
Bonjour, Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer) MsgBox "Aucune donnée à imprimer pour la période sélectionnée.", vbExclamation, Titre_Msg Cancel = True End Sub
et dans la procédure qui lance tes états Sub TaProc On Error GoTo Erreur DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ FinSub: Exit Sub Erreur: If err.Number = const_AnnuleDoCmd Then Resume Next Else MsgBox err.Number & " " & err.Description, , Titre_Msg_Err End If Resume FinSub End Sub
Cordialement Gilbert
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady
?Lo»Paris?
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
"Sady.." <anonymous@discussions.microsoft.com> a écrit dans le message de
news:20b4501c459a7$2d612c10$a101280a@phx.gbl...
Bonjour à tous, je suis vraiment novice en Access et VB,
soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette
commande:
Private Sub Commande91_Click()
On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String
Dim Schema As Long
VariableNuméro = InputBox("Entrer le numéro du
rapport")
Tout fonctionne bien, mais j'aimerais savoir comment
faire pour qu'il n'imprime que les États contenant des
données au lieu de tout imprimer malgré que les états
soient vide ?
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
Raymond [mvp]
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et bien sûr l'essentiel : le texte. Me trompe-je ? -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" a écrit dans le message de news:
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher
par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous
avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et
bien sûr l'essentiel : le texte.
Me trompe-je ?
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" <news@news.net> a écrit dans le message de
news:uO2RyrcWEHA.644@tk2msftngp13.phx.gbl...
"Sady.." <anonymous@discussions.microsoft.com> a écrit dans le message de
news:20b4501c459a7$2d612c10$a101280a@phx.gbl...
Bonjour à tous, je suis vraiment novice en Access et VB,
soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette
commande:
Private Sub Commande91_Click()
On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String
Dim Schema As Long
VariableNuméro = InputBox("Entrer le numéro du
rapport")
Tout fonctionne bien, mais j'aimerais savoir comment
faire pour qu'il n'imprime que les États contenant des
données au lieu de tout imprimer malgré que les états
soient vide ?
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et bien sûr l'essentiel : le texte. Me trompe-je ? -- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" a écrit dans le message de news:
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher
par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
?Lo»Paris?
"Raymond [mvp]" a écrit dans le message de news:
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et bien sûr l'essentiel : le texte. Me trompe-je ?
Non-je ;o)
°Laurent°
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:OK0iA9cWEHA.208@TK2MSFTNGP10.phx.gbl...
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous
avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et
bien sûr l'essentiel : le texte.
Me trompe-je ?
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les === et bien sûr l'essentiel : le texte. Me trompe-je ?
Non-je ;o)
°Laurent°
Raymond [mvp]
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" a écrit dans le message de news:
"Raymond [mvp]" a écrit dans le message de news:
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les == et bien sûr l'essentiel : le texte. Me trompe-je ?
Non-je ;o)
°Laurent°
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
--
@+
Raymond Access MVP
http://access.seneque.free.fr/
http://access.vba.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" <news@news.net> a écrit dans le message de
news:u6upfEdWEHA.4092@TK2MSFTNGP11.phx.gbl...
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:OK0iA9cWEHA.208@TK2MSFTNGP10.phx.gbl...
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous
avait laissé tombés quelques temps, le pseudo, les ° , les '//, les == et
bien sûr l'essentiel : le texte.
Me trompe-je ?
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
-- @+ Raymond Access MVP http://access.seneque.free.fr/ http://access.vba.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/ pour débuter sur le forum
"?Lo»Paris?" a écrit dans le message de news:
"Raymond [mvp]" a écrit dans le message de news:
Bonjour Laurent.
Il me semble reconnaître le coup de patte d'un certain Laurent qui nous avait laissé tombés quelques temps, le pseudo, les ° , les '//, les == et bien sûr l'essentiel : le texte. Me trompe-je ?
Non-je ;o)
°Laurent°
?Lo»Paris?
"Raymond [mvp]" a écrit dans le message de news:
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
Merci Raymond, c'est sympa aussi de te retrouver.
°Laurent°
"Raymond [mvp]" <XYZ.access.seneque@free.fr> a écrit dans le message de
news:uiVCbNdWEHA.4064@TK2MSFTNGP11.phx.gbl...
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
ça fait plaisir et ça fera plaisir aussi à d'autres ici.
Merci Raymond, c'est sympa aussi de te retrouver.
°Laurent°
Gilbert
J'ai oublé de préciser que Const const_AnnuleDoCmd = 2501
-- Gilbert "Gilbert" a écrit dans le message de news:O$
Bonjour, Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer) MsgBox "Aucune donnée à imprimer pour la période sélectionnée.", vbExclamation, Titre_Msg Cancel = True End Sub
et dans la procédure qui lance tes états Sub TaProc On Error GoTo Erreur DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ FinSub: Exit Sub Erreur: If err.Number = const_AnnuleDoCmd Then Resume Next Else MsgBox err.Number & " " & err.Description, , Titre_Msg_Err End If Resume FinSub End Sub
Cordialement Gilbert
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady
J'ai oublé de préciser que
Const const_AnnuleDoCmd = 2501
--
Gilbert
"Gilbert" <ZZZZgilbertvie@tiscali.fr> a écrit dans le message de
news:O$62NqcWEHA.2852@TK2MSFTNGP12.phx.gbl...
Bonjour,
Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer)
MsgBox "Aucune donnée à imprimer pour la période sélectionnée.",
vbExclamation, Titre_Msg
Cancel = True
End Sub
et dans la procédure qui lance tes états
Sub TaProc
On Error GoTo Erreur
DoCmd.OpenReport ........
DoCmd.OpenReport ........
DoCmd.OpenReport ........
DoCmd.OpenReport ........
FinSub:
Exit Sub
Erreur:
If err.Number = const_AnnuleDoCmd Then
Resume Next
Else
MsgBox err.Number & " " & err.Description, , Titre_Msg_Err
End If
Resume FinSub
End Sub
Cordialement
Gilbert
"Sady.." <anonymous@discussions.microsoft.com> a écrit dans le message de
news:20b4501c459a7$2d612c10$a101280a@phx.gbl...
Bonjour à tous, je suis vraiment novice en Access et VB,
soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette
commande:
Private Sub Commande91_Click()
On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String
Dim Schema As Long
VariableNuméro = InputBox("Entrer le numéro du
rapport")
Tout fonctionne bien, mais j'aimerais savoir comment
faire pour qu'il n'imprime que les États contenant des
données au lieu de tout imprimer malgré que les états
soient vide ?
J'ai oublé de préciser que Const const_AnnuleDoCmd = 2501
-- Gilbert "Gilbert" a écrit dans le message de news:O$
Bonjour, Tu peux utiliser la procédure "Sur aucune donnée" de chaque état
Private Sub Report_NoData(Cancel As Integer) MsgBox "Aucune donnée à imprimer pour la période sélectionnée.", vbExclamation, Titre_Msg Cancel = True End Sub
et dans la procédure qui lance tes états Sub TaProc On Error GoTo Erreur DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ DoCmd.OpenReport ........ FinSub: Exit Sub Erreur: If err.Number = const_AnnuleDoCmd Then Resume Next Else MsgBox err.Number & " " & err.Description, , Titre_Msg_Err End If Resume FinSub End Sub
Cordialement Gilbert
"Sady.." a écrit dans le message de news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady
Sady
Bonjour,
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady
-----Message d'origine----- "Sady.." a écrit dans le message de
news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady ======================== ================
Bonjour Sady,
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher
par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
.
Bonjour,
j'ai inscrit le code dans mon état et le problème
maintenant est qu'il ne passe pas au suivant.. dès qu'il
voit un état sans données il m'ouvre la boite: L'action
OpenReport à été annulée. Il n'ouvre ensuite plus les
états suivant qui contiennent eux d'autres données..
Sady
-----Message d'origine-----
"Sady.." <anonymous@discussions.microsoft.com> a écrit
dans le message de
news:20b4501c459a7$2d612c10$a101280a@phx.gbl...
Bonjour à tous, je suis vraiment novice en Access et VB,
soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette
commande:
Private Sub Commande91_Click()
On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String
Dim Schema As Long
VariableNuméro = InputBox("Entrer le numéro du
rapport")
Tout fonctionne bien, mais j'aimerais savoir comment
faire pour qu'il n'imprime que les États contenant des
données au lieu de tout imprimer malgré que les états
soient vide ?
Merci de votre aide
Sady
======================== ================
Bonjour Sady,
Dans tes états tu doit géré événement 'sur aucune
donnée' :
Private Sub Report_NoData(Cancel As Integer)
'// Pas de données, on annule l'impression.
Cancel = True
End Sub
Important :
Tu doit aussi géré (dans événement Click de ton bouton)
l'erreur déclencher
par l'annulation de cet événement :
[...]
Err_Commande91_Click:
if err.number = 2105 then resume next
MsgBox Err.Description
Resume Exit_Commande91_Click
[...]
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady
-----Message d'origine----- "Sady.." a écrit dans le message de
news:20b4501c459a7$2d612c10$ Bonjour à tous, je suis vraiment novice en Access et VB, soyez le plus détaillé possible dans vos réponses s.v.p
Merci
une question.. dans mon bouton imprimer j'ai cette commande: Private Sub Commande91_Click() On Error GoTo Err_Commande91_Click
Dim VariableNuméro As String Dim Schema As Long VariableNuméro = InputBox("Entrer le numéro du rapport")
Tout fonctionne bien, mais j'aimerais savoir comment faire pour qu'il n'imprime que les États contenant des données au lieu de tout imprimer malgré que les états soient vide ?
Merci de votre aide
Sady ======================== ================
Bonjour Sady,
Dans tes états tu doit géré événement 'sur aucune donnée' :
Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Important : Tu doit aussi géré (dans événement Click de ton bouton) l'erreur déclencher
par l'annulation de cet événement :
[...] Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click [...]
°Laurent°
.
?Lo»Paris?
"Sady" a écrit dans le message de news:213fb01c45a09$049781a0$ Bonjour,
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady **************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs sur événement Click de ton bouton)
°Laurent°
"Sady" <anonymous@discussions.microsoft.com> a écrit dans le message de
news:213fb01c45a09$049781a0$a001280a@phx.gbl...
Bonjour,
j'ai inscrit le code dans mon état et le problème
maintenant est qu'il ne passe pas au suivant.. dès qu'il
voit un état sans données il m'ouvre la boite: L'action
OpenReport à été annulée. Il n'ouvre ensuite plus les
états suivant qui contiennent eux d'autres données..
Sady
**************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs sur événement Click
de ton bouton)
"Sady" a écrit dans le message de news:213fb01c45a09$049781a0$ Bonjour,
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady **************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs sur événement Click de ton bouton)
°Laurent°
Sady
Pour mieux se comprendre,
J'ai inscrit le code entier sur évenement click de mon bouton imprimer du formulaire "menu": Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click
Et dans l'états j'ai inscrit sur aucune donnée: Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Et ca ne passe pas au suivant, annule les autres états à imprimer malgré qu'ils aient des données.. Message: L'action OpenReport a été annulée..
Est-ce bien la commande que je devais faire et au bon endroits ?
Merci Sady
-----Message d'origine----- "Sady" a écrit dans le message de
news:213fb01c45a09$049781a0$ Bonjour,
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady **************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs sur événement Click
de ton bouton)
°Laurent°
.
Pour mieux se comprendre,
J'ai inscrit le code entier sur évenement click de mon
bouton imprimer du formulaire "menu":
Err_Commande91_Click:
if err.number = 2105 then resume next
MsgBox Err.Description
Resume Exit_Commande91_Click
Et dans l'états j'ai inscrit sur aucune donnée: Private
Sub Report_NoData(Cancel As Integer)
'// Pas de données, on annule l'impression.
Cancel = True
End Sub
Et ca ne passe pas au suivant, annule les autres états à
imprimer malgré qu'ils aient des données.. Message:
L'action OpenReport a été annulée..
Est-ce bien la commande que je devais faire et au bon
endroits ?
Merci
Sady
-----Message d'origine-----
"Sady" <anonymous@discussions.microsoft.com> a écrit
dans le message de
j'ai inscrit le code dans mon état et le problème
maintenant est qu'il ne passe pas au suivant.. dès qu'il
voit un état sans données il m'ouvre la boite: L'action
OpenReport à été annulée. Il n'ouvre ensuite plus les
états suivant qui contiennent eux d'autres données..
Sady
**************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs
sur événement Click
J'ai inscrit le code entier sur évenement click de mon bouton imprimer du formulaire "menu": Err_Commande91_Click: if err.number = 2105 then resume next MsgBox Err.Description Resume Exit_Commande91_Click
Et dans l'états j'ai inscrit sur aucune donnée: Private Sub Report_NoData(Cancel As Integer) '// Pas de données, on annule l'impression. Cancel = True End Sub
Et ca ne passe pas au suivant, annule les autres états à imprimer malgré qu'ils aient des données.. Message: L'action OpenReport a été annulée..
Est-ce bien la commande que je devais faire et au bon endroits ?
Merci Sady
-----Message d'origine----- "Sady" a écrit dans le message de
news:213fb01c45a09$049781a0$ Bonjour,
j'ai inscrit le code dans mon état et le problème maintenant est qu'il ne passe pas au suivant.. dès qu'il voit un état sans données il m'ouvre la boite: L'action OpenReport à été annulée. Il n'ouvre ensuite plus les états suivant qui contiennent eux d'autres données..
Sady **************************
Sady,
Tu à oublier le code du formulaire, (gestion des erreurs sur événement Click