İçindekiler
FileDateTime Açıklama
Bir dosyanın oluşturulduğu veya en son değiştirildiği tarihi ve saati döndürür.
Basit FileDateTime Örneği
“D:\test.txt” dosyasının en son 21/10/2019 09:41:30 AM tarihinde değiştirildiğini varsayın.
1 | MsgBox FileDateTime("D:\test.txt") |
Bu, 21/10/2019 09:41:30 AM'ye dönecektir.
DosyaTarihSaat Sözdizimi
VBA Düzenleyicide, FileDateTime İşlevinin sözdizimini görmek için “FileDateTime(” yazabilirsiniz:
FileDateTime işlevi bir bağımsız değişken içerir:
YolAdı: Bir dosya/klasör/sürücüyü temsil eden bir dize ifadesi.
Excel VBA FileDateTime İşlevi Örnekleri
C sürücüsündeki klasör ve dosyaların son değiştirilme zamanını listelemek için aşağıdaki kodu kullanabilirsiniz.
123456789101112131415161718192021222324 | Alt Dir_Örnek()Dosya Adı Olarak Dize DimDim fullName As StringAralık Olarak KarartmaDim i Tamsayı OlarakSet rng = Aralık("A1")fileName = Dir("C:\", vbDirectory)ben = 1YapmakfullName = "C:\" & dosyaAdırng.Offset(i, 0) = dosyaAdırng.Offset(i, 1) = FileDateTime(fullName)rng.Offset(i, 2) = FileLen(fullName)rng.Offset(i, 3) = GetAttr(fullName)dosyaAdı = DirEğer fileName = "" O zaman Çıkış Yapben = ben + 1DöngüAlt Bitiş |
Sonuç aşağıdakine benzer olacaktır.