Vai al contenuto principale

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

Quando si stampa un file Excel, potrebbe essere necessario inserire i numeri di pagina nelle pagine per rendere il file stampato in modo ordinato e leggibile. In questo articolo, introdurrò alcuni trucchi rapidi per inserire i numeri di pagina nella cella, nell'intestazione o nel piè di pagina per te.

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 nella cella con il codice VBA

Rimuovi tutti i numeri di pagina contemporaneamente in Excel


freccia blu freccia destra 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 il Intestazione e piè di pagina funzione, si prega di fare 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 fare clic inserire > Intestazione e piè di paginae il tuo foglio di lavoro sarà in layout di pagina visualizza, vedi screenshot:

doc inserire i numeri di pagina 1

3. Fare clic sull'intestazione o sul piè di pagina in cui si desidera inserire il numero di pagina, quindi su un file Design scheda con Strumenti di intestazione e piè di pagina viene visualizzato nella barra multifunzione, quindi fare clic su Design > Numero di pagina, vedi screenshot:

doc inserire i numeri di pagina 2

4. E puoi vedere il segnaposto &[Pagina] vengono visualizzati nella sezione selezionata, quindi fare clic in un punto qualsiasi all'esterno dell'area dell'intestazione o del piè di pagina per visualizzare i numeri di pagina. Vedi screenshot:

doc inserire i numeri di pagina 3

5. Ora puoi ripristinare la visualizzazione normale facendo clic su Visualizza > Normalee 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.

Note:: Se desideri che i numeri di pagina vengano visualizzati nel formato 1 di 15, 2 di 15, devi solo inserirlo direttamente & [Pagina] di & [Pagine] nella casella del campo dell'intestazione o del piè di pagina, vedi screenshot:

doc inserire i numeri di pagina 4


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

Il metodo sopra può aiutarti a inserire i numeri di pagina in un foglio di lavoro, se desideri inserire i numeri di pagina in tutti i fogli di lavoro della cartella di lavoro per fare in modo che tutte le pagine siano numerate in ordine sequenziale, fai come segue:

1. Seleziona tutte le schede del foglio, quindi vai a layout di pagina scheda e fare clic Pulsante di avvio della finestra di dialogo icona nel Impostazione della pagina gruppo, vedi screenshot:

doc inserire i numeri di pagina 5

2. Nel Impostazione della pagina finestra di dialogo, fare clic Intestazione / piè di pagina Scheda, quindi fare clic su OK Personalizza intestazione or Personalizza piè di pagina per andare a impostare l'intestazione o il piè di pagina che desideri, vedi screenshot:

doc inserire i numeri di pagina 6

3. E nella testata or footer finestra di dialogo, definire la posizione in cui vengono inseriti i numeri di pagina facendo clic all'interno del file Sezione sinistra:, Sezione centrale:, o Sezione destra: casella di cui hai bisogno, quindi fai clic su Inserisci numero di pagina icona e segnaposto &[Pagina] appare. Vedi screenshot:

doc inserire i numeri di pagina 7

Nota: Inserisci questo & [Pagina] di & [Pagine] nella casella del campo dell'intestazione o del piè di pagina se ti piacciono i numeri di pagina visualizzati come 1 di 45, 2 di 45 ...

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


freccia blu freccia destra Inserisci il numero di pagina nella cella con il codice VBA

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

1. Fare clic su una cella in cui si desidera visualizzare il numero di pagina di questa cella.

2. Tieni premuto il ALT + F11 chiavi e apre il file Microsoft Visual Basic, Applications Edition finestra.

3. Clic inserire > Modulie incolla il codice seguente nel file Moduli Finestra.

Codice VBA: inserisci il numero della 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 premere F5 chiave per eseguire questo codice e il numero di pagina di questa cella viene visualizzato nella cella selezionata, vedi screenshot:

doc inserire i numeri di pagina 8


freccia blu freccia destra 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 del foglio e vai al file layout di pagina scheda sulla barra multifunzione, quindi fare clic su Pulsante di avvio della finestra di dialogo icona nel Impostazione della pagina gruppo, vedi screenshot:

doc inserire i numeri di pagina 9

2. Nel Impostazione della pagina finestra di dialogo, fare clic Intestazione / piè di pagina scheda, quindi scegliere (Nessuno) dal testata or footer elenco a discesa, vedi screenshot:

doc inserire i numeri di pagina 10

3. Quindi fare clic su OK pulsante, tutti i numeri di pagina vengono rimossi dalla cartella di lavoro contemporaneamente.

I migliori strumenti per la produttività in ufficio

🤖 Assistente AI di Kutools: Rivoluziona l'analisi dei dati basandosi su: Esecuzione intelligente   |  Genera codice  |  Crea formule personalizzate  |  Analizzare i dati e generare grafici  |  Richiama le funzioni di Kutools...
Funzioni popolari: Trova, evidenzia o identifica i duplicati   |  Elimina righe vuote   |  Combina colonne o celle senza perdere dati   |   Round senza formula ...
Super ricerca: VLookup a criteri multipli    VLookup a valori multipli  |   VLookup su più fogli   |   Ricerca fuzzy ....
Elenco a discesa avanzato: Crea rapidamente un elenco a discesa   |  Elenco a discesa dipendente   |  Elenco a discesa a selezione multipla ....
Gestore di colonna: Aggiungi un numero specifico di colonne  |  Sposta colonne  |  Attiva/disattiva lo stato di visibilità delle colonne nascoste  |  Confronta intervalli e colonne ...
Funzionalità in primo piano: Messa a fuoco della griglia   |  Vista di progettazione   |   Grande barra delle formule    Gestore di cartelle di lavoro e fogli   |  Resource Library (Testo automatico)   |  Date picker   |  Combina fogli di lavoro   |  Crittografa/decrittografa le celle    Invia e-mail per elenco   |  Super filtro   |   Filtro speciale (filtro grassetto/corsivo/barrato...) ...
I 15 migliori set di strumenti12 Testo Strumenti (aggiungi testo, Rimuovi personaggi, ...)   |   50+ Grafico Tipi (Diagramma di Gantt, ...)   |   40+ Pratico Formule (Calcola l'età in base al compleanno, ...)   |   19 Inserimento Strumenti (Inserisci il codice QR, Inserisci immagine dal percorso, ...)   |   12 Conversione Strumenti (Numeri in parole, Conversione di valuta, ...)   |   7 Unisci e dividi Strumenti (Combina righe avanzate, Celle divise, ...)   |   ... e altro ancora

Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo.  Fai clic qui per ottenere la funzionalità di cui hai più bisogno...

Descrizione


Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro

  • Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
  • Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
  • Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!

 

Comments (8)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hay forma de convertir esta sub en una función?
This comment was minimized by the moderator on the site
Hola,el codigo si me funciono, sin embargo al momento de imprimir, siempre me sale 1 de 5 y es que mi encabezado lo tengo como área de impresión en todas mis paginas, ¿hay alguna forma de lograr que al momento de imprimir, se pueda cambiar la pagina, en la misma pestaña?
This comment was minimized by the moderator on the site
May I know how I should modify above VBA that allows me to execute this to range of cells on a workbook and with 1 short cut key to apply all selected cells?
This comment was minimized by the moderator on the site
May I know if I have range of cells that I want to put in page numbers, what should I change? The current VBA only allows me to change one by one.
This comment was minimized by the moderator on the site
terima kasih, kawan
This comment was minimized by the moderator on the site
Hola, hay un error en la formula porque cuando ejecuto (F5) el primer valor numérico de "Pagina XX de XX" no cambia. Solo hace el conteo de páginas el segundo valor. Podrian revisar... Gracias
This comment was minimized by the moderator on the site
I tried the VBA macro, but I'm getting a subscript out of range error... Did I do something wrong?
This comment was minimized by the moderator on the site
Hello I used the Insert page number into cell with VBA code above and it works a charm. My sheet could be either 2 pages long (2 down and 1 across), 4 pages long (2 down and 2 across) or 6 pages long (2 down and 3 across). I have inserted the code in each cell of the 6 that require page number to be printed (by selecting the cells each in turn and running the VBA), cell addresses are H1, H35, T1, T35, AF1, AF35. Now I would like to add a button to refresh these page numbers without affecting whichever cell may be active when the relevant user may choose to run it, currently I have to select each cell in turn again and run the VBA :( Assistance would be hugely appreciated! Antoinette
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations