Condividi tramite

Procedura: aggiungere intestazioni e piè di pagina ai documenti

  • Articolo

È possibile aggiungere testo a intestazioni e piè di pagina del documento utilizzando le proprietà Headers e Footers della classe Section. Ogni sezione di un documento contiene tre intestazioni e piè di pagina:

Le procedure relative alle personalizzazioni a livello di documento e ai componenti aggiuntivi a livello di applicazione sono differenti.

Si applica a: le informazioni fornite in questo argomento sono valide per i progetti a livello di documento e di applicazione per Word 2007 e Word 2010. Per ulteriori informazioni, vedere Funzionalità disponibili in base ai tipi di progetto e applicazioni di Office.

Personalizzazioni a livello di documento

Per utilizzare gli esempi di codice seguenti, eseguirli dall'interno della classe ThisDocument nel progetto.

Per aggiungere testo ai piè di pagina nel documento

  • Nell'esempio di codice riportato di seguito viene impostato il tipo di carattere del testo da inserire nel piè di pagina principale di ogni sezione del documento e viene inserito il testo nel piè di pagina.

    For Each section As Word.Section In Me.Sections
    Dim footerRange As Word.Range = section.Footers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range
    footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed
    footerRange.Font.Size = 20
    footerRange.Text = "Confidential"
Next

    foreach (Word.Section wordSection in this.Sections)
{
    Word.Range footerRange = wordSection.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed;
    footerRange.Font.Size = 20;
    footerRange.Text = "Confidential";
}

Per aggiungere testo alle intestazioni nel documento

  • Nell'esempio di codice riportato di seguito viene aggiunto un campo per il numero di pagina in ogni intestazione del documento, quindi viene impostato l'allineamento dei paragrafi in modo che il testo si allinei a destra dell'intestazione.

    For Each section As Word.Section In Me.Sections
    Dim headerRange As Word.Range = section.Headers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range
    headerRange.Fields.Add(headerRange, Word.WdFieldType.wdFieldPage)
    headerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight
Next

    foreach (Word.Section section in this.Sections)
{
    Word.Range headerRange = section.Headers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    headerRange.Fields.Add(headerRange, Word.WdFieldType.wdFieldPage);
    headerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;
}

Componenti aggiuntivi a livello di applicazione

Per utilizzare gli esempi di codice seguenti, eseguirli dall'interno della classe ThisAddIn nel progetto.

Per aggiungere testo ai piè di pagina di un documento

  • Nell'esempio di codice riportato di seguito viene impostato il tipo di carattere del testo da inserire nel piè di pagina principale di ogni sezione del documento e viene inserito il testo nel piè di pagina. In questo esempio di codice viene utilizzato il documento attivo.

    For Each section As Word.Section In Me.Application.ActiveDocument.Sections
    Dim footerRange As Word.Range = section.Footers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range
    footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed
    footerRange.Font.Size = 20
    footerRange.Text = "Confidential"
Next

    foreach (Word.Section wordSection in this.Application.ActiveDocument.Sections)
{
    Word.Range footerRange = wordSection.Footers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    footerRange.Font.ColorIndex = Word.WdColorIndex.wdDarkRed;
    footerRange.Font.Size = 20;
    footerRange.Text = "Confidential";
}

Per aggiungere testo alle intestazioni nel documento

  • Nell'esempio di codice riportato di seguito viene aggiunto un campo per il numero di pagina in ogni intestazione del documento, quindi viene impostato l'allineamento dei paragrafi in modo che il testo si allinei a destra dell'intestazione. In questo esempio di codice viene utilizzato il documento attivo.

    For Each section As Word.Section In Me.Application.ActiveDocument.Sections
    Dim headerRange As Word.Range = section.Headers(Word.WdHeaderFooterIndex.wdHeaderFooterPrimary).Range
    headerRange.Fields.Add(headerRange, Word.WdFieldType.wdFieldPage)
    headerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight
Next

    foreach (Word.Section section in this.Application.ActiveDocument.Sections)
{
    Word.Range headerRange = section.Headers[Word.WdHeaderFooterIndex.wdHeaderFooterPrimary].Range;
    headerRange.Fields.Add(headerRange, Word.WdFieldType.wdFieldPage);
    headerRange.ParagraphFormat.Alignment = Word.WdParagraphAlignment.wdAlignParagraphRight;
}

Vedere anche

Attività

Procedura: creare nuovi documenti

Procedura: estendere gli intervalli nei documenti

Procedura: scorrere in ciclo gli elementi trovati nei documenti