Se desideri inserire determinate informazioni nell’intestazione / piè di pagina del foglio di lavoro come il nome del file / percorso del file o la data corrente o il numero di pagina, puoi farlo utilizzando il codice seguente. Se è solo un foglio di lavoro puoi farlo manualmente, ma se sono più fogli o tutti i fogli nella cartella di lavoro che necessitano di queste informazioni per essere popolati, puoi farlo usando una semplice macro / codice vba.

Questa macro di esempio inserirà un’intestazione / piè di pagina in ogni foglio di lavoro nella cartella di lavoro attiva. Inserirà anche il percorso completo della cartella di lavoro.

Option Explicit

Sub InsertHeaderFooter()

Dim wsAs Worksheet

Application.ScreenUpdating = False

Each wsInThisWorkbook.Worksheets

With ws.PageSetup

.LeftHeader = “Company Name:”

.CenterHeader = “Page &P of &N”

.RightHeader = “Printed &D &T”

.LeftFooter = “Path : “ &ActiveWorkbook.Path

.CenterFooter = “Workbook Name: & F”

.RightFooter = “Sheet: &A”

End With

Next ws

Set ws = Nothing

Application.ScreenUpdating = True

End Sub

Per copiare questo codice nella cartella di lavoro, premi Alt + F11 sulla tastiera.

Quindi sul lato sinistro, vedrai gli oggetti di Microsoft Excel. Fare clic con il tasto destro e selezionare Inserisci. Quindi fare clic su Modulo e copiare questo codice nella finestra del codice a destra.

Rompiamo ogni parte del codice – Iniziamo con la solita istruzione Dim in cui dichiariamo le variabili.

In questo caso, abbiamo solo 1 variabile – ws per il foglio di lavoro. Quindi disabilitiamo l’aggiornamento dello schermo.

Ora, nel ciclo FOR, eseguiamo un ciclo in ogni foglio di lavoro nella cartella di lavoro che contiene la macro. E impostiamo ogni parametro in Imposta pagina. & P, & N, & D, & T, & F e & A sono determinati codici di formato che possono essere applicati a intestazioni e piè di pagina. & P stampa il numero di pagina. & N stampa il numero totale di pagine nel documento. & D stampa la data corrente. & T stampa l’ora corrente. & F stampa il nome del documento e & A stampa il nome della scheda cartella di lavoro.

Alla fine impostiamo il foglio di lavoro su nulla e liberiamo l’oggetto e abilitiamo l’aggiornamento dello schermo.

Ecco 2 immagini. Il 1 ^ st ^ ti mostra l’intestazione e il 2 ^ nd ^ il piè di pagina dopo che la macro è stata eseguita.

img1

L’intestazione ha l’etichetta Nome azienda. Il nome non è ancora stato inserito poiché non lo abbiamo collegato a nessuna cella né inserito alcun testo per il nome dell’azienda. Se inserisci qualcosa nel codice o nel foglio Excel e lo fai riferimento, il nome verrà raccolto e popolato qui.

La pagina # di 0 mostra che al momento abbiamo 0 pagine nel file, poiché abbiamo eseguito questo codice su un file vuoto. Se esegui questo codice su un file contenente dati, ti mostrerà il numero di pagina.

Stampato <Data> <Ora> fornisce la data e l’ora in cui la macro è stata eseguita insieme al testo “Stampato”.

img2

Nel piè di pagina, l’etichetta Path ti mostrerà il percorso del file corrente.

Il nostro nome file è Book1.xlsx, che attualmente è un file non salvato. Quindi non viene visualizzato alcun percorso per l’etichetta Path.

Il numero del foglio viene inserito a destra del piè di pagina.

Se i nostri blog ti sono piaciuti, condividilo con i tuoi amici su Facebook. E anche tu puoi seguirci su Twitter e Facebook.

_ Ci piacerebbe sentire la tua opinione, facci sapere come possiamo migliorare, integrare o innovare il nostro lavoro e renderlo migliore per te. Scrivici a [email protected]_