This object is a specialized version of PrintJob object. In addition to
all the features from PrintJob object, VisioPrintJob object
includes numerous Visio specific features.
If you need to set Visio specific options, use this specialized object instead of generalized PrintJob object. However, do not use this object for printing documents other than the ones Visio can handle.
Set oPrinter = CreateObject("easyPDF.Printer.8") Set oPrintJob = oPrinter.VisioPrintJob ' Set Visio specific option oPrintJob.PaperOrientation = PRN_PAPER_ORIENT_LANDSCAPE oPrintJob.PaperSize = PRN_VIS_PAPER_A4 oPrintJob.PrintScale = 80 oPrintJob.PrintOut "C:\test\input.vsd", "C:\test\output.pdf"