这篇教程将教会你使用 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打印文件是经常使用、非常有用的功能,配合打印机的自动选择,可以实现自动创建文档、自动选择打印机进行打印功能,大大减少人工操作量。


评论关闭
IT源码网

微信公众号号:IT虾米 (左侧二维码扫一扫)欢迎添加!

php nginx 返回截断,PHP返回数据被nginx截断问题的解决方法