- 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:
Post a Comment