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

Μπορείτε να κατεβάσετε αυτό το Πρότυπο VBA SendKeys Excel εδώ - Πρότυπο VBA SendKeys Excel

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

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

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

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

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

Κώδικας:

 Sub Send_Keys_Example () End Sub 

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

Κώδικας:

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

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

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

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

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

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

Τώρα το σύμβολο plus λειτουργεί ως πλήκτρο 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 εκχωρεί πλήκτρα στην ενεργή εφαρμογή.
  • Αυτή η μέθοδος είναι τόσο περίπλοκη και συνιστάται να χρησιμοποιείται μόνο εάν είναι απαραίτητο και όταν δεν έχετε επιλογές.
  • Όποτε χρησιμοποιούμε αλφάβητα ως κλειδιά, όλα τα αλφάβητα πρέπει να είναι με πεζούς χαρακτήρες.