Date format in Header

I

Irma

In the header there is an icon that will automatically insert the current
date on the header. Is there a way to put the previous day as the date in
the header? I've tried different formulas but they don't work.
 
H

Harald Staff

Hi

An easy way is a small macro in the ThisWorkbook module:

Private Sub Workbook_BeforePrint(Cancel As Boolean)
ActiveSheet.PageSetup.LeftHeader = Format(Date - 1, "dddd mmm dd yyyy")
End Sub

HTH. best wishes Harald
 
Top