VBA SendKeys - Παραδείγματα για τη χρήση της μεθόδου Excel VBA SendKeys

Πίνακας περιεχομένων

Excel VBA SendKeys

Το SendKeys στη γλώσσα VBA είναι μια μέθοδος που χρησιμοποιείται για την αποστολή πληκτρολογήσεων στο ενεργό παράθυρο, ώστε να μπορούμε να εργαζόμαστε χειροκίνητα μετά από αυτό. Όποτε χρησιμοποιούμε αλφάβητα ως κλειδιά, όλα τα αλφάβητα πρέπει να είναι με πεζούς χαρακτήρες. Είναι μια πολύπλοκη μέθοδος και συνιστάται να χρησιμοποιείται μόνο εάν είναι απαραίτητο και όταν δεν έχετε επιλογές

Το "SendKeys" είναι ένα από τα πολύπλοκα θέματα που πρέπει να κατανοήσετε. Δεν χρησιμοποιούν πολλοί από εμάς αυτήν τη λειτουργία στο VBA, αλλά είναι πάντα καλό να έχουμε περισσότερες γνώσεις για περισσότερα θέματα. Σε αυτό το άρθρο, θα σας δείξουμε πώς να χρησιμοποιήσετε τη λειτουργία SendKeys. Μπορεί να δυσκολευτείτε να ξαναδιαβάσετε το άρθρο πολλές φορές με μια πρακτική προσέγγιση για να μάθετε γρήγορα και καλύτερα.

Σύνταξη

Ακολουθεί η σύνταξη της μεθόδου VBA SendKeys.

Πλήκτρα ή συμβολοσειρά: Το είδος του κλειδιού που πρέπει να στείλουμε στην ενεργή εφαρμογή.

Περιμένετε: Σε αυτό το επιχείρημα, μπορούμε να χρησιμοποιήσουμε δύο πράγματα, δηλαδή, TRUE ή FALSE.

  • ΑΛΗΘΕΙΑ αν θέλετε το excel να περιμένει για την επεξεργασία των εκχωρημένων κλειδιών προτού ο έλεγχος επιστρέψει στη μακροεντολή.
  • FALSE, εάν αγνοήσετε την παράμετρο Wait , αυτή θα είναι η προεπιλεγμένη τιμή. Εάν επιλέξετε FALSE, τότε το excel συνεχίζει να εκτελεί τη μακροεντολή χωρίς να περιμένετε την επεξεργασία των κλειδιών στο ενεργό παράθυρο.

Τα κοινά πλήκτρα που χρησιμοποιούμε με το πληκτρολόγιο είναι "Ctrl, Shift και ALT". Έτσι, με τη μέθοδο SendKeys, πρέπει να τα χρησιμοποιήσουμε με ειδικούς χαρακτήρες. Ο παρακάτω πίνακας δείχνει τους ειδικούς χαρακτήρες για τα παραπάνω τρία κοινά πλήκτρα.

Άλλα πλήκτρα έχουν διαφορετικά πλήκτρα και χαρακτήρες. Ο παρακάτω πίνακας δείχνει τη λεπτομερή εξήγηση για κάθε κλειδί.

Σύμφωνα με την απαίτηση, μπορούμε να χρησιμοποιήσουμε οποιοδήποτε από τα παραπάνω κλειδιά. Με μερικά πρακτικά παραδείγματα, θα σας δείξουμε τον τρόπο χρήσης των SendKeys.

Παραδείγματα για τη χρήση της μεθόδου Excel VBA SendKeys

Παράδειγμα # 1

Για παράδειγμα, δείτε την παρακάτω τιμή κελιού.

Έχουμε τιμές σε τρία κελιά, και στο πρώτο κελί, έχουμε μια τιμή "Μπανγκαλόρ" και για αυτό το κελί, υπάρχει ένα σχόλιο ως "η πρωτεύουσα της Καρνάτακας".

Τώρα χρησιμοποιώντας το "SendKeys", προσπαθούμε να επεξεργαστούμε αυτό το σχόλιο.

Ανοίξτε το φύλλο Excel και μεταβείτε στον οπτικό βασικό επεξεργαστή, ξεκινήστε την υποδιαδικασία VBA.

Κώδικας:

Sub Send_Keys_Example () End Sub

Πρώτον, πρέπει να επιλέξουμε το κελί σχολίων για να επεξεργαστούμε το σχόλιο. Χρησιμοποιήστε λοιπόν τον κωδικό RANGE ("A1"). Επιλέξτε

Κώδικας:

Sub Send_Keys_Example () Εύρος ("A1"). Επιλέξτε End Sub

Μόλις επιλεγεί το κελί, θα εκτελέσουμε την ενέργεια επεξεργασίας των σχολίων. Εδώ πρέπει να θυμόμαστε τη συντόμευση πληκτρολογίου που χρησιμοποιούμε για να επεξεργαστούμε το σχόλιο.

Για να επεξεργαστούμε το σχόλιο, χρησιμοποιούμε το πλήκτρο συντόμευσης "Shift + F2" .

Εάν πατήσετε αυτό το πλήκτρο, θα επεξεργαστεί το σχόλιο.

Τώρα ανοίξτε τη μέθοδο "SendKeys".

Στη μέθοδο SendKeys, ο χαρακτήρας για τη χρήση του πλήκτρου SHIFT είναι "+" (σύμβολο συν), οπότε εισαγάγετε τον κωδικό σύνδεσης "+".

Τώρα το σύμβολο συν λειτουργεί ως πλήκτρο SHIFT, το επόμενο κλειδί μαζί με το SHIFT που χρησιμοποιούμε είναι το πλήκτρο F2. Όποτε χρησιμοποιούμε πλήκτρα λειτουργίας, πρέπει να τα περικλείουμε με αγκύλες, οπότε εισάγετε το πλήκτρο λειτουργίας F2 στο σγουρό βραχίονα.

Κώδικας:

Sub Send_Keys_Example () Εύρος ("A1"). Επιλέξτε SendKeys "+ (F2)" End Sub

Τώρα εκτελέστε τον κώδικα και δείτε τι παίρνουμε.

Όταν προσπαθούμε να εκτελέσουμε τον κώδικα, λάβαμε το μήνυμα όπως παραπάνω. Ένα από τα βασικά πράγματα που πρέπει να θυμόμαστε είναι ότι δεν μπορούμε να εκτελέσουμε τη μακροεντολή, η οποία χρησιμοποιεί το "SendKeys" από το παράθυρο του βασικού επεξεργαστή οπτικής.

Πρέπει να εκτελέσουμε τον κώδικα από τη λίστα "Μακροεντολή".

Κλείστε πρώτα το παράθυρο επεξεργασίας της Visual Basic.

Μεταβείτε στην καρτέλα "Προγραμματιστής" και κάντε κλικ στο "Μακροεντολή".

Τώρα ανοίγει μια λίστα με όλες τις μακροεντολές, επιλέξτε τη μακροεντολή που πρέπει να εκτελέσετε. Το όνομα της μακροεντολής μας είναι "Send_Keys_Example", οπότε θα πατήσω στο κουμπί εκτέλεσης.

Μπορείτε να δείτε ότι η επιλογή Επεξεργασία σχολίου είναι ενεργοποιημένη.

Όπως μπορείτε να δείτε παραπάνω, έχει εκχωρήσει το πλήκτρο συντόμευσης του SHIFT + F2 για να ανοίξει η επιλογή επεξεργασίας σχολίων.

Παράδειγμα # 2

Για παράδειγμα, εάν θέλετε να ανοίξετε το παράθυρο "Επικόλληση ειδικού" μέσω της μεθόδου SendKeys, μπορούμε να το κάνουμε και αυτό. Πρώτα, πρέπει να αντιγράψουμε ορισμένα κελιά και μετά να χρησιμοποιήσουμε τα SendKeys.

Κώδικας:

Sub Send_Keys_Example1 () Εύρος ("A1"). Αντιγραφή SendKeys "% es" End Sub

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

Όταν εκτελείτε τον κώδικα, θα ανοίξει κάτω από το ειδικό πλαίσιο διαλόγου επικόλλησης.

Πράγματα που πρέπει να θυμάστε

  • Το SendKeys εκχωρεί πλήκτρα στην ενεργή εφαρμογή.
  • Αυτή η μέθοδος είναι τόσο περίπλοκη και συνιστάται να χρησιμοποιείται μόνο αν είναι απαραίτητο και όταν δεν έχετε επιλογές.
  • Όποτε χρησιμοποιούμε αλφάβητα ως κλειδιά, όλα τα αλφάβητα πρέπει να είναι με πεζούς χαρακτήρες.

ενδιαφέροντα άρθρα...