Propriedade Options.WarnBeforeSavingPrintingSendingMarkup (Word)

True para o Microsoft Word exibir um aviso ao salvar, imprimir ou enviar como email um documento contendo comentários ou alterações rastreadas. Boolean de leitura/gravação.

Sintaxe

expression. WarnBeforeSavingPrintingSendingMarkup

Expressão Uma expressão que retorna um objeto 'Options'.

Exemplo

Este exemplo imprime o documento ativo, mas permite ao usuário parar a impressão se o documento tiver comentários ou alterações controladas.

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

Confira também

Objeto Options

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.