No próximo artigo, vamos nos concentrar em apresentar a você 3 maneiras rápidas de imprimir seu documento do Word sem marcações.
Se o seu documento exigir revisão, você definitivamente obterá todos os tipos de marcações em seu documento. Existem maneiras de não mostrá-los na tela. Que tal não imprimi-los?
A resposta é positiva. E nosso tópico de hoje é dedicado a fornecer a você 3 métodos rápidos e eficazes para atingir o objetivo.
Método 1: Alterar opções de impressão
- Para começar, clique na guia "Arquivo" na faixa de opções.
- Em seguida, clique no comando “Imprimir”.
- Em seguida, vá para a seção "Configurações" e clique na primeira caixa suspensa.
- No menu, desmarque a opção “Imprimir marcação”. Você não verá marcações em nenhum lugar na visualização do lado direito, que é o resultado exato que você obterá.
- Por fim, escolha a impressora e defina outra formatação e clique em “Imprimir”.
Método 2: Use códigos VBA
Caso você prefira o processamento automático, a execução de uma macro é sua melhor escolha.
- Primeiro, pressione “Alt+F11” para acionar o editor VBA no Word.
- Em seguida, clique em “Normal”.
- Em seguida, clique na guia “Inserir” e escolha “Módulo” em seu menu.
- Em seguida, clique duas vezes para abrir o módulo e cole os seguintes códigos:
Sub PrintDocWithoutComments()
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub
- Por fim, clique em “Executar”.
A linha de código “Cópias:=1” define a cópia impressa como 1. Você pode alterar o número de cópias conforme necessário.
Método 3: impressão em lote de vários documentos sem marcações
Agora, se você tiver um grande número de arquivos que precisam ser impressos sem marcações, a macro a seguir economizará seu tempo.
- Primeiramente, coloque todos os documentos de destino na mesma pasta.
- Em seguida, instale e execute a macro seguindo as etapas do método 2.
- Substitua a macro por esta:
Sub BatchPrintDocsWithoutComments()
Dim objDoc As Document
Dim strFile As String, strFolder As String
' Initialization
strFolder = InputBox("Enter folder path:")
strFile = Dir(strFolder & "*.docx", vbNormal)
While strFile <> ""
Set objDoc = Documents.Open(FileName:=strFolder & strFile)
Set objDoc = ActiveDocument
Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
objDoc.Save
objDoc.Close
strFile = Dir()
Wend
End Sub
- Agora, há uma caixa de entrada. Digite o caminho da pasta onde você armazena todos os documentos de destino e clique em “OK”. Não se esqueça da última “\” no caminho.
Lide com a Corrupção de Documentos
A corrupção de documentos tem sido um tema frequentemente recorrente. Como consequência, recuperação de documentos subiu ao palco. Há uma função interna no Word que ajuda a recuperar os arquivos quebrados. Infelizmente, às vezes não funciona bem. Assim, você precisa de uma ferramenta mais qualificada para fazer o trabalho.
Introdução do autor:
Vera Chen é especialista em recuperação de dados em DataNumen, Inc., líder mundial em tecnologias de recuperação de dados, incluindo Recuperação do Excel e pdf reparar produtos de software. Para mais informações visite www.datanumen.com



