Πώς να αποκτήσετε κώδικα VBA σε μια ενότητα με κωδικό Windows - dummies

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

Η εισαγωγή και η επεξεργασία κειμένου σε μια λειτουργική μονάδα VBA λειτουργεί όπως θα περίμενε κανείς. Μπορείτε να επιλέξετε, να αντιγράψετε, να κόψετε, να επικολλήσετε και να κάνετε άλλα πράγματα στο κείμενο.

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

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

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

Έτοιμοι να εισάγεις έναν πραγματικό, ζωντανό κώδικα; Δοκιμάστε τα παρακάτω βήματα:

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

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

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

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

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

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

   Βεβαιωθείτε ότι ο δρομέας βρίσκεται οπουδήποτε μέσα στο κείμενο που πληκτρολογήσατε και, στη συνέχεια, πιέστε το πλήκτρο F5 για να εκτελέσετε τη διαδικασία.
   

6. Το F5 είναι μια συντόμευση για την εντολή Run → Run Sub / UserForm.

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

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

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

Ορισμός μεταβλητών (δηλώσεις Dim)

• Καθορισμός τιμών σε μεταβλητές (Msg και Ans)

• (9)> Χρήση ενσωματωμένης λειτουργίας VBA (MsgBox)

• Χρήση ενσωματωμένων σταθερών VBA (vbYesNo, vbNo και vbYes)

• Χρήση κατασκευής If-Then (δύο φορές)

• Τερματισμός διαδικασίας Sub (τελευταία γραμμή)

• Όπως αναφέρθηκε, μπορείτε να αντιγράψετε και να επικολλήσετε κώδικα σε μια ενότητα VBA. Για παράδειγμα, μια διαδικασία Sub ή Function που γράφετε για ένα έργο μπορεί επίσης να είναι χρήσιμη σε ένα άλλο έργο. Αντί να χάνετε χρόνο ξανά στον κώδικα, μπορείτε να ενεργοποιήσετε την ενότητα και να χρησιμοποιήσετε τις κανονικές διαδικασίες αντιγραφής και επικόλλησης (Ctrl + C για αντιγραφή και Ctrl + V για επικόλληση). Αφού επικολλήσετε τον κώδικα σε μια ενότητα VBA, μπορείτε να τροποποιήσετε τον κώδικα όπως είναι απαραίτητο.