Una delle lamentele di lunga data su Excel è che non dispone di un metodo molto affidabile per creare e gestire intestazioni e piè di pagina.

Considera il seguente scenario: vuoi stampare il tuo foglio di lavoro, ma hai solo i numeri di pagina che iniziano nella seconda pagina.

Non esiste un metodo intrinseco in Excel per gestire questa situazione. Ci sono alcune soluzioni alternative; ad esempio, potresti mettere la tua prima pagina su un foglio di lavoro (senza intestazioni o piè di pagina) e le pagine successive su un foglio di lavoro diverso (che include intestazioni e piè di pagina). È quindi possibile stampare i due fogli di lavoro in un unico passaggio e raggiungere efficacemente il proprio obiettivo.

Se preferisci, puoi creare una macro che stampa il tuo foglio di lavoro come desideri. La seguente macro, GoodPrint, stamperà la prima pagina di un foglio di lavoro senza intestazioni o piè di pagina e quindi tutte le pagine successive normalmente.

Sub GoodPrint()

Dim hlft As String     Dim hctr As String     Dim hrgt As String     Dim flft As String     Dim fctr As String     Dim frgt As String

'save current header     hlft = ActiveSheet.PageSetup.LeftHeader     hctr = ActiveSheet.PageSetup.CenterHeader     hrgt = ActiveSheet.PageSetup.RightHeader

'save current footer     flft = ActiveSheet.PageSetup.LeftFooter     fctr = ActiveSheet.PageSetup.CenterFooter     frgt = ActiveSheet.PageSetup.RightFooter

'remove header and footer     With ActiveSheet.PageSetup         .CenterHeader = ""

.RightHeader = ""

.LeftHeader = ""

.CenterFooter = ""

.RightFooter = ""

.LeftFooter = ""

End With

'print page one     ActiveSheet.PrintOut 1, 1

'restore header and footer     With ActiveSheet.PageSetup         .LeftHeader = hlft         .CenterHeader = hctr         .RightHeader = hrgt         .LeftFooter = flft         .CenterFooter = fctr         .RightFooter = frgt     End With

'print the rest of the pages     ActiveSheet.PrintOut 2 End Sub

_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.

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

Questo suggerimento (12101) 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: