NikkiB,

Assuming your header is still in Sheet1:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Sheet1").PageSetup.CenterHeader = "Schedule C2 Attachment A" &
Sheets("Sheet1").Range("C2").Value
End Sub

hth,

Doug

"NikkiB" wrote in message
...
I would like to enter the value from a cell into a header. For Example. I
want the header to say "Schedule C2 Attachment A" with the value of cell
C2
displayed within the header.

I found the below code but do not know if its possibe to adjust for what I
need.

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Sheets("Sheet1").PageSetup.CenterHeader =
Sheets("Sheet1").Range("A1").Value
End Sub

Thanks in advance for any help.