Come inserire il numero di pagina in una cella / intestazione / piè di pagina in Excel?

Quando stampi un file Excel, potresti aver bisogno di inserire i numeri di pagina nelle pagine per rendere il file stampato ordinato e leggibile. In questo articolo, ti presenterò alcuni trucchi rapidi per inserire i numeri di pagina in una cella, nell'intestazione o nel piè di pagina.

Inserisci il numero di pagina nell'intestazione / piè di pagina in un foglio di lavoro

Inserisci il numero di pagina nell'intestazione / piè di pagina su più fogli di lavoro

Inserisci il numero di pagina in una cella con il codice VBA

Rimuovi tutti i numeri di pagina contemporaneamente in Excel

Inserisci il numero di pagina nell'intestazione / piè di pagina in un foglio di lavoro

Normalmente, possiamo inserire rapidamente i numeri di pagina nell'intestazione o nel piè di pagina utilizzando la funzione Intestazione e piè di pagina; procedi come segue:

1. Vai al foglio di lavoro in cui desideri inserire i numeri di pagina nell'intestazione o nel piè di pagina.

2. Quindi fai clic su Inserisci > Intestazione e piè di pagina, e il tuo foglio di lavoro sarà visualizzato nella vista Layout di pagina, vedi screenshot:

3. Fai clic sull'intestazione o sul piè di pagina dove vuoi inserire il numero di pagina, e verrà visualizzata una scheda Design con Strumenti intestazione e piè di pagina sulla Barra multifunzione, quindi fai clic su Design > Numero di pagina, vedi screenshot:

4. E puoi vedere il segnaposto &[Pagina] apparire nella sezione selezionata, quindi fai clic ovunque all'esterno dell'area dell'intestazione o del piè di pagina per visualizzare i numeri di pagina. Vedi screenshot:

5. Ora, puoi tornare alla visualizzazione normale facendo clic su Visualizza > Normale, e quando stampi questo foglio di lavoro, vedrai che i numeri di pagina sono stati inseriti nell'intestazione o nel piè di pagina che hai selezionato.

Nota: Se desideri che i numeri di pagina siano visualizzati nel formato 1 di 15, 2 di 15, ti basta digitare direttamente &[Pagina] di &[Pagine] nel campo dell'intestazione o del piè di pagina, vedi screenshot:

Inserisci il numero di pagina nell'intestazione / piè di pagina su più fogli di lavoro

Il metodo sopra descritto può aiutarti a inserire i numeri di pagina in un foglio di lavoro; se vuoi inserire i numeri di pagina in tutti i fogli di lavoro della cartella di lavoro per numerare tutte le pagine in ordine sequenziale, procedi come segue:

1. Seleziona tutte le schede dei fogli, poi vai alla scheda Layout di pagina e fai clic sull'icona Pulsante di avvio finestra di dialogo nel gruppo Imposta pagina, vedi screenshot:

2. Nella finestra di dialogo Imposta pagina, fai clic sulla scheda Intestazione/Piè di pagina, e poi fai clic su Intestazione personalizzata o Piè di pagina personalizzato per impostare l'intestazione o il piè di pagina desiderato, vedi screenshot:

3. E nella finestra di dialogo Intestazione o Piè di pagina, definisci la posizione in cui inserire i numeri di pagina facendo clic all'interno della casella Sezione sinistra:, Sezione centrale:, o Sezione destra: secondo necessità, e poi fai clic sull'icona Inserisci numero di pagina, e appare il segnaposto &[Pagina]. Vedi screenshot:

Nota: Inserisci &[Pagina] di &[Pagine] nel campo dell'intestazione o del piè di pagina se desideri che i numeri di pagina siano visualizzati come 1 di 45, 2 di 45…

4. Quindi fai clic su OK > OK per chiudere le finestre di dialogo; quando stampi questa cartella di lavoro, nell'anteprima di stampa, puoi vedere che tutti i numeri di pagina sono inseriti nell'intestazione o nel piè di pagina in ordine sequenziale.

Inserisci il numero di pagina in una cella con il codice VBA

È facile inserire i numeri di pagina nell'intestazione o nel piè di pagina, ma se hai bisogno di inserire i numeri di pagina in una cella del foglio di lavoro, non c'è un modo diretto per farlo. Il seguente codice VBA può aiutarti a risolvere questo problema.

1. Fai clic su una cella in cui vuoi visualizzare il numero di pagina di questa cella.

2. Tieni premuti i tasti ALT + F11, e si aprirà la finestra Microsoft Visual Basic for Applications.

3. Fai clic su Inserisci > Modulo, e incolla il seguente codice nella Finestra del modulo.

Codice VBA: Inserisci il numero di pagina corrente in una cella:

Sub pagenumber()
'updateby Extendoffice 20160506
    Dim xVPC As Integer
    Dim xHPC As Integer
    Dim xVPB As VPageBreak
    Dim xHPB As HPageBreak
    Dim xNumPage As Integer
    xHPC = 1
    xVPC = 1
    If ActiveSheet.PageSetup.Order = xlDownThenOver Then
        xHPC = ActiveSheet.HPageBreaks.Count + 1
    Else
        xVPC = ActiveSheet.VPageBreaks.Count + 1
    End If
    xNumPage = 1
    For Each xVPB In ActiveSheet.VPageBreaks
        If xVPB.Location.Column > ActiveCell.Column Then Exit For
        xNumPage = xNumPage + xHPC
    Next
    For Each xHPB In ActiveSheet.HPageBreaks
        If xHPB.Location.Row > ActiveCell.Row Then Exit For
        xNumPage = xNumPage + xVPC
    Next
    ActiveCell = "Page " & xNumPage & " of " & Application.ExecuteExcel4Macro("GET.DOCUMENT(50)")
End Sub

4. Quindi premi il tasto F5 per eseguire questo codice, e il numero di pagina di questa cella viene visualizzato nella cella selezionata, vedi screenshot:

Rimuovi tutti i numeri di pagina contemporaneamente in Excel

Per rimuovere tutti i numeri di pagina, puoi applicare i seguenti passaggi:

1. Seleziona tutte le schede dei fogli, e vai alla scheda Layout di pagina sulla barra multifunzione, quindi fai clic sull'icona Pulsante di avvio finestra di dialogo nel gruppo Imposta pagina, vedi screenshot:

2. Nella finestra di dialogo Imposta pagina, fai clic sulla scheda Intestazione/Piè di pagina, e poi scegli (nessuno) dall'elenco a discesa Intestazione o Piè di pagina, vedi screenshot:

3. Quindi fai clic sul pulsante OK, e tutti i numeri di pagina vengono rimossi dalla cartella di lavoro contemporaneamente.