Pagine vuote automatica al termine di una sezione

Word consente di aggiungere diversi tipi di interruzioni di sezione nel documento. Due dei tipi di interruzione di sezione comportare l'aggiunta di pagine vuote al documento, se necessario. Ad esempio, se si utilizza una sezione Pagina dispari, e la sezione precedente termina con una pagina dispari, quindi Word inserisce automaticamente una pagina anche in bianco in modo che la sezione successiva può iniziare il prossimo dispari pagina.

Il problema è che Word inserisce una pagina-assolutamente vuota non ha nemmeno la stampa intestazioni o piè di pagina nella pagina. Se preferite le intestazioni e piè di pagina o qualche altra informazione sulla pagina (ad esempio "Pagina lasciata intenzionalmente in bianco"), allora non si può fare affidamento su interruzioni di sezione di Word solo.

Un approccio è quello di esaminare manualmente un documento e, se necessario, aggiungere il proprio testo invisibile che avrebbe "stampa" sulla pagina che altrimenti sarebbe vuota. È possibile creare testo invisibile per l'aggiunta di testo normale e la formattazione come bianco. Bianco su bianco, quando stampato, è invisibile. Word, tuttavia, non si rende conto questo e fornisce le intestazioni e piè di pagina nella pagina "vuota".

Un approccio interessante è quello di creare il proprio testo standard di fine sezione. Creare una voce di glossario che contiene il testo di fine sezione, tra cui un'interruzione di pagina all'inizio della voce. Rinominare la voce in qualcosa come "BLANKPAGE." Poi, alla fine di ogni sezione, poco prima della interruzione di sezione, aggiungere il seguente campo compound:

{If {= int ({page} / 2) * 2} = {page} "" {glossario "BLANKPAGE"}}

Ricordate che le parentesi graffe mostrati in questo esempio si suppone siano parentesi di campo. Si entra parentesi di campo premendo Ctrl + F9 per ogni set. Il campo verifica se la pagina corrente è, in questo caso, anche. Se lo è, allora il campo inserisce automaticamente le informazioni di glossario.

Se lo si desidera, è possibile anche creare una macro che è possibile scorrere il documento, guarda ogni sezione, decidere quante pagine sono nella sezione, e poi aggiungere un'interruzione di pagina alla fine della sezione, se necessario. La seguente macro fa molto compito:

Sub CheckSecLen ()
Dim ISEC As Integer
Dim ORNG come gamma
Dim iValue As Integer

Con ActiveDocument
'Passare attraverso ogni sezione (tranne l'ultimo)
Per ISEC = 1 Per .Sections.Count - 1
'Creare un oggetto range all'inizio della sezione
Set ORNG = .Sections (ISEC) .Range
oRng.Collapse wdCollapseStart
'Inserire un campo SectionPages
.Fields.Add Gamma: = ORNG, Tipo: = wdFieldSectionPages
'Dividere il campo SectionPages da 2
'Se dà uno zero come resto, allora
'Si dispone di un numero pari di pagine nella sezione,
', Che è quello che si vuole con una strana un'interruzione di pagina sezione
If (.Sections (ISEC) .Range.Fields (1) .Result Mod 2) <> 0 Then
'Se si dispone di un numero dispari di pagine, quindi inserire
'Un'interruzione di pagina prima della sezione di sezione
Set ORNG = .Sections (ISEC) .Range
Con ORNG
Direzione .Collapse: = wdCollapseEnd
Unità .MoveEnd: = wdCharacter, Count: = - 1
.InsertBreak Type: = wdPageBreak
End With
End If
'Rimuovere il campo SectionPages che è stato aggiunto
.Sections (ISEC) .Range.Fields (1) .Delete
Successivo ISEC
End With
End Sub

WordTips è la vostra fonte per la formazione Microsoft Word conveniente. (Microsoft Word è il più popolare software di elaborazione testi del mondo.) Questa punta (1870) si applica a Microsoft Word 97, 2000, 2002, e 2003. È possibile trovare una versione di questo suggerimento per l'interfaccia a barra multifunzione di Word (Word 2007 e più tardi) qui: Pagine vuote automatica a fine di una sezione.