本文摘要:这篇教程将教会你使用 CorelDRAW VBA代码打印文档(单个或者多个页面)。利用VBA打印文件很简单:几乎所有的打印设置,在“打印”对话框中都可以通过 Document.PrintSettings 属性来指定。
' 设置打印属性
With Ac
警告: 转载本站文章请注明出处为:CDR插件技术网,并携带文章页面地址。否则视为侵权,本站保留追究权利。
这篇教程将教会你使用 CorelDRAW VBA代码打印文档(单个或者多个页面)。利用VBA打印文件很简单:几乎所有的打印设置,在“打印”对话框中都可以通过 Document.PrintSettings 属性来指定。通过这些属性的设置,打印文档是一件简单的事情,通过调用 Document.PrintOut 方法来实现打印。
代码演示
Sub main()
' 设置打印属性
With ActiveDocument.PrintSettings
.Copies = 3 ' 副本数量(打印份数)
.PrintRange = prnPageRange ' 设置打印范围为页面区间
.PageRange = "1, 3-4" ' 打印第1页、第3至4页
.Options.PrintJobInfo = True ' 开启打印信息输出
With .PostScript
.DownloadType1 = True ' 开启下载类型
.Level = prnPSLevel3 ' 设置 PostScript 的级别
End With
End With
' 调用打印方法
ActiveDocument.PrintOut
End Sub
打印对话框说明
打印对话框中的每一页都有一个相应的对象模型类,其中包含该页的所有设置。下面的表格列出了这些类。
打印页选项 | 对应的对象模型
通用设置:PrintSettings类
布局设置:PrintSettings类、PrintLayout类
间距设置:PrintSeparations类、PrintTrapping类
印前设置:PrintPrepress类
PostScript设置:PrintPostScript类
杂项设置:PrintOptions类
说明:
你可以在VBA中使用布局选项。必要的话,你可以使用 PrintSettings.ShowDialog 方法来打开打印对话框。
如果你要打印的只是选中的图形而不是整个页面,把 PrintSettings.PrintRange 的属性设置为 prnSelection 即可。
你可以指定一个具体的打印机来进行打印。Application.Printers 列出了系统可用的打印机集合,设置 PrintSettings.Printer 属性即可指定具体的打印机。
要保存打印配置,使用 PrintSettings.Save 方法来保存配置即可。
要访问和加载一个已保存的打印配置,使用 PrintSettings.Load 方法,注意的是必须要指定配置文件的全路径。
如果要还原默认的打印设置,使用 PrintSettings.Reset 方法即可。
打印事件处理
在打印过程中,可以通过编写指定的打印事件来触发自定义功能,以下是事件列表:
Application.DocumentBeforePrint:在应用程序级别,所有文档开始打印前触发。
Document.BeforePrint:在文档级别,开始打印前触发。
GlobalMacroStorage.DocumentBeforePrint:在全局宏级别,所有文档开始打印前触发。
Application.DocumentAfterPrint:在应用程序级别,所有文档打印后触发。
Document.AfterPrint:在文档级别,文档打印后触发。
GlobalMacroStorage.DocumentAfterPrint:在全局宏级别,所有文档打印后触发。
Application.QueryDocumentPrint:在应用程序级别,所有文档在请求打印时触发。
Document.QueryPrint:在文档级别,文档在请求打印时触发。
GlobalMacroStorage.QueryDocumentPrint:在全局宏级别,所有文档在请求打印时触发。
小结
使用VBA打印文件是经常使用、非常有用的功能,配合打印机的自动选择,可以实现自动创建文档、自动选择打印机进行打印功能,大大减少人工操作量。
评论
功能开发中,近期上线。