Skip to main content

Kutools para Office — Uma Suíte. Cinco Ferramentas. Aumente sua Produtividade.

Como salvar a página atual ou cada página como um documento do Word separado?

Author Xiaoyang Last modified

Se o seu documento do Word contém várias páginas, você pode precisar salvar apenas uma página atual como um novo arquivo do Word. A abordagem usual é copiar e colar o conteúdo da página atual em um novo arquivo do Word e depois salvá-lo. No entanto, este artigo mostrará métodos mais eficientes para salvar a página atual ou cada página como documentos separados de um único arquivo do Word.

Salvar a página atual como um novo documento do Word com código VBA

Salvar cada página como documentos do Word separados com Kutools para Word


Salvar a página atual como um novo documento do Word com código VBA

O seguinte código VBA ajudará você a salvar o conteúdo da página atual em um novo arquivo do Word. Siga estes passos:

  1. Pressione as teclas ALT + F11 para abrir a janela Microsoft Visual Basic for Applications.
  2. Clique em Inserir > Módulo, e cole o seguinte código no Módulo janela:
    Sub SaveCurrentPageAsANewDoc()
        Dim xDoc As Document
        Dim xNewDoc As Document
        Dim xFileName As String
        Dim xFolderPath As Variant
        Dim xDlg As FileDialog
        Set xDoc = ActiveDocument
        xFileName = InputBox("Enter file name here: ", "KuTools for Word")
        If xFileName = "" Then Exit Sub
        Set xDlg = Application.FileDialog(msoFileDialogFolderPicker)
        If xDlg.Show = -1 Then
            xFolderPath = xDlg.SelectedItems(1)
            xDoc.Bookmarks("\Page").Range.Select
            Selection.Copy
            Set xNewDoc = Documents.Add
            Selection.Paste
            xNewDoc.SaveAs xFolderPath & "\" & xFileName & ".docx"
            xNewDoc.Close
        End If
    End Sub
  3. Pressione F5 para executar este código. Na caixa de diálogo que aparece, insira um nome para o novo arquivo. Veja a captura de tela:
    Dialog with input box to enter a name for the new document
  4. Clique em OK, e na segunda caixa de diálogo Navegar que aparece, selecione uma pasta onde o novo arquivo será salvo.
    Browse window
  5. Clique em OK, e o conteúdo da página atual será salvo como um novo arquivo do Word. Você pode visualizar o resultado na pasta selecionada.

Salvar cada página como documentos do Word separados com Kutools para Word

Se você deseja salvar cada página de todo o documento como arquivos separados, a função Dividir do Kutools para Word pode ajudá-lo.

Kutools para Word,equipado com IA 🤖, oferece mais de 100 recursos práticos para simplificar suas tarefas.

Após instalar o Kutools para Word, siga estes passos:

  1. Clique em Kutools Plus > Dividir. Veja a captura de tela:
    Split button on the Kutools Plus tab on the ribbon
  2. Na Dividir Documento caixa de diálogo:
    1. Selecione Página na lista suspensa Dividir por.
    2. Clique em Folder selection icon botão para escolher uma pasta para salvar os novos arquivos.
    3. Especifique o prefixo para os novos arquivos salvos conforme necessário.
      Split Document dialog box
  3. Depois de concluir as configurações, clique em OK para iniciar a divisão. Todas as páginas no documento do Word serão salvas como arquivos separados na pasta especificada. Veja a captura de tela:
    All pages of the document are saved as separate files in the specific folder

Melhores Ferramentas de Produtividade para Office

Kutools for Word – Aprimore sua experiência no Word com mais de 100 recursos incríveis!

🤖 Funcionalidades de IA do Kutools: AI Assistant / Assistente em Tempo Real / Super Polir (Preservar Formato) / Super Traduzir (Preservar Formato) / Redação por IA / Revisão por IA...

📘 Domínio de Documentos: Dividir Páginas / Mesclar Documentos / Exportar Seleção em vários formatos (PDF/TXT/DOC/HTML...) / Converter em Lote para PDF...

Edição de Corpo: Localizar e Substituir em Lote em múltiplos arquivos / Redimensionar todas as Imagens / Transpor Linhas e Colunas de Tabela / Converter Tabela para Texto...

🧹 Limpeza Fácil: Elimine Espaços Extras / Quebras de Seção / Caixas de Texto / Hiperlinks / Para mais ferramentas de Remover, acesse o grupo Remover...

Inserções Criativas: Inserir Delimitadores de Milhares / Caixas de Seleção / Botões de Rádio / Código QR / Código de Barras / Múltiplas Imagens / Descubra mais no grupo Inserir...

🔍 Seleções Precisas: Localize Páginas Específicas / Tabelas / Formas / Parágrafos de Título / Melhore a navegação com mais recursos de Selecionar...

Melhorias Destacadas: Navegue para qualquer Intervalo / Insira Texto Repetitivo automaticamente / Alternar entre Janelas de Documento /11 ferramentas de Conversão...

🌍 Compatível com40+ Idiomas: Use Kutools no seu idioma preferido — compatível com Inglês, Espanhol, Alemão, Francês, Chinês e mais de40 outros!

Kutools and Kutools Plus tabs on the Word Ribbon
👉 Quer experimentar esses recursos? Baixe o Kutools for Word agora! 🚀
 

✨ Kutools for Office – Uma Instalação, Cinco Ferramentas Poderosas!

Inclui Office Tab Pro · Kutools para Excel · Kutools para Outlook · Kutools for Word · Kutools for PowerPoint

📦 Tenha todas as5 ferramentas em uma única suíte | 🔗 Integração perfeita com o Microsoft Office | ⚡ Economize Tempo e aumente a produtividade imediatamente

Melhores Ferramentas de Produtividade para Office

Kutools for Word – 100+ ferramentas para Word