Τρόπος χρήσης του βρόχου Do-While στο Excel VBA

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

Μπορείτε να χρησιμοποιήσετε αυτούς τους βρόχους ορίζοντας τα σημεία έναρξης και λήξης, τις συνθήκες (ες) και τις παραμέτρους. Ένας τέτοιος εξέχων βρόχος στο VBA είναι ο βρόχος do-while, τον οποίο μπορείτε να χρησιμοποιήσετε για να εργαστείτε με την αυτοματοποίηση δεδομένων. Δείτε πώς μπορείτε να χρησιμοποιήσετε τον βρόχο do-while του Excel VBA, μια πάντα ουσιαστική μεθοδολογία βρόχου, η οποία μπορεί να απλοποιήσει τις μη αυτόματες εργασίες σας σε μεγάλο βαθμό.

Τι είναι ο βρόχος Do-While στο Excel VBA;

Ο βρόχος do-while είναι αρκετά απλός. μπορείτε να χρησιμοποιήσετε αυτόν τον βρόχο για να κάνετε την προσφορά σας, εάν θέλετε να δημιουργήσετε ένα επιθυμητό αποτέλεσμα σε βάση μια συγκεκριμένη συνθήκη. Ο βρόχος εκτελείται έως ότου η καθορισμένη συνθήκη (ες) είναι True. Μόλις το πρόγραμμα συναντήσει μια τιμή False, ο βρόχος τερματίζεται και εκτυπώνει τα αποτελέσματα στα καθορισμένα κελιά.

Μπορείτε να χρησιμοποιήσετε τον βρόχο do-while σε διάφορα στάδια και με διαφορετικά κριτήρια. Μπορείτε ακόμη να χρησιμοποιήσετε πολλαπλούς βρόχους μέσα στον κύριο εξωτερικό βρόχο για να βελτιώσετε τη χρήση του. Ως αρχάριος, θα πρέπει να ανατρέξετε σε περίτεχνα Σεμινάρια προγραμματισμού VBA για να προωθήσετε τις γνώσεις και τις δεξιότητές σας σε αυτόν τον τομέα.

Σύνταξη Do-While Loop στο Excel VBA

Ο βρόχος do-while έχει μια προκαθορισμένη δομή, την οποία πρέπει να ακολουθήσετε, για να διασφαλίσετε ότι λειτουργεί ομαλά χωρίς να υπάρχουν σφάλματα. Ακολουθεί η σύνταξη για αναφορά:

Κάνωενώ [συνθήκη_αναφορά]
[Δηλώσεις κριτηρίων]
Βρόχος

Ο βρόχος ξεκινά με τη λέξη-κλειδί do-while, ακολουθούμενη από τις αναφορές έναρξης και λήξης. Το πρώτο μέρος της σύνταξης ελέγχει ολόκληρο τον βρόχο. Στη συνέχεια, πρέπει να ορίσετε τις εντολές που θα εκτελούνται κάθε φορά που εκτελείται ο βρόχος.

Τέλος, μόλις η συνθήκη βρόχου λάβει μια τιμή False, η λέξη-κλειδί βρόχου εκτελείται και εξέρχεται από τον βρόχο. Αυτή είναι μια συνολική δομή. μπορείτε να το βελτιώσετε για να εκτελέσετε διαφορετικές ενέργειες. Ακολουθούν μερικά παραδείγματα για να εξοικειωθείτε με τη λειτουργία ενός βρόχου do-while.

Γράψτε τον πρώτο σας κώδικα βρόχου Do-While

Ας υποθέσουμε ότι θέλετε να εμφανίσετε τα πολλαπλάσια του δύο στη στήλη Α. Η προϋπόθεση είναι να εκτυπώσετε τους αριθμούς μέχρι ο μετρητής να φτάσει το 20.

Για να το κάνετε αυτό, μεταβείτε στην καρτέλα Προγραμματιστής στο Excel και ανοίξτε το πρόγραμμα επεξεργασίας κωδικοποίησης. εναλλακτικά, πατήστε Alt + F11 για να ανοίξετε απευθείας το πρόγραμμα επεξεργασίας κωδικοποίησης. Στο παράθυρο του προγράμματος επεξεργασίας κώδικα, κάντε κλικ στο Εισάγετε καρτέλα και προσθέστε μια νέα ενότητα.

Πρέπει να γράψετε όλο τον κώδικα σε αυτό το παράθυρο της ενότητας. Προσθέστε τον ακόλουθο κώδικα μέσα στη μονάδα:

Sub dowhileloop()
Dim α Οπως και Ακέραιος αριθμός
α = 1
ΚάνωΕνώ α <= 10
Κελιά (a, 1) = 2 * a
a = a + 1
Βρόχος
Τέλος Υπο

Επεξήγηση του Κώδικα

Ακολουθεί μια ανάλυση του κώδικα που θα σας βοηθήσει να κατακτήσετε τα βασικά:

• Χρήση δευτερεύουσας ρουτίνας: Για να ξεκινήσετε τη σύνταξη του κώδικα στο Excel VBA, δημιουργήστε ένα εξωτερικό κέλυφος με μια συνάρτηση δευτερεύουσας ρουτίνας (Sub). Δώστε του ένα ουσιαστικό όνομα, το οποίο αντηχεί με τον σκοπό του κώδικα. Σε αυτό το παράδειγμα, μπορείτε να χρησιμοποιήσετε το όνομα dowhileloop, ακολουθούμενο από ().
• Καθορισμός τύπων δεδομένων: Η συνάρτηση διάστασης (dim) πρέπει να χρησιμοποιηθεί για τη δήλωση των τύπων δεδομένων μεταβλητής. Δηλώνοντας τον τύπο δεδομένων, μπορείτε να κάνετε τον κώδικά σας αποδοτικό και να βελτιώσετε την ταχύτητα εκτέλεσης. Σε αυτή την περίπτωση, η μεταβλητή ένα αποθηκεύει ακέραιες τιμές, επομένως χρησιμοποιήστε τον τύπο δεδομένων ακέραιου για να τον ορίσετε. Μπορείτε να αποθηκεύσετε τον αριθμό της αρχικής σειράς σε αυτήν τη μεταβλητή, για να δηλώσετε το σημείο έναρξης δεδομένων του βρόχου do-while.
• Ορισμός συνθήκης (ών): Τώρα, ήρθε η ώρα να περάσει η συνθήκη για τον έλεγχο του βρόχου do-while. Μπορείτε να χρησιμοποιήσετε το κάνε ενώ λέξεις-κλειδιά, ακολουθούμενη από τη συνθήκη. Εφόσον θέλετε να εκτελέσετε τον βρόχο δέκα φορές, χρησιμοποιείτε τη συνθήκη a < = 10.
• Περάστε τις εκτελέσιμες δηλώσεις: Είναι σημαντικό για εσάς να γνωρίζετε τη διαφορά μεταξύ των Λειτουργία κελιών και συνάρτηση εύρους σε VBA. Η συνάρτηση κελιών χρησιμοποιεί τις αναφορές σειρών και στηλών στο VBA. Για παράδειγμα, κατά την πρώτη επανάληψη, όταν η τιμή του a =1, ο τύπος του κελιού είναι (1,1). Στη μνήμη του VBA, αυτό μεταφράζεται σε κελί A1. Κάθε φορά που εκτελείται ο βρόχος, η τιμή της καθορισμένης μεταβλητής αυξάνεται και η αναφορά μετακινείται στο επόμενο διαθέσιμο κελί.
• Αύξηση της μεταβλητής σας: Μπορείς να περάσεις a = a + 1 δήλωση για την αύξηση των τιμών των κελιών. Αυτό μετακινεί τον βρόχο στο επόμενο μέρος της συνθήκης. ο βρόχος συνεχίζει να τρέχει έως ότου η συνθήκη εμφανίσει μια τιμή False.
• Έξοδος από τη συνθήκη Loop: Μόλις η συνθήκη είναι False, ο βρόχος εξέρχεται με τη λέξη-κλειδί Loop και, τέλος, εξέρχεται από την υπο-ρουτίνα με τη λέξη-κλειδί End Sub.
• Εκτέλεση του Κώδικα: Εφόσον ο κωδικός είναι έτοιμος, απλώς πατήστε το Πλήκτρο F5 ή το πράσινο κουμπί αναπαραγωγής στην επάνω γραμμή μενού για να εκτελέσετε τον κώδικα.

Το τελικό αποτέλεσμα δείχνει μια λίστα με αριθμούς από το 2-20 στη στήλη Α.

Χρήση μιας προσυμπληρωμένης στήλης ως συνθήκη βρόχου

Τώρα που καταλάβατε τη σύνταξη και τις αποχρώσεις της κατασκευής μιας βασικής δομής, γιατί να μην γράψετε έναν άλλο κώδικα για να εκτυπώσετε παρόμοιους αριθμούς με βάση προϋπάρχοντα κριτήρια; Για παράδειγμα, μπορείτε να δημιουργήσετε μια συνθήκη βρόχου που επιλέγει το σύνθημά της από τη στήλη Α και εκτυπώνει την έξοδο στη στήλη Β.

Με βάση τα συνολικά συμπληρωμένα κελιά στη στήλη Α, μπορείτε να εκτυπώσετε πολλαπλάσια των δύο στη στήλη Β. Ο βρόχος εκτελεί τη βασική στήλη Α του συνολικού αριθμού των προσυμπληρωμένων κελιών. Εφόσον η τιμή της αρχικής σειράς είναι μία (a =1), η τελική τιμή είναι δυναμική και υπολογίζεται αυτόματα από τον βρόχο do-while.

Χρησιμοποιώντας την τιμή της γραμμής του, ο κώδικας περνά μέσα από κάθε κελί της στήλης Α και πολλαπλασιάζει τον αριθμό με 2. Η έξοδος εμφανίζεται στη στήλη Β.

Εάν υπάρχουν περισσότερες από δέκα τιμές στη στήλη Α, ο βρόχος θα τρέξει μέχρι να συναντήσει μια κενή τιμή στην πρώτη στήλη. Ομοίως, μπορείτε να γράψετε ακόμη πιο σύνθετες συνθήκες μέσα στον βρόχο do-while και να τον χρησιμοποιήσετε για να ελέγξετε τις συνθήκες και να εμφανίσετε την έξοδο, όπως απαιτείται.

Χρήση δήλωσης IF εντός βρόχου Do-While

Όπως και οι ένθετοι βρόχοι, μπορείτε να χρησιμοποιήσετε τη δήλωση IF εντός του βρόχου Do-While, για να προσθέσετε ένα άλλο επίπεδο συνθήκης. Σε μια τέτοια περίπτωση, ο βρόχος do-while εκτελεί ολόκληρο τον βρόχο έως ότου η συνθήκη είναι False και η εσωτερική πρόταση IF εκτελείται κάθε φορά που εκτελείται ο βρόχος.

Στο παρακάτω παράδειγμα, ο βρόχος do-while περνάει μέσα από κάθε κελί της στήλης Α, μέχρι να συναντήσει ένα κενό κελί. Στη συνέχεια, η δήλωση IF ελέγχει την τιμή κάθε κελιού στη στήλη Α και εκτυπώνει την έξοδο στη στήλη Β. Μόλις ο εξωτερικός βρόχος συναντήσει ένα κενό κελί στη στήλη Α, ο βρόχος σταματά και βγαίνει από την υπο-ρουτίνα.

Η έξοδος είναι η εξής:

Μέχρις ότου η τιμή στη στήλη Α είναι μικρότερη από ίση με πέντε, η τιμή που προκύπτει στη στήλη Β είναι πέντε. Στο A6, δεδομένου ότι η τιμή του κελιού είναι μεγαλύτερη από πέντε, η έξοδος που προκύπτει είναι επτά, που είναι σε συγχρονισμό με τη συνθήκη IF.

Ξετυλίγοντας τις πολύπλευρες λειτουργίες του VBA

Το Excel και το VBA αποτελούν έναν πολύ ευνοϊκό συνδυασμό για την εκτέλεση προηγμένης ανάλυσης δεδομένων. Ακόμη και χωρίς VBA, μπορείτε να χρησιμοποιήσετε διάφορες λογικές λειτουργίες του Excel για να εκτελέσετε περίπλοκες εργασίες, αποδεικνύοντας τις δεξιότητές σας στον προγραμματισμό.

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