Puedes usar el FileSystemObject, tienes que añadir referencia a Microsoft Scripting Runtime.
Ejemplo:
Private Sub Form_Load()
Dim fso As FileSystemObject
Set fso = New FileSystemObject
Debug.Print fso.GetFile("C:\test.txt").DateCreated
Set fso = Nothing
End Sub