Word VBA教程:DefaultLaserTray属性

返回或设置装有打印邮件标签的纸张的默认纸盒。WdPaperTray,可读写。

WdPaperTray 可以是下列 WdPaperTray 常量之一:
wdPrinterAutomaticSheetFeed
wdPrinterDefaultBin
wdPrinterEnvelopeFeed
wdPrinterFormSource
wdPrinterLargeCapacityBin
wdPrinterLargeFormatBin
wdPrinterLowerBin
wdPrinterManualEnvelopeFeed
wdPrinterManualFeed
wdPrinterMiddleBin
wdPrinterOnlyBin
wdPrinterPaperCassette
wdPrinterSmallFormatBin
wdPrinterTractorFeed
wdPrinterUpperBin

expression.DefaultLaserTray

expression   必需。该表达式返回“应用于”列表中的一个对象。

VBA示例

本示例检查并判断邮件标签打印机是否设置为手动进纸,然后在状态栏上显示一条消息。


If Application.MailingLabel.DefaultLaserTray = _
        wdPrinterManualEnvelopeFeed Then
    StatusBar = "Printer set for feeding labels manually"
Else
    StatusBar = "Check printer paper tray setting"
End If

本示例将上层纸盒设置为邮件标签送纸盒。


Application.MailingLabel.DefaultLaserTray = wdPrinterUpperBin

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号