Bonjour,
Je suis désolé de reposer ma question, mais celle-ci est restée sans réponse.
J'ai un problème d'impression. En fait, j'ai un document qui est scindé en 3
états (car comporte au total 5 pages).
Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton),
mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String
stDocName = "état1"
DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String
stDocName2 = "état2"
DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String
stDocName3 = "état3"
DoCmd.OpenReport stDocName3, acNormal
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Gafish
Ben wrote:
Bonjour,
Bonjour,
Je suis désolé de reposer ma question, mais celle-ci est restée sans réponse. J'ai un problème d'impression. En fait, j'ai un document qui est scindé en 3 états (car comporte au total 5 pages). Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton), mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String stDocName = "état1" DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String stDocName2 = "état2" DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String stDocName3 = "état3" DoCmd.OpenReport stDocName3, acNormal
Merci de vos solutions, Ben
C'est bizarre qu'ils ne s'impriment pas correctement tous. Tu n'as rien d'autre comme code sur le clic ? Et si pour tester tu indroduis une rupture entre chaque, par exemple tu peux mettre un msgbox qui est modal. Essaie par exemple de mettre entre chaque openreport une ligne par exemple msgbox "Ce que tu veux" Est ce que ca marche comme cela ?
Arnaud -- Charte du forum : http://users.skynet.be/mpfa/ Recherche dans les archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Ben wrote:
Bonjour,
Bonjour,
Je suis désolé de reposer ma question, mais celle-ci est restée sans
réponse. J'ai un problème d'impression. En fait, j'ai un document qui
est scindé en 3 états (car comporte au total 5 pages).
Je souhaite imprimer ces 3 états sur une seule action (click d'un
bouton), mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String
stDocName = "état1"
DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String
stDocName2 = "état2"
DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String
stDocName3 = "état3"
DoCmd.OpenReport stDocName3, acNormal
Merci de vos solutions,
Ben
C'est bizarre qu'ils ne s'impriment pas correctement tous. Tu n'as rien
d'autre comme code sur le clic ?
Et si pour tester tu indroduis une rupture entre chaque, par exemple tu peux
mettre un msgbox qui est modal. Essaie par exemple de mettre entre chaque
openreport une ligne par exemple
msgbox "Ce que tu veux"
Est ce que ca marche comme cela ?
Arnaud
--
Charte du forum : http://users.skynet.be/mpfa/
Recherche dans les archives :
http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Je suis désolé de reposer ma question, mais celle-ci est restée sans réponse. J'ai un problème d'impression. En fait, j'ai un document qui est scindé en 3 états (car comporte au total 5 pages). Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton), mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String stDocName = "état1" DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String stDocName2 = "état2" DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String stDocName3 = "état3" DoCmd.OpenReport stDocName3, acNormal
Merci de vos solutions, Ben
C'est bizarre qu'ils ne s'impriment pas correctement tous. Tu n'as rien d'autre comme code sur le clic ? Et si pour tester tu indroduis une rupture entre chaque, par exemple tu peux mettre un msgbox qui est modal. Essaie par exemple de mettre entre chaque openreport une ligne par exemple msgbox "Ce que tu veux" Est ce que ca marche comme cela ?
Arnaud -- Charte du forum : http://users.skynet.be/mpfa/ Recherche dans les archives : http://groups.google.fr/group/microsoft.public.fr.access?hl=fr
Gilbert
Bonjour
As-tu essayé de mettre un DoEvents entre deux impressions?
-- Gilbert
"Ben" a écrit dans le message de news:
Bonjour, Je suis désolé de reposer ma question, mais celle-ci est restée sans réponse. J'ai un problème d'impression. En fait, j'ai un document qui est scindé en 3 états (car comporte au total 5 pages). Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton), mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String stDocName = "état1" DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String stDocName2 = "état2" DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String stDocName3 = "état3" DoCmd.OpenReport stDocName3, acNormal
Merci de vos solutions, Ben
Bonjour
As-tu essayé de mettre un DoEvents entre deux impressions?
--
Gilbert
"Ben" <Ben@discussions.microsoft.com> a écrit dans le message de news:
03B4DC73-8FD2-41EB-A02B-6A7A40AB735A@microsoft.com...
Bonjour,
Je suis désolé de reposer ma question, mais celle-ci est restée sans
réponse.
J'ai un problème d'impression. En fait, j'ai un document qui est scindé en
3
états (car comporte au total 5 pages).
Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton),
mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String
stDocName = "état1"
DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String
stDocName2 = "état2"
DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String
stDocName3 = "état3"
DoCmd.OpenReport stDocName3, acNormal
As-tu essayé de mettre un DoEvents entre deux impressions?
-- Gilbert
"Ben" a écrit dans le message de news:
Bonjour, Je suis désolé de reposer ma question, mais celle-ci est restée sans réponse. J'ai un problème d'impression. En fait, j'ai un document qui est scindé en 3 états (car comporte au total 5 pages). Je souhaite imprimer ces 3 états sur une seule action (click d'un bouton), mais seul le premier état s'imprime. Voici mon code :
Dim stDocName As String stDocName = "état1" DoCmd.OpenReport stDocName, acNormal
Dim stDocName2 As String stDocName2 = "état2" DoCmd.OpenReport stDocName2, acNormal
Dim stDocName3 As String stDocName3 = "état3" DoCmd.OpenReport stDocName3, acNormal
