Como excluir várias páginas específicas em um documento do Word?
Em um documento do Word, você pode selecionar o conteúdo da página atual e, em seguida, pressionar a tecla Delete para excluir a página atual facilmente. Mas, se você precisar remover várias páginas de um arquivo Word grande, como poderá resolver isso rapidamente?
Exclua um intervalo de páginas em um documento do Word com o recurso Ir para
Exclua várias páginas específicas no documento do Word com código VBA
Exclua um intervalo de páginas em um documento do Word com o recurso Ir para
Se você quiser excluir um intervalo de páginas consecutivas de um documento do Word, o recurso Ir para pode fazer um favor.
1. Inicie o documento do Word cujas páginas você deseja excluir.
2. Então aperte F5 chave para abrir o Localizar e substituir caixa de diálogo, sob o ir para guia, clique em Página no Ir para o que caixa de listagem e, em seguida, digite o número da página inicial que deseja excluir e pressione Entrar chave para ir para a página específica, veja a captura de tela:
2. Então feche isso Localizar e substituir caixa de diálogo e pressione F8 para ligar o Modo estendido.
3. Continue pressionando F5 chave para abrir o Localizar e substituir caixa de diálogo, desta vez, insira o número da página final que deseja excluir e pressione Entrar chave. Todas as páginas de 15 a 20 foram selecionadas de uma vez. Veja a imagem:
4. Por fim, pressione Apagar tecla diretamente para excluir essas páginas de uma vez.
Exclua várias páginas específicas no documento do Word com código VBA
Para excluir várias páginas específicas de um arquivo do Word que não sejam consecutivas, o código VBA a seguir pode ajudá-lo.
1. Segure o ALT + F11 chaves para abrir o Microsoft Visual Basic para Aplicações janela.
2. Clique inserção > Móduloe cole o código a seguir na janela do módulo.
Código VBA: exclua várias páginas específicas no arquivo Word:
Sub DeletePagesInDoc()
Dim xRange As Range
Dim xPage As String
Dim xDoc As Document
Dim xArr
Dim I, xSplitCount As Long
Application.ScreenUpdating = False
Set xDoc = ActiveDocument
xPage = InputBox("Enter the page numbers of pages to be deleted: " & vbNewLine & _
"use comma to separate numbers", "KuTools for Word", "")
xArr = Split(xPage, ",")
xPageCount = UBound(xArr)
For I = xPageCount To 0 Step -1
Selection.GoTo wdGoToPage, wdGoToAbsolute, xArr(I)
xDoc.Bookmarks("\Page").Range.Delete
Next
Application.ScreenUpdating = True
End Sub
3. Então aperte F5 para executar este código, e uma caixa de prompt é exibida para lembrá-lo de inserir os números de página que deseja excluir, separe os números de página por vírgula, consulte a captura de tela:
4. E então, clique OK botão, todas as páginas que você especificou foram excluídas de uma vez.
|
Selecione várias páginas específicas e exclua-as de uma vez:
Se você deseja excluir várias páginas específicas de um grande documento do Word, Kutools for Word's Selecione as páginas recurso pode ajudá-lo a selecionar quaisquer páginas conforme necessário e, em seguida, pressione Apagar para excluí-los de uma vez.
Kutools for Word: com mais de 100 suplementos úteis do Word, grátis para testar sem limitação em 60 dias. Clique para baixar e testar gratuitamente agora! |
Melhores ferramentas de produtividade de escritório
Kutools for Word - Eleve sua experiência com palavras com mais 100 Recursos notáveis!
🤖 Assistente de IA do Kutools: Transforme sua escrita com IA - Gerar conteúdo / Reescrever texto / Resumir documentos / Pergunte para obter informações com base no documento, tudo dentro do Word
📘 Domínio de documentos: Páginas divididas / Mesclar Documentos / Seleção de exportação em vários formatos (PDF/TXT/DOC/HTML...) / Conversão em lote para PDF / Exportar páginas como imagens / Imprima vários arquivos de uma vez...
✏ Edição de conteúdo: Localização e substituição em lote em vários arquivos / Redimensionar todas as imagens / Transpor linhas e colunas da tabela / Converter tabela em texto...
🧹 Limpeza sem esforço: Varrer Espaços extras / Quebras de seção / Todos os cabeçalhos / Caixas de Texto / hiperlinks / Para mais ferramentas de remoção, acesse nosso Remover Grupo...
➕ Inserções criativas: Inserir Mil Separadores / Caixas de seleção / botões de rádio / QR Code / Código de barras / Tabela de linhas diagonais / Legenda da equação / Legenda da Imagem / Legenda da Tabela / Várias fotos / Descubra mais no Inserir Grupo...
🔍 Seleções de precisão: Identificar páginas específicas / tabelas / formas / parágrafos de título / Melhore a navegação com mais Selecione recursos...
⭐ Aprimoramentos de estrelas: Navegue rapidamente para qualquer local / inserir automaticamente texto repetitivo / alternar perfeitamente entre janelas de documentos / 11 ferramentas de conversão...
