Home |
Search |
Today's Posts |
|
#1
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
How can I get Excel 2007 to display the "Date Modified" field of the
worksheet being opened? |
#2
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Put the following code in the ThisWorkbook module:
Private Sub Workbook_Open() Dim objFile As Object Dim objShell As Object Dim objFolder As Object Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(ThisWorkbook.Path) For Each objFile In objFolder.items Debug.Print objFolder.getdetailsof(objFile, 0) If objFolder.getdetailsof(objFile, 0) = _ ThisWorkbook.Name Then Exit For Next objFile Call MsgBox("Last date modified: " & _ objFolder.getdetailsof(objFile, 3)) End Sub Save in a macro-enabled file format, enable macros, save and reopen. On Nov 14, 1:35 pm, jingles457 wrote: How can I get Excel 2007 to display the "Date Modified" field of the worksheet being opened? |
#3
![]()
Posted to microsoft.public.excel.worksheet.functions
|
|||
|
|||
![]()
Thank you
"ilia" wrote: Put the following code in the ThisWorkbook module: Private Sub Workbook_Open() Dim objFile As Object Dim objShell As Object Dim objFolder As Object Set objShell = CreateObject("Shell.Application") Set objFolder = objShell.Namespace(ThisWorkbook.Path) For Each objFile In objFolder.items Debug.Print objFolder.getdetailsof(objFile, 0) If objFolder.getdetailsof(objFile, 0) = _ ThisWorkbook.Name Then Exit For Next objFile Call MsgBox("Last date modified: " & _ objFolder.getdetailsof(objFile, 3)) End Sub Save in a macro-enabled file format, enable macros, save and reopen. On Nov 14, 1:35 pm, jingles457 wrote: How can I get Excel 2007 to display the "Date Modified" field of the worksheet being opened? |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Excel 2007 - hyperlink to display external data in a pop-up? | Excel Worksheet Functions | |||
Excel 2007 spread sheet prints slow. | Excel Discussion (Misc queries) | |||
External Data Tracking in Excel 2007? | Excel Discussion (Misc queries) | |||
Excel 2007 and External Data Sources | Excel Discussion (Misc queries) | |||
Excel 2007 external data query | Excel Discussion (Misc queries) |