Reply
 
LinkBack Thread Tools Search this Thread Display Modes
  #1   Report Post  
DC Solah
 
Posts: n/a
Default How do I display the 'Date Modified' in an Excel worksheet header

I have a series of workbooks being shared on a business server and being
updated by a number of sources as new information becomes available. Because
the date of these updates is important, I would like the workbook to display
the Date Modified in the header of the document when printed.

The only way I know to see this date is via Excel's properties window (or in
the Details view in Windows).
  #2   Report Post  
Jason Morin
 
Posts: n/a
Default

Place this macro in the ThisWorkbook module. The header of the active
worksheet will be the last saved (modified) date:

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim LastDate As String
Dim wbProp As String

wbProp = "last save time"
LastDate = ActiveWorkbook.BuiltinDocumentProperties(wbProp)

ActiveSheet.PageSetup.CenterHeader = LastDate

End Sub

---
HTH
Jason
Atlanta, GA


"DC Solah" wrote:

I have a series of workbooks being shared on a business server and being
updated by a number of sources as new information becomes available. Because
the date of these updates is important, I would like the workbook to display
the Date Modified in the header of the document when printed.

The only way I know to see this date is via Excel's properties window (or in
the Details view in Windows).

  #3   Report Post  
Posted to microsoft.public.excel.misc
plngarbage
 
Posts: n/a
Default How do I display the 'Date Modified' in an Excel worksheet hea

Will this macro show the last date modified of the worksheet in the workbook?
Is there a way to have each tab display the last modified date for that tab
only?

"Jason Morin" wrote:

Place this macro in the ThisWorkbook module. The header of the active
worksheet will be the last saved (modified) date:

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim LastDate As String
Dim wbProp As String

wbProp = "last save time"
LastDate = ActiveWorkbook.BuiltinDocumentProperties(wbProp)

ActiveSheet.PageSetup.CenterHeader = LastDate

End Sub

---
HTH
Jason
Atlanta, GA


"DC Solah" wrote:

I have a series of workbooks being shared on a business server and being
updated by a number of sources as new information becomes available. Because
the date of these updates is important, I would like the workbook to display
the Date Modified in the header of the document when printed.

The only way I know to see this date is via Excel's properties window (or in
the Details view in Windows).

  #4   Report Post  
Posted to microsoft.public.excel.misc
external usenet poster
 
Posts: 53
Default How do I display the 'Date Modified' in an Excel worksheet hea

how do i know WHO is the last person who modified?


"Jason Morin" wrote:

Place this macro in the ThisWorkbook module. The header of the active
worksheet will be the last saved (modified) date:

Private Sub Workbook_BeforePrint(Cancel As Boolean)

Dim LastDate As String
Dim wbProp As String

wbProp = "last save time"
LastDate = ActiveWorkbook.BuiltinDocumentProperties(wbProp)

ActiveSheet.PageSetup.CenterHeader = LastDate

End Sub

---
HTH
Jason
Atlanta, GA


"DC Solah" wrote:

I have a series of workbooks being shared on a business server and being
updated by a number of sources as new information becomes available. Because
the date of these updates is important, I would like the workbook to display
the Date Modified in the header of the document when printed.

The only way I know to see this date is via Excel's properties window (or in
the Details view in Windows).

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
Excel Date Format - users should be able to override it automatic. jamezog Excel Discussion (Misc queries) 7 May 20th 10 02:45 PM
On an import to excel a two digit date still is not right after c. Phillip Excel Discussion (Misc queries) 4 April 12th 05 04:30 PM
Excel enters date as a text format Kane Excel Discussion (Misc queries) 3 March 22nd 05 10:20 PM
Excel 2003 "File Open": how keep folders at top with sort by Date. Aging Analyst Excel Discussion (Misc queries) 1 December 3rd 04 04:26 AM
Creating a Date Selector in Excel VBA? Mark Excel Discussion (Misc queries) 0 November 25th 04 11:59 PM


All times are GMT +1. The time now is 07:45 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"