imprimer une liste d'états plusieurs fois en fonction d'une quantité demandée
1 réponse
Melou
Bonjour,
je travaille sur access pour r=E9aliser un reporting mensuel. Ce dernier
contient diff=E9rents =E9tats =E0 imprimer dans un ordre pr=E9d=E9fini.
J'ai donc un formulaire avec un bouton "imprimer" dans lequel j'ai
saisi le code qui met dans l'ordre l'=E9dition des =E9tats pour un
reporting.
Cependant, j'aimerais qu'en cliquant sur ce m=EAme bouton, une input box
me demande "combien d'exemplaires ?" et qu'en fonction du chiffre
saisie, x exemplaires de reporting tri=E9 soient imprim=E9s.
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
Jacques
Bonjour,
Dans un module, écrire la fonction suivante :
Public sub fgImprimeCopiesEtat(stEtat As String, itCopies As Integer) ' stEtat : nom de l'état ' itCopies : nombre de copies DoCmd.OpenReport stEtat, acViewPreview DoCmd.PrintOut acPages, , , , itCopies DoCmd.Close acReport, stEtat End subUtilisation :
Sur un bouton imprimer d'un formulaire :
fgImprimeCopiesEtat("MonEtat",3)Ceci imprime trois exemplaires du même état.
Jacques
"Melou" a écrit dans le message de news: Bonjour,
je travaille sur access pour réaliser un reporting mensuel. Ce dernier contient différents états à imprimer dans un ordre prédéfini.
J'ai donc un formulaire avec un bouton "imprimer" dans lequel j'ai saisi le code qui met dans l'ordre l'édition des états pour un reporting. Cependant, j'aimerais qu'en cliquant sur ce même bouton, une input box me demande "combien d'exemplaires ?" et qu'en fonction du chiffre saisie, x exemplaires de reporting trié soient imprimés.
Merci de bien vouloir m'aider :-)
Bonjour,
Dans un module, écrire la fonction suivante :
Public sub fgImprimeCopiesEtat(stEtat As String, itCopies As Integer)
' stEtat : nom de l'état
' itCopies : nombre de copies
DoCmd.OpenReport stEtat, acViewPreview
DoCmd.PrintOut acPages, , , , itCopies
DoCmd.Close acReport, stEtat
End subUtilisation :
Sur un bouton imprimer d'un formulaire :
fgImprimeCopiesEtat("MonEtat",3)Ceci imprime trois exemplaires du même état.
Jacques
"Melou" <manoubena@aol.com> a écrit dans le message de
news:1135713681.786809.183160@o13g2000cwo.googlegroups.com...
Bonjour,
je travaille sur access pour réaliser un reporting mensuel. Ce dernier
contient différents états à imprimer dans un ordre prédéfini.
J'ai donc un formulaire avec un bouton "imprimer" dans lequel j'ai
saisi le code qui met dans l'ordre l'édition des états pour un
reporting.
Cependant, j'aimerais qu'en cliquant sur ce même bouton, une input box
me demande "combien d'exemplaires ?" et qu'en fonction du chiffre
saisie, x exemplaires de reporting trié soient imprimés.
Public sub fgImprimeCopiesEtat(stEtat As String, itCopies As Integer) ' stEtat : nom de l'état ' itCopies : nombre de copies DoCmd.OpenReport stEtat, acViewPreview DoCmd.PrintOut acPages, , , , itCopies DoCmd.Close acReport, stEtat End subUtilisation :
Sur un bouton imprimer d'un formulaire :
fgImprimeCopiesEtat("MonEtat",3)Ceci imprime trois exemplaires du même état.
Jacques
"Melou" a écrit dans le message de news: Bonjour,
je travaille sur access pour réaliser un reporting mensuel. Ce dernier contient différents états à imprimer dans un ordre prédéfini.
J'ai donc un formulaire avec un bouton "imprimer" dans lequel j'ai saisi le code qui met dans l'ordre l'édition des états pour un reporting. Cependant, j'aimerais qu'en cliquant sur ce même bouton, une input box me demande "combien d'exemplaires ?" et qu'en fonction du chiffre saisie, x exemplaires de reporting trié soient imprimés.
