Populate Create Date, Last Modified Date, Modified Time, Author, and File Location into Excel 2003

I had a task for a project in which I searched only to discoverer that everyone was saying the same thing but in different ways. Here is what I was tasked with:
  • Display Create Date
  • Display Last Date Modified
  • Display Modified Time
  • Display Save Author
  • File Location
















1.     Right Click on the "Excel Logo" within Microsoft Excel
2.     Select "View Code

 3.     Copy in this block of code and save changes
 4.     Re-open workbook

Private Sub Workbook_Open()
   Range("B1").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Creation Date"), "short date")
   Range("B2").Value = Format(ThisWorkbook.BuiltinDocumentProperties("Last Save Time"), "short date")
   Range("B3").Value = ThisWorkbook.BuiltinDocumentProperties("Last Save Time")
   Range("B4").Value = ThisWorkbook.BuiltinDocumentProperties("Last Author")
End Sub



















File Location uses: 
=CELL("filename")









Source(s)
http://excel.tips.net/Pages/T002875_Adding_a_File_Path_and_Filename.html
http://www.exceluser.com/explore/questions/docproperties.htm

0 comments: