Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
I am trying to extract the DATE part of a file using the DateLastModified
property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
Nigel,
in Tools/References set a reference to "Microsoft Scripting Runtime" Then: Sub GetFileMod() Dim oFS As New Scripting.FileSystemObject Dim oFL As Scripting.File Set oFL = oFS.GetFile("test1.xls") MsgBox oFL.DateLastModified End Sub keepITcool < email : keepitcool chello nl (with @ and .) < homepage: http://members.chello.nl/keepitcool "Nigel" wrote: I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
Nigel,
If you don't have a reference to the Scripting Runtime Library, go to the Tools menu, choose References, find "Scripting Runtime Library" and check it. Then, use code like Dim FSO As Scripting.FileSystemObject Dim F As Scripting.File Set FSO = New Scripting.FileSystemObject Set F = FSO.GetFile(ThisWorkbook.FullName) Debug.Print Int(F.DateLastModified) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Nigel" wrote in message ... I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
That's got it, thanks a lot
"keepitcool" wrote in message ... Nigel, in Tools/References set a reference to "Microsoft Scripting Runtime" Then: Sub GetFileMod() Dim oFS As New Scripting.FileSystemObject Dim oFL As Scripting.File Set oFL = oFS.GetFile("test1.xls") MsgBox oFL.DateLastModified End Sub keepITcool < email : keepitcool chello nl (with @ and .) < homepage: http://members.chello.nl/keepitcool "Nigel" wrote: I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
Chip,
Thanks for your help again, to illuminate my understanding further, I found the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2), however will this code run in NT4 / Excel 97 which is my target system ? TIA Nigel "Chip Pearson" wrote in message ... Nigel, If you don't have a reference to the Scripting Runtime Library, go to the Tools menu, choose References, find "Scripting Runtime Library" and check it. Then, use code like Dim FSO As Scripting.FileSystemObject Dim F As Scripting.File Set FSO = New Scripting.FileSystemObject Set F = FSO.GetFile(ThisWorkbook.FullName) Debug.Print Int(F.DateLastModified) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Nigel" wrote in message ... I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
Nigel,
I believe that the Scripting Runtime Library is installed by Internet Explorer version 5, so if you have IE5 or later on the system, it should work fine. -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Nigel" wrote in message ... Chip, Thanks for your help again, to illuminate my understanding further, I found the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2), however will this code run in NT4 / Excel 97 which is my target system ? TIA Nigel "Chip Pearson" wrote in message ... Nigel, If you don't have a reference to the Scripting Runtime Library, go to the Tools menu, choose References, find "Scripting Runtime Library" and check it. Then, use code like Dim FSO As Scripting.FileSystemObject Dim F As Scripting.File Set FSO = New Scripting.FileSystemObject Set F = FSO.GetFile(ThisWorkbook.FullName) Debug.Print Int(F.DateLastModified) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Nigel" wrote in message ... I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
DateLastModified property date extraction
These show the API approach:
http://support.microsoft.com/default...76&Product=vb6 HOWTO: Search Directories to Find or List Files http://support.microsoft.com/default...21&Product=vb6 HOWTO: Get Extended File Time Information Using the Win32 API -- Regards, Tom Ogilvy Nigel wrote in message ... Chip, Thanks for your help again, to illuminate my understanding further, I found the "Microsoft Scripting Runtime" in my system (XP SP2 & Excel SP2), however will this code run in NT4 / Excel 97 which is my target system ? TIA Nigel "Chip Pearson" wrote in message ... Nigel, If you don't have a reference to the Scripting Runtime Library, go to the Tools menu, choose References, find "Scripting Runtime Library" and check it. Then, use code like Dim FSO As Scripting.FileSystemObject Dim F As Scripting.File Set FSO = New Scripting.FileSystemObject Set F = FSO.GetFile(ThisWorkbook.FullName) Debug.Print Int(F.DateLastModified) -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Nigel" wrote in message ... I am trying to extract the DATE part of a file using the DateLastModified property. Anyone experience of doing this? It appears I need to define the file as an object first then read the object property, and finally extract the date string. TIA Nigel ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- ----== Posted via Newsfeed.Com - Unlimited-Uncensored-Secure Usenet News==---- http://www.newsfeed.com The #1 Newsgroup Service in the World! 100,000 Newsgroups ---= 19 East/West-Coast Specialized Servers - Total Privacy via Encryption =--- |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to Use DateLastModified Property in VBA? | Excel Discussion (Misc queries) | |||
date extraction | Excel Worksheet Functions | |||
Date extraction from data pull | Excel Discussion (Misc queries) | |||
DateLastModified | Excel Worksheet Functions | |||
date extraction howto? | Excel Programming |