I was following with interest the help given by DerbyDad03 on www.computing.net/answers/office/forumula-in-custom-header/10338.html as I too want the same thing as Brian W.
In my case, the sheet is named ''Enterprize Size Determination'' so after I understood the general concept before Beforeprint Macro, I tried the following code (without actually understanding the syntax referred to)
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Dim rFormulaCell As Range
Set rFormulaCell = Sheets("Enterprize size determination").[A1]
ActiveSheet.PageSetup.CenterHeader = rFormulaCell
I tried pasting it both on:
Prjoject VBA Project
Sheet 4 (Enterprize size determination)
But it is not doing any thing as no header is printing or showing in print preview.
message edited by AlanEffe1983