How do I get Excel to put the value in a cell (AA1) from all active worksheets into the header and format it to Arial, Bold 18 pts?
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = ""
ActiveSheet.PageSetup.CenterHeader = "&""Arial,Bold""&18Value from cell AA1"
End Sub
Thanks you,
Saki
Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.CenterHeader = ""
ActiveSheet.PageSetup.CenterHeader = "&""Arial,Bold""&18Value from cell AA1"
End Sub
Thanks you,
Saki