Re: How To Create a macro for Cell References into Header for a workbook

I got the code....

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
With ActiveSheet.PageSetup
.CenterHeader = "&""Arial,Bold""&12 " & Range("P1").Value & vbCr & Range("P2").Value
End With

End Sub

Thanks,

Vivek