Ako získať aktuálny dátum vytvorenia súboru zošit pomocou VBA v programe Excel 2010? Prehliadal som všetky vlastnosti ThisWorkBook I don "t Zdá sa, že nájsť niečo tam.
odpovede:
9 pre odpoveď č. 1MsgBox ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
"Output: 25.07.2011 14:51:11
To funguje pre Excel 2003, don "t 2010 otestovať. Odkaz na MSDN Doc pre Office 2010, tam je zoznam s ďalšími dostupnými vlastnosťami tam taky.
2 pre odpoveď č. 2
použitie
ActiveWorkbook.BuiltinDocumentProperties.Item("Creation date").Value
Ak chcete zobraziť všetky vlastnosti, spustite toto makro
Public Sub listProperties()
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.BuiltinDocumentProperties
Cells(rw, 1).Value = p.Name
On Error Resume Next
Cells(rw, 2).Value = p.Value
rw = rw + 1
Next
End Sub
2 pre odpoveď č. 3
použitie Scripting.FileSystemObject
Dim oFS As Object
Dim creationDate As String
Set oFS = CreateObject("Scripting.FileSystemObject")
creationDate = oFS.GetFile(ThisWorkbook.FullName).DateCreated
0 pre odpoveď č. 4
Zistil som, že FileDateTime funguje najlepšie.
FileDateTime (application.activeworkbook.path)
Tech na internete hovorí, že sa to týka Excel 2016, 2013, 2011 pre Mac, 2010, 2007, 2003, XP a 2000