このオブジェクトはPrintJob
の特別バージョンです。
PrintJobジョブからの全ての仕様に加えて、VisioPrintJobオブジェクトは数多くのVisio特有の仕様を含んでいます。
Visio特有のオプションの設定が必要な場合、このオブジェクトを通常のPrintJobオブジェクトの代わりに使用してください。
Visioが取扱える印刷文書以外にこのオブジェクトを使用しないで下さい。
Set oPrinter = CreateObject("easyPDF.Printer.6")
Set oPrintJob = oPrinter.VisioPrintJob
' Visio特有のオプションを設定します
oPrintJob.PaperOrientation = PRN_PAPER_ORIENT_LANDSCAPE
oPrintJob.PaperSize = PRN_VIS_PAPER_A4
oPrintJob.PrintScale = 80
oPrintJob.PrintOut "C:\input.vsd", "C:\output.pdf"