Neste artigo, haverá 2 maneiras rápidas de alterar o tipo de quebra de seção em seu documento do Word.
Os tipos de quebra de seção mais usados no Word são "Próxima Página" e "Contínua". Inserir a primeira significa iniciar uma nova página para a nova seção. Isso divide as seções de forma clara. No entanto, na hora de imprimir, serão necessárias várias folhas. Certamente, não é uma opção ecologicamente correta. Nesse caso, você pode considerar usar a quebra "Contínua", que economiza bastante papel, mas pode não atender tão bem à necessidade de separação.
Portanto, queremos apresentar maneiras que você pode escolher de acordo com requisitos específicos.
Método 1: Alterar a configuração da página
- Primeiramente, posicione o cursor dentro da seção desejada e clique na guia “Layout da Página” na Faixa de Opções.
- Em seguida, clique no botão de seta no grupo “Configuração de página” para abrir a caixa de diálogo com o mesmo nome.
- Em seguida, clique na guia "Layout" na caixa.
- E selecione o tipo de quebra de seção desejado na caixa de combinação "Início da seção".
- Em seguida, na caixa de combinação “Aplicar a”, selecione um intervalo de aplicação. Você pode optar por alterar o tipo de uma única quebra de seção ou várias também.
Aqui está o resultado:
Método 2: Executar macro do Word para alterar o tipo de todas as quebras de seção em um documento
- Para começar, pressione “Alt + F11” para abrir o editor VBA no Word.
- Em seguida, clique no projeto “Normal” e clique na guia “Inserir” na barra de menu.
- Em seguida, escolha “Módulo” no menu suspenso.
- Em seguida, clique duas vezes no novo módulo para abri-lo.
- Agora no espaço de edição, basta colar estes códigos:
Sub ChangeNextPageBreakToContinuous()
Dim nSectionNum As Integer
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
nSectionNum = objDoc.Sections.Count
For nSectionNum = nSectionNum To 1 Step -1
With objDoc.Sections(nSectionNum).Range.PageSetup
If .SectionStart = wdSectionNewPage Then
.SectionStart = wdSectionContinuous
End If
End With
Next nSectionNum
Application.ScreenUpdating = True
End Sub
- Pressione “F5” para executar a macro.
Esta macro deve alterar todas as quebras de seção do tipo “Próxima página” para “Contínuo”. O resultado é o mesmo do método 1.
Agora, se você precisar alterar todas as quebras de seção contínuas para o tipo “Próxima página”, use a seguinte macro:
Sub ChangeContinuousBreakToNextPageBreak()
Dim nSectionNum As Integer
Dim objDoc As Document
Application.ScreenUpdating = False
Set objDoc = ActiveDocument
nSectionNum = objDoc.Sections.Count
For nSectionNum = nSectionNum To 1 Step -1
With objDoc.Sections(nSectionNum).Range.PageSetup
If .SectionStart = wdSectionContinuous Then
.SectionStart = wdSectionNewPage
End If
End With
Next nSectionNum
Application.ScreenUpdating = True
End Sub
Ferramenta para Reparar Documentos
Não é improvável encontrar problemas no Word e acabar com documento danificado. Assim, você deve agir imediatamente. E a maneira mais rápida de recuperar seus dados é escolher uma ferramenta de reparo qualificada.
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 reparar xls e pdf reparar produtos de software. Para mais informações visite www.datanumen.com



