Home |
Search |
Today's Posts |
#1
|
|||
|
|||
Date formula for footer/header
I'm pretty new to excel. My question is, is there a way to have the date in
the header/footer roll back one day? And if it is a Monday, can it roll back to Friday? If I use a cell for the date it throws the entire format for a loop and I end up having an entire row with just 1 thing in it. Any help would be greatly appreciated. |
#2
|
|||
|
|||
Date formula for footer/header
'This is workbook event code.
'To input this code, right click on the Excel icon on the worksheet '(or next to the File menu if you maximise your workbooks), 'select View Code from the menu, and paste the code Private Sub Workbook_BeforePrint(Cancel As Boolean) Dim dte As Date dte = Date - 1 If Weekday(dte) = 1 Then dte = dte - 1 End If If Weekday(dte) = 7 Then dte = dte - 1 End If With ActiveSheet.PageSetup .LeftFooter = Format(dte, "dd mmm yyyy") End With End Sub -- HTH RP (remove nothere from the email address if mailing direct) "Kurtlee" wrote in message ... I'm pretty new to excel. My question is, is there a way to have the date in the header/footer roll back one day? And if it is a Monday, can it roll back to Friday? If I use a cell for the date it throws the entire format for a loop and I end up having an entire row with just 1 thing in it. Any help would be greatly appreciated. |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Year-to-date year to date formula | Excel Worksheet Functions | |||
Excel formula with date constraints | Excel Discussion (Misc queries) | |||
Formula with date constraints | Excel Worksheet Functions | |||
Date formula | Excel Discussion (Misc queries) | |||
Need help troubleshooting an array formula XLXP on Win2K | Excel Worksheet Functions |