Πίνακας περιεχομένων
Περιγραφή FileDateTime
Επιστρέφει την ημερομηνία και την ώρα δημιουργίας ή τελευταίας τροποποίησης ενός αρχείου.
Απλό Παράδειγμα FileDateTime
Ας υποθέσουμε ότι ένα αρχείο "D: \ test.txt" τροποποιήθηκε τελευταία φορά στις 21/10/2019 9:41:30 π.μ.
| 1 | MsgBox FileDateTime ("D: \ test.txt") |
Αυτό θα επιστρέψει 21/10/2019 9:41:30 π.μ.
Σύνταξη FileDateTime
Στο πρόγραμμα επεξεργασίας VBA, μπορείτε να πληκτρολογήσετε "FileDateTime (" για να δείτε τη σύνταξη για τη συνάρτηση FileDateTime:
Η συνάρτηση FileDateTime περιέχει ένα όρισμα:
Όνομα διαδρομής: Μια παράσταση συμβολοσειράς που αντιπροσωπεύει ένα αρχείο/φάκελο/μονάδα δίσκου.
Παραδείγματα της συνάρτησης Excel VBA FileDateTime
Για να καταχωρίσετε τον τελευταίο τροποποιημένο χρόνο του φακέλου και των αρχείων στη μονάδα δίσκου C, μπορείτε να χρησιμοποιήσετε τον ακόλουθο κώδικα.
| 123456789101112131415161718192021222324 | Sub Dir_Example ()Dim αρχείο Όνομα ως συμβολοσειράDim fullName As StringDim rng As RangeDim i As IntegerΟρισμός rng = Εύρος ("A1")fileName = Dir ("C: \", vbDirectory)i = 1ΚάνωfullName = "C: \" & όνομα αρχείουrng.Offset (i, 0) = όνομα αρχείουrng.Offset (i, 1) = FileDateTime (fullName)rng.Offset (i, 2) = FileLen (fullName)rng. Offset (i, 3) = GetAttr (fullName)όνομα αρχείου = ΔιεύθυνσηΑν fileName = "" Τότε Έξοδος Doi = i + 1ΒρόχοςΤέλος υπο |
Το αποτέλεσμα θα είναι παρόμοιο με το παρακάτω.
