bonjour à tous,
après quelques recherches sur le forum je vois que je ne suis pas le seul à avoir des soucis avec le printdocument cependant je n'ai pas trouvé de quoi résoudre mon problème.
Je souhaite imprimé un document word de façon a ce que la premiere page soit en couleur et le reste en noir et blanc. Mais avant cela je souhaitrai imprimé!!!
je ne comprends pas pourquoi mais lorsque je lance une impression j'obtiens une page blanche. voici mon code:
merci pour l aide
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 Dim reponse As MsgBoxResult Dim doc_print As New PrintDocument Dim apercut As New PrintPreviewDialog reponse = MsgBox("Imprimer le document" & " " & list_doc.Text & "?", MsgBoxStyle.YesNo, "Impression document Word") doc_print.DocumentName = tab.Item(list_doc.SelectedIndex) If reponse = MsgBoxResult.Yes Then Form2.ShowDialog() doc_print.DocumentName = tab(list_doc.SelectedIndex) With doc_print.PrinterSettings .PrinterName = Form2.Getnomimprimante .FromPage = 1 .Copies = 1 .DefaultPageSettings.Color = False End With apercut.Document = doc_print apercut.ShowDialog() doc_print.Print()
Partager