Πώς να εισάγετε τον κώδικα VBA απευθείας στο Excel 2016 - ανδρείκελα

Μερικές φορές, η καλύτερη διαδρομή για την εισαγωγή κώδικα για το Excel 2016 είναι η πιο άμεση. Η είσοδος στον κώδικα VBA περιλαμβάνει άμεσα … καλά, εισάγοντας τον κώδικα απευθείας. Με άλλα λόγια, πληκτρολογείτε τον κώδικα χρησιμοποιώντας το πληκτρολόγιό σας. Η εισαγωγή και η επεξεργασία κειμένου σε μια ενότητα VBA λειτουργεί όπως θα περίμενε κανείς. Μπορείτε να επιλέξετε, να αντιγράψετε, να κόψετε, να επικολλήσετε και να κάνετε άλλα πράγματα στο κείμενο.

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

Μια μόνο γραμμή κώδικα VBA μπορεί να είναι όσο χρειαστεί να είναι. Ωστόσο, μπορεί να θέλετε να χρησιμοποιήσετε τους χαρακτήρες συνέχισης γραμμής για να διαγράψετε μεγάλες γραμμές κώδικα. Για να συνεχίσετε μια γραμμή γραμμής κώδικα (επίσης γνωστή ως ) από τη μια γραμμή στην άλλη, τερματίστε την πρώτη γραμμή με ένα κενό που ακολουθείται από μια υπογράμμιση (_). Στη συνέχεια, συνεχίστε τη δήλωση στην επόμενη γραμμή. Και μην ξεχνάτε το χώρο. Ένας χαρακτήρας υπογράμμισης που δεν προηγείται από ένα κενό δεν θα κάνει τη δουλειά.

Ακολουθεί ένα παράδειγμα μιας μόνο δήλωσης που χωρίζεται σε τρεις γραμμές:

Επιλογή. Η εντολή αυτή θα εκτελεστεί με τον ίδιο τρόπο αν εγγραφόταν σε μία γραμμή (χωρίς γραμμή χαρακτήρες λήξης). Παρατηρήστε ότι η δεύτερη και η τρίτη γραμμή αυτής της δήλωσης είναι χαραγμένη. Η εσοχή είναι προαιρετική, αλλά διευκρινίζει το γεγονός ότι αυτές οι γραμμές δεν είναι χωριστές δηλώσεις.

Οι μηχανικοί που σχεδίασαν το VBE με λευκή επικάλυψη αναμένουν ότι οι άνθρωποι θα κάνουν λάθη. Επομένως, το VBE έχει πολλαπλά επίπεδα αναίρεσης και επαναφοράς. Εάν διαγράψατε μια δήλωση που δεν πρέπει να έχετε, κάντε κλικ στο κουμπί Undo στη γραμμή εργαλείων (ή πατήστε Ctrl + Z) μέχρι να εμφανιστεί ξανά η δήλωση. Μετά την αναίρεση, μπορείτε να χρησιμοποιήσετε το κουμπί Επαναφορά για να εκτελέσετε τις αλλαγές που ακυρώσατε.

Είστε έτοιμοι να εισάγετε κώδικα πραγματικού βίου; Δοκιμάστε τα παρακάτω βήματα:

Δημιουργήστε ένα νέο βιβλίο εργασίας στο Excel.

1. Πατήστε Alt + F11 για να ενεργοποιήσετε το VBE.

2. Κάντε κλικ στο όνομα του νέου βιβλίου εργασίας στο παράθυρο Project.

3. Επιλέξτε Εισαγωγή → Ενότητα για να εισαγάγετε μια ενότητα VBA στο έργο.

4. Πληκτρολογήστε τον ακόλουθο κώδικα στην ενότητα:

5. Sub GuessName () Msg = "Το όνομά σας" & Εφαρμογή. Όνομα χρήστη & "; "Ans = MsgBox (Msg, vbYesNo) Αν Ans = vbNo Στη συνέχεια MsgBox" Ω, δεν πειράζει. "Αν Ans = vbYes Στη συνέχεια MsgBox" Πρέπει να είμαι ψυχική! "End Sub

   Τοποθετήστε το δρομέα οπουδήποτε στο κείμενο που πληκτρολογήσατε και πατήστε F5 για να εκτελέσετε τη διαδικασία.
   

6. Το F5 είναι μια συντόμευση για την εντολή Run → Run Sub / UserForm.Εάν εισαγάγατε σωστά τον κώδικα, το Excel εκτελεί τη διαδικασία και μπορείτε να απαντήσετε στο απλό παράθυρο διαλόγου. Θυμηθείτε, το κείμενο στο παράθυρο διαλόγου θα είναι διαφορετικό.

   Η διαδικασία GuessName εμφανίζει αυτό το παράθυρο διαλόγου.

   

   Όταν εισάγετε τον κώδικα που αναφέρεται στο Βήμα 5, ίσως παρατηρήσετε ότι το VBE κάνει κάποιες προσαρμογές στο κείμενο που εισάγετε. Για παράδειγμα, αφού πληκτρολογήσετε τη δήλωση Sub, το VBE εισάγει αυτόματα τη δήλωση End Sub. Και αν παραλείψετε τον χώρο πριν ή μετά από ένα ίση σημάδι, το VBE εισάγει το χώρο για εσάς. Επίσης, το VBE αλλάζει το χρώμα και την κεφαλαίο γράμματος σε κάποιο κείμενο. Όλα αυτά είναι απόλυτα φυσιολογικά. Είναι μόνο ο τρόπος που η VBE διατηρεί τα πράγματα καθαρά και ευανάγνωστα.

Εάν ακολουθήσατε τα προηγούμενα βήματα, μόλις γράψατε μια διαδικασία VBA Sub, γνωστή και ως μακροεντολή

. Όταν πιέζετε F5, το Excel εκτελεί τον κώδικα και ακολουθεί τις οδηγίες. Με άλλα λόγια, το Excel αξιολογεί κάθε δήλωση και κάνει αυτό που του είπατε να κάνει. (Μην αφήνετε αυτή τη νέα δύναμη να φτάσει στο κεφάλι σας.) Μπορείτε να εκτελέσετε αυτή τη μακροεντολή πολλές φορές - αν και τείνει να χάσει την έκκλησή της μετά από μερικές δεκάδες φορές. Για την καταγραφή, αυτή η απλή μακροεντολή χρησιμοποιεί τις ακόλουθες έννοιες:

Ορισμός μιας διαδικασίας Sub (πρώτη γραμμή)

• Αντιστοίχιση τιμών σε μεταβλητές (Msg και Ans)

• Συνένωση

• (9)> Χρησιμοποιώντας μια ενσωματωμένη λειτουργία VBA (MsgBox) Χρήση ενσωματωμένων σταθερών VBA (vbYesNo, vbNo και vbYes)

• Χρήση κατασκευής If-Then (δύο φορές) < Τερματισμός διαδικασίας Sub (τελευταία γραμμή)

• Δεν είναι κακό για έναν αρχάριο, ε;