Πώς να χρησιμοποιήσετε την καθυστέρηση μετά την εκτέλεση μιας μακροεντολής VBA στο Excel;
Σε ορισμένες περιπτώσεις, ίσως χρειαστεί να κάνετε καθυστέρηση χρονοδιακόπτη για την ενεργοποίηση μιας μακροεντολής VBA στο Excel. Για παράδειγμα, όταν κάνετε κλικ για να εκτελέσετε μια καθορισμένη μακροεντολή, θα τεθεί σε ισχύ μετά από 10 δευτερόλεπτα. Αυτό το άρθρο θα σας δείξει μια μέθοδο για να το επιτύχετε.
Χρησιμοποιήστε χρονική καθυστέρηση μετά την εκτέλεση μιας μακροεντολής VBA στο Excel
Χρησιμοποιήστε χρονική καθυστέρηση μετά την εκτέλεση μιας μακροεντολής VBA στο Excel
Εδώ σας προτείνω να εκτελέσετε μια συγκεκριμένη μακροεντολή κάνοντας κλικ σε ένα κουμπί εντολών στο Excel. Μπορείτε να προσθέσετε τον κωδικό καθυστέρησης χρονοδιακόπτη στο κουμπί εντολών για καθυστέρηση στην εκτέλεση της μακροεντολής. Κάντε τα εξής:
1. κλικ Εργολάβος > Κύριο θέμα > Κουμπί εντολών (ActiveX Control)και εισαγάγετε ένα κουμπί εντολής στο φύλλο εργασίας σας. Δείτε το στιγμιότυπο οθόνης:
2. Αφού εισαγάγετε το κουμπί εντολών, κάντε δεξί κλικ πάνω του και μετά επιλέξτε Προβολή κωδικού από το μενού περιβάλλοντος. Δείτε το στιγμιότυπο οθόνης:
3. Στο αναδυόμενο παράθυρο Microsoft Visual Basic για εφαρμογές παράθυρο, εισαγάγετε τον παρακάτω κωδικό χρονοδιακόπτη VBA μεταξύ των δύο γραμμών του αρχικού κώδικα στο παράθυρο Κωδικός όπως φαίνεται στο παρακάτω στιγμιότυπο οθόνης:
Κωδικός VBA: καθυστέρηση χρονοδιακόπτη
Application.OnTime Now() + TimeValue("00:00:10"), "Cheezy"
Note: Στον κώδικα, 00:00:10 είναι ο χρόνος καθυστέρησης και Τρελός είναι το όνομα της μακροεντολής που θα εκτελέσετε. Αλλάξτε τα ανάλογα με τις ανάγκες σας
4. Πάτα το άλλος + Q πλήκτρα για να κλείσετε το Microsoft Visual Basic για εφαρμογές παράθυρο.
5. Απενεργοποιήστε τη λειτουργία σχεδίασης κάνοντας κλικ Εργολάβος > Λειτουργία σχεδίασης. Δείτε το στιγμιότυπο οθόνης:
Από τώρα και στο εξής, όταν κάνετε κλικ στο κουμπί εντολών, η καθορισμένη μακροεντολή θα τεθεί σε ισχύ μετά από 10 δευτερόλεπτα στο Excel.
Τα καλύτερα εργαλεία παραγωγικότητας γραφείου
Αυξήστε τις δεξιότητές σας στο Excel με τα Kutools για Excel και απολαύστε την αποτελεσματικότητα όπως ποτέ πριν. Το Kutools για Excel προσφέρει πάνω από 300 προηγμένες δυνατότητες για την ενίσχυση της παραγωγικότητας και την εξοικονόμηση χρόνου. Κάντε κλικ εδώ για να αποκτήσετε τη δυνατότητα που χρειάζεστε περισσότερο...
Το Office Tab φέρνει τη διεπαφή με καρτέλες στο Office και κάνει την εργασία σας πολύ πιο εύκολη
- Ενεργοποίηση επεξεργασίας και ανάγνωσης καρτελών σε Word, Excel, PowerPoint, Publisher, Access, Visio και Project.
- Ανοίξτε και δημιουργήστε πολλά έγγραφα σε νέες καρτέλες του ίδιου παραθύρου και όχι σε νέα παράθυρα.
- Αυξάνει την παραγωγικότητά σας κατά 50% και μειώνει εκατοντάδες κλικ του ποντικιού για εσάς κάθε μέρα!