Word VBA教程:PrintOut方法

应用于 Application、Document 和 Window对象的 PrintOut方法。

该方法可打印指定文档的全部或部分。

expression.PrintOut(Background, Append, Range, OutputFileName, From, To, Item, Copies, Pages, PageType, PrintToFile, Collate, FileName, ActivePrinterMacGX, ManualDuplexPrint, PrintZoomColumn, PrintZoomRow, PrintZoomPaperWidth, PrintZoomPaperHeight)

expression   必需。该表达式返回上述对象之一。

Background   Variant 类型,可选。如果将该参数设为 True,则 Microsoft Word 在打印文档时继续运行宏。

Append   Variant 类型,可选。如果将该参数设为 True,则将指定文档添至由 OutputFileName参数所指定的文件中。如果将该参数设为 False,则覆盖 OutputFileName参数所指定文件的内容。

Range  Variant 类型,可选。该参数表示页面范围。可以是任意WdPrintOutRange 常量。

wdPrintAllDocument
wdPrintCurrentPage
wdPrintFromTo
wdPrintRangeOfPages
wdPrintSelection

OutputFileName   Variant 类型,可选。如果 PrintToFile 的值为 True,则该参数指定输出文件的路径和文件名。

From   Variant 类型,可选。如果将 Range 设为 wdPrintFromTo,则该参数指定起始页码。

To   Variant 类型,可选。如果将 Range 设为 wdPrintFromTo,则该参数指定结束页码。

Item  Variant 类型,可选。该参数代表要打印的项目。可以是任意WdPrintOutItem 常量。

wdPrintAutoTextEntries
wdPrintComments
wdPrintDocumentContent
wdPrintKeyAssignments
wdPrintProperties
wdPrintStyles

Copies   Variant 类型,可选。该参数代表要打印的份数。

Pages   Variant 类型,可选。该参数表示要打印的页码和页码范围,以逗号分隔各项。例如,“2, 6-10”表示打印第 2 页和第 6 至 10 页。

PageType  Variant 类型,可选。该参数表示要打印的页面类型。可以是任意WdPrintOutPages 常量。

wdPrintAllPages
wdPrintEvenPagesOnly
wdPrintOddPagesOnly

PrintToFile   Variant 类型,可选。如该参数值为 True,则将打印指令发送到文件。请确认使用 OutputFileName参数指定文件名。

Collate   Variant 类型,可选。在打印文档的多份副本时,如果该参数值为 True,则完成打印所有页面后再打印下一份副本。

FileName   Variant 类型,可选。该参数表示要打印的文档的路径和文件名。如果忽略该参数,Word 将打印活动文档。(仅应用于 Application对象)

ActivePrinterMacGX   Variant 类型,可选。该参数仅应用于 Microsoft Office Macintosh 版本。有关该参数的详细信息,请参阅 Microsoft Office Macintosh 版本中的语言参考“帮助”。

ManualDuplexPrint  Variant 类型,可选。如果该参数值为 True,则表示要在无双面打印组件的打印机上打印双面文档。如果该参数值为 True,则忽略PrintBackgroundPrintReverse属性。使用PrintOddPagesInAscendingOrderPrintEvenPagesInAscendingOrder属性可在手动双面打印时控制输出。由于选择或安装的语言支持不同,(例如,美国英语),该参数可能无法使用。

PrintZoomColumn   Variant 类型,可选。该参数表示 Word 在一页纸上水平放置的页数。可以是 1、2、3 或 4。与 PrintZoomRow参数一同使用可在单张纸上打印多页文档。

PrintZoomRow   Variant 类型,可选。该参数表示 Word 在一页纸上垂直放置的页数。可以是 1、2、3 或 4。与 PrintZoomColumn参数一同使用可在单张纸上打印多页文档。

PrintZoomPaperWidth   Variant 类型,可选。该参数表示 Word 将打印页面缩放到的宽度,以缇为单位(20 缇 = 1 磅;72 磅 = 1 英寸)。

PrintZoomPaperHeight   Variant 类型,可选。该参数表示 Word 将打印页面缩放到的高度,以缇为单位(20 缇 = 1 磅;72 磅 = 1 英寸)。

应用于 Envelope对象的 PrintOut方法。

打印信封但不将信封添至活动文档。

expression.PrintOut(ExtractAddress, Address, AutoText, OmitReturnAddress, ReturnAddress, ReturnAutoText, PrintBarCode, PrintFIMA, Size, Height, Width, FeedSource, AddressFromLeft, AddressFromTop, ReturnAddressFromLeft, ReturnAddressFromTop, DefaultFaceUp, DefaultOrientation, PrintEPostage, Vertical, RecipientNamefromLeft, RecipientNamefromTop, RecipientPostalfromLeft, RecipientPostalfromTop, SenderNamefromLeft, SenderNamefromTop, SenderPostalfromLeft, SenderPostalfromTop)

expression   必需。该表达式返回一个 Envelope对象。

ExtractAddress  Variant 类型,可选。如果该参数值为 True,则将“EnvelopeAddress”书签(一个用户定义的书签)标记的文本用于收信人地址。

Address  Variant 类型,可选。该参数为指定收信人地址的字符串(如果 ExtractAddress 的值为 True,则忽略该参数)。

AutoText   Variant 类型,可选。该参数表示包含收信人地址的“自动图文集”词条的名称。

OmitReturnAddress   Variant 类型,可选。如果该参数值为 True,则忽略寄信人地址。

ReturnAddress  Variant 类型,可选。该参数为指定寄信人地址的字符串。

ReturnAutoText   Variant 类型,可选。该参数表示包含寄信人地址的“自动图文集”词条的名称。

PrintBarCode  Variant 类型,可选。如果该参数值为 True,则添加一个 POSTNET 条形码。仅用于美国邮件。

PrintFIMA  Variant 类型,可选。如果该参数值为 True,则添加一个“即复标记”(Facing Identification Mark,缩写为 FIM-A)用于预先识别礼节性回邮。仅用于美国邮件。

Size   Variant 类型,可选。该参数为指定信封尺寸的字符串。该字符串必须与“信封选项”对话框中“信封尺寸”框左侧列出的信封尺寸相匹配(例如,“10 型”)。

Height  Variant 类型,可选。如果将 Size参数设为“自定义大小”,则该参数表示信封的高度(以磅为单位)。

Width  Variant 类型,可选。如果将 Size参数设为“自定义大小”,则该参数表示信封的宽度(以磅为单位)。

FeedSource  Variant 类型,可选。如果该属性值为 True,则使用Envelope对象的FeedSource属性指定在打印信封时使用的纸盒。

AddressFromLeft  Variant 类型,可选。该参数表示信封左边缘与收信人地址间的距离(以磅为单位)。

AddressFromTop  Variant 类型,可选。该参数表示信封上边缘与收信人地址间的距离(以磅为单位)。

ReturnAddressFromLeft  Variant 类型,可选。该参数表示信封左边缘与寄信人地址间的距离(以磅为单位)。

ReturnAddressFromTop  Variant 类型,可选。该参数表示信封上边缘与寄信人地址间的距离(以磅为单位)。

DefaultFaceUp  Variant 类型,可选。如果该参数值为 True,则正面向上打印信封;如果该参数值为 False,则正面向下打印信封。

DefaultOrientation  Variant 类型,可选。该参数表示信封的方向。可以是任意WdEnvelopeOrientation 常量。

wdLeftPortrait
wdCenterPortrait
wdRightPortrait
wdLeftLandscape
wdCenterLandscape
wdRightLandscape
wdLeftClockwise
wdCenterClockwise
wdRightClockwise

PrintEPostage  Variant 类型,可选。如果该参数值为 True,则使用 Internet 电子邮政供应商打印邮政。

Vertical  Variant 类型,可选。如果该参数值为 True,则在信封上垂直打印文本。用于亚洲语言信封。

RecipientNamefromLeft  Variant 类型,可选。该参数表示收信人姓名距信封左边缘的位置(以磅为单位),用于亚洲语言信封。

RecipientNamefromTop  Variant 类型,可选。该参数表示收信人姓名距信封上边缘的位置(以磅为单位),用于亚洲语言信封。

RecipientPostalfromLeft  Variant 类型,可选。该参数表示收信人邮政编码距信封左边缘的位置(以磅为单位),用于亚洲语言信封。

RecipientPostalfromTop  Variant 类型,可选。该参数表示收信人邮政编码距信封上边缘的位置(以磅为单位),用于亚洲语言信封。

SenderNamefromLeft  Variant 类型,可选。该参数表示寄信人姓名距信封左边缘的位置(以磅为单位),用于亚洲语言信封。

SenderNamefromTop  Variant 类型,可选。该参数表示寄信人姓名距信封上边缘的位置(以磅为单位),用于亚洲语言信封。

SenderPostalfromLeft  Variant 类型,可选。该参数表示寄信人邮政编码距信封左边缘的位置(以磅为单位),用于亚洲语言信封。

SenderPostalfromTop  Variant 类型,可选。该参数表示寄信人邮政编码距信封上边缘的位置(以磅为单位),用于亚洲语言信封。

应用于 MailingLabel对象的 PrintOut方法。

打印一个标签或具有相同地址的一页标签。

expression.PrintOut(Name, Address, ExtractAddress, LaserTray, SingleLabel, Row, Column, PrintEPostageLabel, Vertical)

expression   必需。该表达式返回一个MailingLabe对象。

Name   Variant 类型,可选。该参数表示邮件标签的名称。

Address   Variant 类型,可选。该参数表示标签地址文本。

ExtractAddress   Variant 类型,可选。如果该属性值为 True,则使用“EnvelopeAddress”书签(一个用户定义的书签)标记的文本作为标签文本。如果指定该参数,则忽略 Address 和 AutoText参数。

LaserTray  Variant 类型,可选。该参数表示要使用的激光打印机纸盒。该参数可以是任意WdReplace 常量。

wdPrinterAutomaticSheetFeed
wdPrinterDefaultBin
wdPrinterEnvelopeFeed
wdPrinterFormSource
wdPrinterLargeCapacityBin
wdPrinterLargeFormatBin
wdPrinterLowerBin
wdPrinterManualEnvelopeFeed
wdPrinterManualFeed
wdPrinterMiddleBin
wdPrinterOnlyBin
wdPrinterPaperCassette
wdPrinterSmallFormatBin
wdPrinterTractorFeed
wdPrinterUpperBin

SingleLabel   Variant 类型,可选。如果该参数值为 True,则打印一个单独的标签,如果该参数值为 False,则打印一页相同的标签。

Row   Variant 类型,可选。该参数表示用于单独标签的标签行。如果 SingleLabel 为 False,则该参数无效。

Column   Variant 类型,可选。用于单独标签的标签列。如果 SingleLabel 为 False,则该属性无效。

PrintEPostageLabel  Variant 类型,可选。如果该参数值为 True,则使用 Internet 电子邮政供应商打印邮政。

Vertical  Variant 类型,可选。如果该参数值为 True,则纵向打印标签上的文本。用于亚洲语言邮件标签。

VBA示例

当应用于 Application、Document 和 Window对象时。

本示例打印活动文档的当前页面。


ActiveDocument.PrintOut Range:=wdPrintCurrentPage

本示例打印当前文件夹中的所有文档。Dir函数用于返回所有扩展名为“.doc”的文件名。


adoc = Dir("*.DOC")
Do While adoc <> ""
    Application.PrintOut FileName:=adoc
    adoc = Dir()
Loop

本示例打印活动窗口中文档的前三页。


ActiveDocument.ActiveWindow.PrintOut _
    Range:=wdPrintFromTo, From:="1", To:="3"

本示例打印活动文档中的备注。


If ActiveDocument.Comments.Count >= 1 Then
    ActiveDocument.PrintOut Item:=wdPrintComments
End If

本示例将打印活动文档,每张纸上打印六页文档。


ActiveDocument.PrintOut PrintZoomColumn:=3, _
    PrintZoomRow:=2

本示例按实际尺寸的 75% 打印活动文档。


ActiveDocument.PrintOut _
    PrintZoomPaperWidth:=0.75 * (8.5 * 1440), _
    PrintZoomPaperHeight:=0.75 * (11 * 1440)

当应用于 Envelope对象时。

本示例打印信封,使用用户地址作为寄信人地址,以及预定义的收信人地址。


recep = "Don Funk" & vbCr & "123 Skye St." & vbCr & _
    "OurTown, WA 98107"
ActiveDocument.Envelope.PrintOut Address:=recep, _
    ReturnAddress:=Application.UserAddress, _
    Size:="Size 10", PrintBarCode:=True

当应用于 MailingLabel对象时。

本示例使用指定的地址打印一页 Avery 5664 型邮件标签。


addr = "Jane Doe" & vbCr & "123 Skye St." _
    & vbCr & "OurTown, WA 98107"
Application.MailingLabel.PrintOut Name:="5664", Address:=addr

Word VBA教程

Word VBA参考教程:目录1 Word VBA参考教程:目录2
Word VBA参考教程:目录3 Word VBA参考教程:目录4
Word VBA参考教程:目录5 Word VBA参考教程:目录6
Word VBA参考教程:目录7 Word VBA参考教程:目录8
Word VBA参考教程:目录9 Word VBA参考教程:目录10
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号