Sem oscilação Palavra Títulos Entre quebras de página?
Pergunta
Alguém tem uma boa maneira VBA (ou talvez há uma MS Word configuração não consigo encontrar) para se certificar de que os títulos do Word não o segure no final de uma página.
Por exemplo, suponha que os números à esquerda são números de página.
1 This is the second to last line on the page. 1 HEADING 1 2 This text starts page two
O que eu quero fazer é automaticamente mover Título 1 para baixo para que:
1 This is the second to last line on the page. 1 2 HEADING 1 2 This text starts page two
Eu estou familiarizado com esta pergunta: Obtendo os títulos a partir de um documento do Word
Obrigado!
Solução
Você quer "Manter com o próximo" (Parágrafo formatação> linha e de página guia breaks).
Possivelmente também de interesse: viúva / controle órfão
Outras dicas
Parece que o cenário cabeçalho pendurado só descrever ocorre quando a fonte é definir manualmente eo estilo é inicialmente deixado em Normal.
Se você definir o estilo nos títulos para ser a posição 1, 2 ou 3, que irá impedir o cabeçalho de ser à esquerda na parte inferior da página por si só.
Se você decidir mudar o seu documento para usar cabeçalhos baseadas em estilo, você vai querer alterar os estilos de título na janela Estilos e Formatação.
Para abrir essa janela, ou:
- Clique no botão
Styles and Formatting
na barra de ferramentas (o botão "A" para a esquerda do selector da fonte), ou - Abra-o através da opção de menu
Format > Styles and Formatting...
.
Depois, você pode mouse sobre os estilos disponíveis, selecione a seta suspensa, clique Modify...
, e alterar os estilos ao seu gosto.
(Testado com o Word 2003).
Há uma maneira. Quando você definir seus estilos não se esqueça de definir TRUE para .ParagraphFormat.KeepTogheter ou .ParagraphFormat.KeepWithNext