How to programme "microsoft print to pdf" virtual printer in vb.net

Question

0.00/5 (No votes)

See more:

Does anybody know how to program the "Microsoft Print to PDF" virtual printer downloaded with Windows 10.
I want to print an Excel worksheet using "Microsoft Print to PDF" virtual printer.
I want to be able to set the path and filename of the pdf file within the code.
I have tried the code below but it requires the user to put the filename and path in before creating the PDF file.

What I have tried:

VB

Private Sub SaveWorksheetAsPDF(Title As String, Path As String)
        Dim FileName As String = "ResultsSheet" & Title & ".pdf"

        'Print the document to PDF
        oSheet.PrintOut(copies:=1, Preview:=True, ActivePrinter:="Microsoft Print To PDF")

       'Wait until the file shows up before closing PDF Creator
        Do
            My.Application.DoEvents()
        Loop Until Dir(Path & FileName) = FileName

     End Sub

Posted 22-Feb-16 7:46am

Dave the Golfer

Updated 22-Feb-16 8:49am

Add a Solution

Comments

Maciej Los 22-Feb-16 14:46pm

I'm affraid you can't define the name of file you want to create via pdf printer. You can only print the copy of sheet to virtual pdf printer.

1 solution

Add a Solution

Add your solution here

Treat my content as plain text, not as HTML

Preview 0

…

Existing Members

Sign in to your account

...or Join us

Download, Vote, Comment, Publish.

Your Email
Password
Forgot your password?

Your Email
This email is in use. Do you need your password?
Optional Password

I have read and agree to the Terms of Service and Privacy Policy
Please subscribe me to the CodeProject newsletters

When answering a question please:

Read the question carefully.
Understand that English isn't everyone's first language so be lenient of bad spelling and grammar.
If a question is poorly phrased then either ask for clarification, ignore it, or edit the question and fix the problem. Insults are not welcome.
Don't tell someone to read the manual. Chances are they have and don't get it. Provide an answer or move on to the next question.

Let's work to help developers, not make them feel stupid.

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)

Richard Deeming · Accepted Answer · 2016-02-22T08:49:00

Solution 1

You need to pass the PrToFileName and PrintToFile parameters to the PrintOut method[^]:

VB.NET

Dim fullPath As String = System.IO.Path.GetFullPath(FileName)
oSheet.PrintOut(copies:=1, Preview:=True, ActivePrinter:="Microsoft Print To PDF", PrToFileName:=fullPath, PrintToFile:=True)

Posted 22-Feb-16 8:49am

Richard Deeming

Comments

Dave the Golfer 22-Feb-16 17:32pm

Richard

Thanks for the advice. All is working OK.