php activedocument->printout(),CorelDRAW VBA - 打印文档 Document.PrintOut-CDR插件技术网(原VBA探秘)...

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

评论

功能开发中,近期上线。

评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值