Bonjour,
Mon but: imprimer plusieurs états en un seul clic...
Ce que j'ai actuellement dans le code associé à mon bouton:
Le gros problème, c'est que c'est une succession d'impressions donc je dois cliquer sur OK à chaque impression malgré tout.
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
19
20
21
22
23
24
25 Private Sub Commande315_Click() On Error GoTo Err_suivi_imp_Click Dim stDocName As String stDocName = "E(R(T-001-06)-01102)" DoCmd.OpenReport stDocName, acNormal Err_suivi_imp_Click: MsgBox Err.Description On Error GoTo Err_usin_bout_imp_Click Dim stDocName1 As String stDocName1 = "E(R(T-001-06)-01103)" DoCmd.OpenReport stDocName1, acNormal Err_usin_bout_imp_Click: MsgBox Err.Description ... End Sub
Ceci n'est pas le plus gros problème.
En effet, quand je définis mon imprimante "PDF Converter", il va m'enregistrer tous les pdf séparemment et non en un seul pdf et c'est cela que je veux faire.
Merci d'avance.
Partager