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 della cartella di lavoro attiva. Inserirà anche il percorso completo della cartella di lavoro.
Opzione Explicit Sub InsertHeaderFooter() Dim wsAs Worksheet Application.ScreenUpdating = False Each wsInThisWorkbook.Worksheets With ws.PageSetup .LeftHeader = "Nome azienda:" .CenterHeader = "Pagina &P di &N" .RightHeader = "Stampato.&LeftFoo" = “Path : “ &ActiveWorkbook.Path .CenterFooter = “Workbook Name: & F” .RightFooter = “Sheet: &A” End With Next ws Set ws = Niente 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 il ciclo di 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 della 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 1ns uno ti mostra l'intestazione e il 2ns uno il piè di pagina dopo che la macro è stata eseguita.
L'intestazione ha l'etichetta Nome azienda. Il nome non è ancora stato inserito poiché non lo abbiamo collegato a nessuna cella o inserito alcun testo per il nome della società. Se inserisci qualcosa nel codice o nel foglio excel e fai riferimento ad esso, il nome verrà prelevato e popolato qui.
Pagina # di 0 mostra che attualmente 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 fornisce la data e l'ora in cui la macro è stata eseguita insieme al testo "Stampato".
Nel piè di pagina, l'etichetta Percorso 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 Percorso.
Il numero del foglio viene popolato a destra del piè di pagina.
Se ti è piaciuto il nostro blog, condividilo con i tuoi amici su Facebook. E puoi anche seguirci su Twitter e Facebook.
Ci piacerebbe avere tue notizie, facci sapere come possiamo migliorare, completare o innovare il nostro lavoro e renderlo migliore per te. Scrivici al sito di posta elettronica