Quando crei un foglio di lavoro che alla fine verrà stampato, potresti voler utilizzare un piè di pagina diverso nella prima pagina del documento rispetto a quello che fai nelle pagine successive. Non è possibile eseguire questa operazione direttamente in Excel, ma è possibile utilizzare una macro per eseguire l’attività.

La seguente macro imposterà i piè di pagina per un foglio di lavoro a seconda di cosa si stampa. In realtà, imposta i piè di pagina per la prima pagina e quindi stampa quella pagina. Quindi imposta i piè di pagina per le altre pagine e le stampa.

Sub PrintSheet()

Dim sP1Left As String     Dim sP1Center As String     Dim sP1Right As String     Dim sP2Left As String     Dim sP2Center As String     Dim sP2Right As String

' Define first-page footers     sP1Left = "First page left"

sP1Center = "First page center"

sP1Right = "First page right"



' Define second-page footers     sP2Left = "Second page left"

sP2Center = "Second page center"

sP2Right = "Second page right"



' Set up and print first page     With ActiveSheet.PageSetup         .LeftFooter = sP1Left         .CenterFooter = sP1Center         .RightFooter = sP1Right     End With     ActiveSheet.PrintOut 1, 1

' Set up and print other pages     With ActiveSheet.PageSetup         .LeftFooter = sP2Left         .CenterFooter = sP2Center         .RightFooter = sP2Right     End With     ActiveSheet.PrintOut 2 End Sub

Per utilizzare la macro, tutto ciò che devi fare è modificare le definizioni del piè di pagina.

Modificare i valori delle variabili nell’area “Definisci piè di pagina prima pagina” e nell’area “Definisci piè di pagina seconda pagina” per ottenere solo l’output desiderato.

_Nota: _

Se desideri sapere come utilizzare le macro descritte in questa pagina (o in qualsiasi altra pagina dei siti ExcelTips), ho preparato una pagina speciale che include informazioni utili.

Fare clic qui per aprire quella pagina speciale in una nuova scheda del browser.

ExcelTips è la tua fonte di formazione economica su Microsoft Excel.

Questo suggerimento (11287) si applica a Microsoft Excel 2007, 2010, 2013 e 2016.

Puoi trovare una versione di questo suggerimento per la vecchia interfaccia del menu di Excel qui:

Using a Different Footer on Secondary Pages.