Hi
AFAIK you'll need vBA for this. e.g. put the following code in your
workbook module:
Private Sub Workbook BeforePrint(Cancel As Boolean)
Dim wkSht As Worksheet
For Each wkSht In me.Worksheets
With wkSht.PageSetup
.CenterHead = Format(date,"YYYY")
End With
Next wkSht
End Sub