Καλησπέρα
Παρασκευά, θα μπορούσες να χρησιμοποιήσεις τις παρακάτω συναρτήσεις της
VBA:
1) Date
Επιστρέφει το τμήμα της ημερομηνίας από το χρονόμετρο του συστήματος.
Επίσης μπορεί να χρησιμοποιηθεί για να ρυθμίσει το χρονόμετρο στην επιθυμητή ημερομηνία.
2) Time
Επιστρέφει το τμήμα της ώρας από το χρονόμετρο του συστήματος.
Επίσης μπορεί να χρησιμοποιηθεί για να ρυθμίσει το χρονόμετρο στην επιθυμητή ώρα.
Με τον κώδικα:
Date=Cdate(0)
Time=Cdate(0)
Το χρονόμετρο ρυθμίζεται να δείχνει την αφετηρία μέτρησης του χρόνου, που για την
VBA, είναι η 30/12/1899 12:00 πμ.
Αν θέλεις να ρυθμίσεις το χρονόμετρο σε άλλη ημερομηνία και ώρα, καλό είναι να χρησιμοποιήσεις τις συναρτήσεις DateSerial και TimeSerial.
Ο κώδικας:
Date=DateSerial(2000,10,5)
Time=TimeSerial(14,10,5)
Ορίζει το χρονόμετρο στην ημερομηνία και ώρα: 5/10/2000 2:10:5 μμ
Καλή συνέχεια.
Φιλικά/Γιώργος