λογισμικό

    没有任何同级栏目
Γνώση Υπολογιστών >> λογισμικό >

Πώς ενεργοποιείτε μια μακροεντολή σε ένα φύλλο excel όταν το κύτταρο ισούται με την τιμή προκαθορισμού;

Μπορείτε να ενεργοποιήσετε μια μακροεντολή σε ένα φύλλο excel όταν ένα κύτταρο ισούται με μια προκαθορισμένη τιμή χρησιμοποιώντας τις ακόλουθες μεθόδους:

1. Χρήση συμβάντος αλλαγής φύλλου εργασίας:

* βήματα:

1. Κάντε δεξί κλικ στην καρτέλα φύλλο και επιλέξτε " Προβολή κωδικού ".

2. Στον επεξεργαστή VBA, επιλέξτε " φύλλο εργασίας "Από το αντικείμενο" "Dropdown και" Αλλαγή "Από τη διαδικασία" "DREPDOWN.

3. Εισαγάγετε τον ακόλουθο κωδικό:

`` `vba

Ιδιωτικό Sub Workshange_Change (Byval Target As Range)

Εάν το Target.address ="$ A $ 1" τότε "αντικαταστήστε" $ A $ 1 "με τη διεύθυνση κυττάρων

Εάν το target.value ="yourpredefinedValue" τότε

Καλέστε το Yourmacroname 'Αντικαταστήστε το "Yourmacroname" με το πραγματικό όνομα μακροεντολής

Τέλος εάν

Τέλος εάν

Τερματισμός

`` `

* Αντικαταστήστε το `" $ A $ 1 "` με την πραγματική διεύθυνση κυττάρων που θέλετε να παρακολουθείτε.

* Αντικαταστήστε το `" YourpredefinedValue "` με την τιμή που θέλετε να ενεργοποιήσετε τη μακροεντολή.

* Αντικαταστήστε το `" Yourmacroname "` με το πραγματικό όνομα της μακροεντολής που θέλετε να εκτελέσετε.

* Επεξήγηση:

* Το συμβάν "φύλλο εργασίας_change" ενεργοποιείται κάθε φορά που αλλάζει μια κυτταρική τιμή στο φύλλο.

* Ο κώδικας ελέγχει εάν το μεταβαλλόμενο κύτταρο είναι το καθορισμένο κύτταρο και εάν η τιμή του ταιριάζει με την προκαθορισμένη τιμή.

* Εάν πληρούνται και οι δύο προϋποθέσεις, καλεί την καθορισμένη μακροεντολή.

2. Χρήση επικύρωσης δεδομένων:

* βήματα:

1. Επιλέξτε το κελί που θέλετε να παρακολουθείτε.

2. Πηγαίνετε στα δεδομένα καρτέλα και κάντε κλικ στο επικύρωση δεδομένων .

3. Στις ρυθμίσεις καρτέλα, επιλέξτε προσαρμοσμένο Από το επιτρέψτε αναπτυσσόμενο αναπτυσσόμενο.

4. Στον τύπο πεδίο, εισάγετε:

`` `

=A1 ="YourpredefinedValue"

`` `

* Αντικαταστήστε το `" YourpredefinedValue "` με την πραγματική τιμή που θέλετε να ενεργοποιήσετε τη μακροεντολή.

5. Πηγαίνετε στην ειδοποίηση σφάλματος καρτέλα και επιλέξτε Ειδοποίηση σφαλμάτων μετά την εισαγωγή μη έγκυρων δεδομένων .

6 στο μήνυμα σφάλματος πεδίο, εισαγάγετε τα εξής:

`` `

Αυτό το κύτταρο πρέπει να περιέχει την τιμή "YourpredefinedValue"

`` `

* Αντικαταστήστε το `" YourpredefinedValue "με την πραγματική τιμή.

7. Κάντε κλικ στο ok Για να αποθηκεύσετε τις ρυθμίσεις.

8. Κάντε δεξί κλικ Στο κελί και επιλέξτε " Αντιστοιχίστε τη μακροεντολή ".

9. Επιλέξτε τη μακροεντολή που θέλετε να εκτελέσετε και κάντε κλικ στο ok .

* Επεξήγηση:

* Η επικύρωση δεδομένων περιορίζει το κύτταρο για να αποδεχθεί μόνο την προκαθορισμένη τιμή.

* Όταν ο χρήστης εισάγει μια μη έγκυρη τιμή, εμφανίζεται ένα μήνυμα σφάλματος και η μακροεντολή που έχει εκχωρηθεί στο κελί εκτελείται.

3. Χρησιμοποιώντας μια φόρμουλα με ένα συμβάν φύλλου εργασίας:

* βήματα:

1. Δημιουργία Ένας τύπος σε ένα κρυφό κύτταρο που αξιολογεί σε «αληθές» όταν το παρακολούθησης κυττάρων ισούται με την προκαθορισμένη τιμή. Για παράδειγμα, στο κελί `b1`:

`` `

=A1 ="YourpredefinedValue"

`` `

* Αντικαταστήστε το `" YourpredefinedValue "με την πραγματική τιμή.

2. Κάντε δεξί κλικ στην καρτέλα φύλλο και επιλέξτε " Προβολή κωδικού ".

3. Στον επεξεργαστή VBA, επιλέξτε " φύλλο εργασίας "Από το αντικείμενο" "Dropdown και" Υπολογίστε "Από τη διαδικασία" "DREPDOWN.

4. Εισαγάγετε τον ακόλουθο κωδικό:

`` `vba

Ιδιωτικό Sub Worksheet_Calculate ()

Εάν το εύρος ("b1"). Value =true τότε "αντικαταστήστε" b1 "με το κύτταρο που περιέχει τον τύπο

Καλέστε το Yourmacroname 'Αντικαταστήστε το "Yourmacroname" με το πραγματικό όνομα μακροεντολής

Εύρος ("b1"). Value =false 'επαναφέρετε το κελί σε ψευδές

Τέλος εάν

Τερματισμός

`` `

* Αντικαταστήστε το "B1" `με την πραγματική διεύθυνση κυττάρων που περιέχει τον τύπο.

* Αντικαταστήστε το `" Yourmacroname "` με το πραγματικό όνομα της μακροεντολής που θέλετε να εκτελέσετε.

* Επεξήγηση:

* Το συμβάν "φύλλο εργασίας_calculate" ενεργοποιείται κάθε φορά που εμφανίζεται ένας υπολογισμός στο φύλλο.

* Ο κώδικας ελέγχει εάν η τιμή στο κύτταρο του τύπου είναι `true '.

* Εάν είναι `true ', καλεί την καθορισμένη μακροεντολή και στη συνέχεια επαναφέρει το κύτταρο του τύπου σε` false' για να αποτρέψει την επαναλαμβανόμενη εκτέλεση.

Επιλέξτε την καλύτερη μέθοδο με βάση τις συγκεκριμένες απαιτήσεις σας και την πολυπλοκότητα του υπολογιστικού φύλλου σας.

Συναφής σύστασή

Πνευματικά δικαιώματα © Γνώση Υπολογιστών Όλα τα δικαιώματα κατοχυρωμένα