¿Cómo obtener la fecha de creación del archivo del libro de trabajo actual con VBA en Excel 2010? Navegué por todas las propiedades de ThisWorkBook. Parece que no encuentro algo allí.
Respuestas
9 para la respuesta № 1MsgBox ActiveWorkbook.BuiltinDocumentProperties("Creation Date")
"Output: 25.07.2011 14:51:11
Esto funciona para Excel 2003, no tiene 2010 para probarlo. Enlace a Doc MSDN para Office 2010, también hay una lista con otras propiedades disponibles allí.
2 para la respuesta № 2
Utilizar
ActiveWorkbook.BuiltinDocumentProperties.Item("Creation date").Value
Para listar todas las propiedades ejecuta esta macro
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 para la respuesta № 3
Utilizar Scripting.FileSystemObject
Dim oFS As Object
Dim creationDate As String
Set oFS = CreateObject("Scripting.FileSystemObject")
creationDate = oFS.GetFile(ThisWorkbook.FullName).DateCreated
0 para la respuesta № 4
He encontrado que FileDateTime funciona mejor.
FileDateTime (application.activeworkbook.path)
Tecnología en la red dice que se aplica a Excel 2016, 2013, 2011 para Mac, 2010, 2007, 2003, XP y 2000