Mục lục
Mô tả FileDateTime
Trả về ngày và giờ khi tệp được tạo hoặc sửa đổi lần cuối.
Ví dụ về FileDateTime đơn giản
Giả sử tệp “D: \ test.txt” được sửa đổi lần cuối vào ngày 21/10/2019 9:41:30 sáng.
| 1 | MsgBox FileDateTime ("D: \ test.txt") |
Điều này sẽ trở lại ngày 21 tháng 10 năm 2019 9:41:30 sáng.
Cú pháp FileDateTime
Trong VBA Editor, bạn có thể nhập “FileDateTime (” để xem cú pháp của Hàm FileDateTime:
Hàm FileDateTime chứa một đối số:
PathName: Một biểu thức chuỗi đại diện cho một tệp / thư mục / ổ đĩa.
Ví dụ về hàm FileDateTime trong Excel VBA
Để liệt kê thời gian sửa đổi cuối cùng của thư mục & tệp trên ổ C, bạn có thể sử dụng đoạn mã sau.
| 123456789101112131415161718192021222324 | Sub Dir_Example ()Dim fileName As StringDim fullName As StringDim rng As RangeDim i As IntegerĐặt rng = Range ("A1")fileName = Dir ("C: \", vbDirectory)i = 1LàmfullName = "C: \" & fileNamerng.Offset (i, 0) = fileNamerng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng.Offset (i, 3) = GetAttr (fullName)fileName = DirIf fileName = "" Then Exit Doi = i + 1VòngKết thúc Sub |
Kết quả sẽ tương tự như sau.
