1 Ανοίξτε την εφαρμογή Microsoft Office για την οποία είστε γραπτώς το script σας και πατήστε το πλήκτρο "Alt " και " F11 " την ίδια στιγμή να ανοίξετε το πρόγραμμα επεξεργασίας VBA . Επιλέξτε το σενάριο VBA που θέλετε να επεξεργαστείτε κάνοντας αριστερό κλικ επάνω στο αριστερό παράθυρο πλοήγησης, το οποίο θα ανοίξει το παράθυρο κώδικα προς τα δεξιά . Η προεπιλεγμένη σενάριο είναι ήδη ανοιχτή , οπότε αν θέλετε να επεξεργαστείτε αυτό , δεν χρειάζεται να κάνετε κλικ τίποτα στο παράθυρο πλοήγησης . Εντοπίστε τη συνάρτηση στο αρχείο που μόλις άνοιξε ότι θέλετε να μετατρέψετε μια ημερομηνία , και τοποθετήστε το δρομέα εκεί . 2
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο λειτουργία σας VBA για να ορίσετε το string για να μετατραπούν , αντικαθιστώντας την επιθυμητή ημερομηνία : Dim strDate = " 13 του Αυγούστου, 2010 "
εικόνων 3
Αντιγράψτε και επικολλήστε τον παρακάτω κώδικα στο πλαίσιο του προηγούμενου κώδικα , για να προετοιμάσει τη μεταβλητή ημερομηνία και να μετατρέψει το string : dim myDatemyDate = CDate ( strDate ) MsgBox MyDate
Η
4 Πατήστε το πλήκτρο " F5 " για να εκτελέσετε κώδικα VBA σας και να δείτε ένα πλαίσιο μηνύματος εμφανίζεται με την ημερομηνία σας μετατρέπεται σε αυτό .
Η
Η
Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα