Home |
Search |
Today's Posts |
#5
![]()
Posted to microsoft.public.excel.misc
|
|||
|
|||
![]()
This worked just fine. I actually wanted the week on the left under some
other dates, text, etc., but I was able to figure out how to do that. This will make my life a whole lot easier. Thank you for your expertise and for sharing it. -- happysak "Gary''s Student" wrote: Put the following macro in the workbook code area: Private Sub Workbook_BeforePrint(Cancel As Boolean) d = Date d1 = d - Application.WorksheetFunction.Weekday(d) + 2 d2 = d1 + 4 ActiveSheet.PageSetup.CenterHeader = d1 & "-" & d2 End Sub -- Gary''s Student - gsnu200759 "happysak" wrote: I need to automatically add to a header the dates of the week (Monday through Friday) that the current date falls in. For example, today is 12/04/2007. I want the header to also show that this week is 12/03/07-12/07/07. Any help? Thanks -- happysak |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Display "this week" column headers w/date & day of week? | Excel Worksheet Functions | |||
Date Function formula that will return the date of a specific week | Excel Worksheet Functions | |||
How do I add the day of the week to Excel header | Excel Discussion (Misc queries) | |||
Finding the Monday date based on a different date in same week | Excel Worksheet Functions | |||
I need week number in excell from a date, first week must be mini. | Excel Discussion (Misc queries) |