Sélectionner le nombre de copie d'un état

**nounous54** · 10/08/2016, 22h10

Bonjour,

je souhaiterais laisser la possibilité au usagés de choisir la quantité de copie il souhaite imprimer.

J'ai essayer le code suivant mais à chaque fois il m'imprime mon état au format PDF alors que mon imprimant par défaut est bonne...
Et de plus il ne m'imprime q'un seul exemplaire.

Voici le code utilisé..

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
 
Private Sub bt_imp_F_inscr_vierge_Click()
Dim Nbcopies As Integer
 
    'Message pour demander le nombre de copies
    Nbcopies = InputBox("Saisissez le nombre de copies souhaitée:", "Nombre de copies", 1)
 
        DoCmd.OpenReport "etat_fiche_inscription_vierge", acViewPreview     'ouvrir le'état
        DoCmd.PrintOut acPages, , , , Nbcopies                            'lancer l'impression en fonction du nombre demandé    
        DoCmd.Close acReport, "etat_fiche_inscription_vierge"               'fermer l'état
 
End Sub

encore plus bizarre , c'est qu'avec n'importe quel code, cette etat (et uniquement celui là) s'imprime au format PDF.

Quelqu'un à une idée?

MErci par avance