Turinys
„FileDateTime“ aprašymas
Grąžina datą ir laiką, kada failas buvo sukurtas arba paskutinį kartą pakeistas.
Paprastas „FileDateTime“ pavyzdys
Tarkime, failas „D: \ test.txt“ paskutinį kartą pakeistas 2019-10-21 09:41:30.
1 | „MsgBox FileDateTime“ („D: \ test.txt“) |
Tai grįš 2019-10-21 09:41:30.
„FileDateTime“ sintaksė
VBA redaktoriuje galite įvesti „FileDateTime (“), kad pamatytumėte „FileDateTime“ funkcijos sintaksę:
Funkcijoje „FileDateTime“ yra argumentas:
Kelio pavadinimas: Eilutės išraiška, vaizduojanti failą/aplanką/diską.
„Excel VBA FileDateTime“ funkcijos pavyzdžiai
Norėdami išvardyti paskutinį C disko aplanko ir failų modifikavimo laiką, galite naudoti šį kodą.
123456789101112131415161718192021222324 | Antrinis_pavyzdys ()Dim failo pavadinimas kaip eilutėDim fullName As StringDim rng As RangeDim i As IntegerNustatyti rng = Diapazonas („A1“)fileName = Dir ("C: \", vbDirectory)i = 1DarykfullName = "C: \" ir failo pavadinimasrng.Offset (i, 0) = fileNamerng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng.Offset (i, 3) = GetAttr (fullName)fileName = RežJei fileName = "" Tada uždarykite „Do“i = i + 1KilpaPabaiga Sub |
Rezultatas bus panašus, kaip nurodyta toliau.