- Codice: Seleziona tutto
Sub Inserire_Intest_PrPagina()
Dim ws As Worksheet
Set ws = Worksheets("Foglio1")
With ws.PageSetup
.DifferentFirstPageHeaderFooter = True
.FirstPage.CenterHeader.Text = "Esempio"
End With
End Sub
ma sul 2003 non funziona.
Graditi suggerimenti.
Saluti
R