Índice
Descrição FileDateTime
Retorna a data e hora de quando um arquivo foi criado ou modificado pela última vez.
Exemplo de FileDateTime simples
Suponha que um arquivo “D: \ test.txt” foi modificado pela última vez em 21/10/2019 9:41:30.
| 1 | MsgBox FileDateTime ("D: \ test.txt") |
Isso retornará 21/10/2019 9:41:30 AM.
Sintaxe FileDateTime
No Editor VBA, você pode digitar “FileDateTime (” para ver a sintaxe da função FileDateTime:
A função FileDateTime contém um argumento:
PathName: Uma expressão de string que representa um arquivo / pasta / unidade.
Exemplos de função FileDateTime do Excel VBA
Para listar a hora da última modificação da pasta e dos arquivos na unidade C, você pode usar o código a seguir.
| 123456789101112131415161718192021222324 | Subdir_Exemplo ()Dim fileName As StringDim fullName As StringDim rng como alcanceDim i As IntegerDefinir rng = intervalo ("A1")fileName = Dir ("C: \", vbDirectory)i = 1FazerfullName = "C: \" & fileNamerng.Offset (i, 0) = nome do arquivorng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng.Offset (i, 3) = GetAttr (fullName)fileName = DirIf fileName = "" Then Exit Doi = i + 1CicloEnd Sub |
O resultado será semelhante ao seguinte.
