Word VBA教程:WarnBeforeSavingPrintingSendingMarkup属性

如果该属性值为 True,则 Microsoft Word 在保存、打印或以电子邮件形式发送包含批注或修订的文档时,显示警告信息。Boolean 类型,可读写。

expression.WarnBeforeSavingPrintingSendingMarkup

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

VBA示例

本示例打印活动文档,但如果文档包含修订或批注,则允许用户放弃打印。


Sub SaferPrint
    Dim blnOldState as Boolean
    'Save old state in variable
    blnOldState = Application.Options.WarnBeforeSavingPrintingSendingMarkup
    'Turn on warning
    Application.Options.WarnBeforeSavingPrintingSendingMarkup = True
    'Print document
    ActiveDocument.PrintOut
    'Restore original warning state
    Application.Options.WarnBeforeSavingPrintingSendingMarkup = blnOldState
EndSub

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号