How to set printer properties using vb.net

Question

I am using EDRAW to browse a Microsoft Word and can be Print , Preview , ETC... And I am planning to add some features to it. I am adding 2 buttons for Print Short (8.5 by 11 inches) and Print Long (8.5 by 13 inches) and I have 2 printers for long and short. How to set the properties of the printers in each button?. If I click button short it will print short using printer 1 same as the button long but it is in printer 2.

I am following the code in the Link provided above.

Anyone has an idea about it?. Any suggestion well help and well be accepted. Thanks.. Cheers.. I will give a 50 bounty to it after two days..

Code as @Hadi request

Here is my button code for print.

Private Sub btnPrint_Click(sender As System.Object, e As System.EventArgs) Handles btnPrint.Click
    AxEDOffice1.SetActivePrinter("Printer Name")
    AxEDOffice1.ActiveDocument.PageSetup.PaperSize = Microsoft.Office.Interop.Word.WdPaperSize.wdPaperA4
    AxEDOffice1.PrintDialog()
End Sub

and getting an error Object variable or With block variable not set in the line code of AxEDOffice1.ActiveDocument.PageSetup.PaperSize = Microsoft.Office.Interop.Word.WdPaperSize.wdPaperA4

VB.NET is not vba - please read the tag text and remove the one that doesnt apply — Ňɏssa Pøngjǣrdenlarp
– Ňɏssa Pøngjǣrdenlarp, Commented Nov 28, 2016 at 1:26
Possible duplicate of How to set MS Word page size via the automation API? — Hans Passant
– Hans Passant, Commented Dec 4, 2016 at 13:16
@Kira you are putting a user answer into your question. i think that people can read his answer. By the way it not a good thing to change your questioon every time get answered. — Yahfoufi
– Yahfoufi, Commented Dec 6, 2016 at 15:43

Hadi · Accepted Answer · 2016-12-06 06:34:17Z

1

+50

After Checking the library all you have to do is using SetActivePrinter Method to change your default printer like the following:

 AxEDOffice1.SetActivePrinter("Adobe PDF")

And to change PaperSize you have to use the following

AxEDOffice1.ActiveDocument.PageSetup.PaperSize = Microsoft.Office.Interop.Word.WdPaperSize.wdPaperA4

AxEDOffice1.ActiveDocument is an instance of Microsoft.Office.Interop.Word.WordDocumentClass

Code tested it and it works fine.

EDIT 1:

Object variable or With block variable not set

Read more about it on this MSDN article there are many suggestions.

EDIT 2:

To Print your document directly without showing PrintDialog you have to use PrintOut Function.

AxEDOffice1.PrintOut(EDOfficeLib.WdPrintOutRange.wdPrintAllDocument)

edited Dec 6, 2016 at 6:34

answered Dec 4, 2016 at 12:58

Hadi

37.5k13 gold badges73 silver badges128 bronze badges

Sign up to request clarification or add additional context in comments.

5 Comments

KiRa Over a year ago

I got an error.. Value of type Boolean cannot be converted to System.Windows.Form.PrintDialog

KiRa Over a year ago

I got this error "Object variable or With block variable not set." in the paper size

KiRa Over a year ago

you still there?.. You're the one who almost got my problem :(

Hadi Over a year ago

@Kira i tested my code and it worked fine. Can you provide us the code you wrote.

KiRa Over a year ago

Ow man :D I focus on print button and I forgot to open first a document that I want to print. Is there a code that direct print? no need to show a dialog print?.

Community · Accepted Answer · 2017-05-23 12:09:01Z

0

It looks like Change printername in PrintDialog through code deals with making sure a print dialog box pre-selects the printer based on printer name in vb.net.

edited May 23, 2017 at 12:09

CommunityBot

11 silver badge

answered Dec 3, 2016 at 21:36

Paul Buis

8257 silver badges7 bronze badges

Collectives™ on Stack Overflow

How to set printer properties using vb.net

2 Answers 2

5 Comments

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

2 Answers 2

5 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related