Como imprimir em lote a Última Página de vários documentos do Word

Em muitos casos, só precisa da última página de um documento do Word — por exemplo, uma página de assinatura ou um resumo final. Infelizmente, o Word não permite imprimir em lote apenas a última página por predefinição. A boa notícia? Existem duas formas viáveis de o conseguir.

• Método 1: Imprimir em lote Última Página com Kutools para Word
• Método 2: Imprimir em lote Última Página utilizando uma macro VBA

Imprima em lote a Última Página de cada documento utilizando o Kutools

O Kutools para Word inclui uma funcionalidade dedicada Impressão em Lote que facilita a aplicação da mesma regra de impressão a vários documentos de uma só vez. Assim, pode imprimir apenas a Última Página de cada documento sem precisar de os abrir um a um. Funciona tanto com ficheiros individuais como com pastas inteiras (incluindo subpastas).

1. Abra o Word. No Friso, clique em KUTOOLS PLUS > Impressão em Lote.

   

2. Na janela Imprimir Páginas Específicas, realize os seguintes passos:
   1. Adicione os documentos que pretende imprimir:
      • Clique em Adicionar Arquivos para escolher documentos do Word específicos.
      • Ou clique em Adicionar Pasta para incluir todos os documentos numa pasta e nas suas subpastas.
   2. Selecione Última Página na secção Intervalo de Impressão.
   3. Clique em Imprimir.

      

      Dicas:

      • Outras opções no Intervalo de Impressão permitem-lhe imprimir a primeira página, todas as páginas, páginas ímpares ou pares, ou um intervalo personalizado de páginas em todos os documentos.
      • Ative Imprimir em ordem inversa para alterar a ordem de saída das páginas, o que ajuda a manter as páginas impressas corretamente organizadas.

Após a conclusão do lote, o Kutools para Word apresenta uma janela de resumo com o número de documentos impressos com sucesso.

Imprima em lote a Última Página de cada documento com VBA

Se preferir uma solução integrada sem depender de extras, pode usar uma macro VBA para imprimir apenas a última página de cada documento do Word numa pasta. Esta abordagem exige alguma configuração inicial, mas, uma vez pronta, a macro pode ser reutilizada sempre que necessário.

1. Num documento novo ou separado do Word que não pretenda imprimir, prima Alt + F11 para abrir o editor VBA.
2. Clique em Inserir>Módulo.

   

3. Cole a macro abaixo na janela Módulo e substitua C:\YourFolder\pelo caminho da sua própria pasta.

   Sub BatchPrintLastPage()
       Dim folderPath As String
       Dim fileName As String
       Dim doc As Document
       Dim lastPage As Long
   
       ' Set your folder path here (must end with a backslash)
       folderPath = "C:\YourFolder\"
       
       If Right(folderPath, 1) <> "\" Then folderPath = folderPath & "\"
   
       fileName = Dir(folderPath & "*.doc*")
   
       Application.ScreenUpdating = False
   
       Do While fileName <> ""
           Set doc = Documents.Open( _
               fileName:=folderPath & fileName, _
               ReadOnly:=True, _
               AddToRecentFiles:=False _
           )
   
           doc.Repaginate
           lastPage = doc.ComputeStatistics(wdStatisticPages)
   
           doc.PrintOut Range:=wdPrintRangeOfPages, Pages:=CStr(lastPage), Background:=False
   
           doc.Close SaveChanges:=wdDoNotSaveChanges
           fileName = Dir()
       Loop
   
       Application.ScreenUpdating = True
   End Sub
   

4. Prima F5 para executar a macro.

A macro imprime apenas a última página de cada documento do Word na pasta especificada, excluindo os documentos armazenados em subpastas.

Conclusão

Imprimir apenas a última página de vários documentos do Word não é uma funcionalidade diretamente suportada pelo Word. Se procura uma solução rápida e visual, o Kutools Impressão em Lote é a opção mais fácil e fiável. Caso prefira uma abordagem integrada e não se importe com uma configuração inicial, uma macro VBA pode executar a tarefa e ser reutilizada sempre que precisar repetir o mesmo fluxo de trabalho.

Esperamos que tenha achado este tutorial útil! Se quiser explorar mais dicas e soluções práticas para o Word, clique aqui para consultar a nossa coleção completa de tutoriais do Word.