Discussion :

[veriecherie]

Bonjour à tous,

Dans un formulaire j'ai créé un bouton permettant de lancer l'impression d'un état. Jusque là ça va tout fonctionne. Ce que j'aimerai c'est qu'avant de lancer l'impression, il y est une boîte de dialogue permettant de choisir l'imprimant, de la configurer, etc... J'ai mis en pièce jointe la fenêtre que je souhaiterai voir apparaître avant que l'impression se lance.
Est-ce-que quelqu'un saurait si c'est juste une propriété du bouton à renseignée, ou alors du vba à rajouter ou autre ???
Merci

[Jean-Philippe André]

Bonjour,
deux aspects à traiter ici :
- mettre en imprimante par défaut pour l'état en question
- imprimer l'état en lançant le code VBA Docmd.OpenReport avec paramètre acViewNormal

[veriecherie]

merci jpcheck pour ta réponse, j'ai mis en application ton deuxième point

imprimer l'état en lançant le code VBA Docmd.OpenReport avec paramètre acViewNormal

Par contre le premier point je ne saisis pas ce qu'il faut que je fasse ?
Pourrais tu m'expliquer le premier point en plus détaillé stp.
Voilà mon code actuel affecté au bouton d'impression de l'état select_pick_multi

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
 
Private Sub imprimer_BP_multi_Click()
On Error GoTo Err_imprimer_BP_multi_Click
 
    Dim stDocName As String
 
    stDocName = "select_pick_multi"
    DoCmd.OpenReport stDocName, acViewNormal
 
Exit_imprimer_BP_multi_Click:
    Exit Sub
 
Err_imprimer_BP_multi_Click:
    MsgBox Err.Description
    Resume Exit_imprimer_BP_multi_Click
 
End Sub

Merci