With the current year entered in A1,

Sub CellValueInHeader()
With ActiveSheet.PageSetup
.LeftHeader = Range("a1").Value & " Results"
End With
End Sub

Vaya con Dios,
Chuck, CABGx3



"Hubitron2000" wrote:

> I want my header to say "yyyy results", where yyyy is the current year.
>
> Any suggestions?