Όταν έχετε πολλές προϋποθέσεις για έλεγχο ή θέλετε να κάνετε κάποια λειτουργία με βάση την επιλογή του χρήστη, τότε μπορείτε να χρησιμοποιήσετε τις προτάσεις If Else If. Αλλά είναι ενοχλητικά όταν πρόκειται για πολλαπλές συνθήκες. Σε αυτή την περίπτωση, η καλύτερη λύση στο Excel VBA είναι ηΕπιλέξτε Περίπτωσημέθοδος.
Τι είναι μια δήλωση Select Case στο VBA;
Οι δηλώσεις Select Case στο VBA είναι χρήσιμες όταν έχετε πολλούς όρους για έλεγχο. Είναι σαν τις εντολές switch σε άλλες γλώσσες προγραμματισμού. Ελέγχει τη δεδομένη μεταβλητή και εκτελεί την αντιστοιχισμένη περίπτωση.
Σύνταξη επιλεγμένης περίπτωσης στο Excel VBA
Επιλογή μεταβλητής περίπτωσης Περίπτωση Συνθήκη1 αποτέλεσμα1 υπόθεση Περίπτωση2 Συνθήκη2…. περίπτωση Συνθήκη N αποτέλεσμαN [περίπτωση άλλης έκβασηςElse]
Επιλέξτε Περίπτωση:Εδώ Επιλέξτε Περίπτωση είναι μια λέξη -κλειδί για να ξεκινήσει ο έλεγχος υπόθεσης.
Μεταβλητός: Μεταβλητή είναι οποιαδήποτε μεταβλητή που θέλετε να ελέγξετε.
Υπόθεση: από την επόμενη γραμμή, ξεκινάμε τον έλεγχο των συνθηκών με μεταβλητές.
Μπορείτε να έχετε όσες προϋποθέσεις θέλετε. Μπορούμε να ελέγξουμε οποιαδήποτε συνθήκη με τη λέξη -κλειδί υπόθεσηΤο Η συνθήκη μπορεί να είναι μια λογική δήλωση ή μια ευθεία τιμή της Επιλεγμένης Μεταβλητής. Θα έχει πάντα ως αποτέλεσμα πραγματική-ψευδή τιμή. Όλα αυτά είναι έγκυρες δηλώσεις:
Επιλέξτε Περίπτωση περιοχή 'χρησιμοποιώντας μια ευθεία τιμή Υπόθεση "Κεντρικό" εύρος ("D1"). Τιμή = περιοχή 'χρησιμοποιώντας μια εντολή is Υπόθεση Είναι = "Κεντρικό" εύρος ("D1"). Τιμή = περιοχή Τέλος Επιλογή
Με το is μπορείτε να βάλετε αριθμητικούς λογικούς τελεστές για να ελέγξετε εάν η Περίπτωση είναι ίση με (=), μεγαλύτερη από (>), μικρότερη από (<) κ.λπ.
Μπορείτε να χρησιμοποιήσετε το κόμμα (",") για να πραγματοποιήσετε μία λειτουργία σε πολλαπλές συνθήκες (όπως ή τελεστής).
Περίπτωση Is = "West", "North", "South" Range ("D1"). Value = region
Μπορείτε επίσης να χρησιμοποιήσετε το χειριστή Προς για έλεγχο μεταξύ μεγάλων εύρων.
Περίπτωση 1 έως 40 Βαθμός = "F" Υπόθεση 41 έως 60 Βαθμός = "C" Περίπτωση 61 έως 80 Βαθμός = "Β" Υπόθεση 81 έως 100 Βαθμός = "A"
Η δήλωση Case Else είναι προαιρετική. Μπορείτε να το χρησιμοποιήσετε για να κάνετε κάτι από προεπιλογή, εάν καμία από τις περιπτώσεις δεν ταιριάζει. Όπως η εμφάνιση ενός μηνύματος ότι η επιλογή είναι άκυρη ή κάτι τέτοιο.
Case Else MsgBox "Μη έγκυρη επιλογή"
Τώρα που γνωρίζουμε τα βασικά της Επιλογής Περίπτωσης, ας έχουμε ένα παράδειγμα.
Παράδειγμα: Δημιουργήστε μια συνάρτηση βαθμολόγησης χρησιμοποιώντας το VBA Select Case
Πρέπει να δημιουργήσουμε μια συνάρτηση που ελέγχει την παρεχόμενη τιμή και επιστρέφει τους βαθμούς σύμφωνα με τους παρακάτω κανόνες:
- Αν> 41, Βαθμός = "F"
- Εάν είναι μεταξύ 41 και 60, Βαθμός = "C"
- Εάν μεταξύ 61 και 80, Βαθμός = "Β"
- Εάν είναι μεταξύ 81 και 100, Βαθμός = "Α"
- αλλιώς #ΑΞΙΑ! λάθος.
Θα χρησιμοποιήσουμε το Select Case ως Switch statement του VBA εδώ. Ο κωδικός για την προσαρμοσμένη συνάρτηση θα είναι:
Λειτουργία GRADES (num As Double) Επιλέξτε Case num Case Is <41 GRADES = "F" Case 41 To 60 GRADES = "C" Case 61 To 80 GRADES = "B" Case 81 To 100 GRADES = "A" Case Else GRADES = "#ΑΞΙΑ!" Τέλος Επιλέξτε Λειτουργία τερματισμού
Τώρα αν χρησιμοποιήσετε αυτήν τη συνάρτηση στο φύλλο, θα επιστρέψει εύκολα τους βαθμούς.
Λοιπόν, ναι, έτσι χρησιμοποιείται η εντολή Select Case (switch) στο Excel VBA για τον έλεγχο πολλαπλών συνθηκών. Αντί για πολλαπλή δήλωση If Else If χρησιμοποιούμε τη δήλωση Select Case για εναλλαγή αποτελεσμάτων. Εάν έχετε αμφιβολίες σχετικά με αυτό το άρθρο ή άλλα άρθρα που σχετίζονται με το Excel/VBA, ρωτήστε το παρακάτω τμήμα σχολίων.
Κατεβάστε το αρχείο εργασίας παρακάτω:
Χρήση Loop στο VBA στο Microsoft Excel | Οι βρόχοι στο VBA μας επιτρέπουν να κάνουμε μια παρόμοια εργασία ξανά και ξανά χωρίς επανάληψη κώδικα. Υπάρχουν 3 τύποι βρόχων στο Excel VBA.
7 Παραδείγματα For Loops στο Microsoft Excel VBA | Τα 7 παραδείγματα του βρόχου for μπορούν να κάνουν τη ζωή του αυτοματισμού εύκολη. Ας ξεκινήσουμε με το απλό για βρόχο.
Δημοφιλή άρθρα:
50 συντομεύσεις Excel για να αυξήσετε την παραγωγικότητά σας | Γίνετε πιο γρήγοροι στην εργασία σας. Αυτές οι 50 συντομεύσεις θα σας κάνουν να εργάζεστε ακόμη πιο γρήγορα στο Excel.
Η συνάρτηση VLOOKUP στο Excel | Αυτή είναι μια από τις πιο δημοφιλείς και δημοφιλείς λειτουργίες του excel που χρησιμοποιείται για την αναζήτηση τιμών από διαφορετικά εύρη και φύλλα.
COUNTIF στο Excel 2016 | Μετρήστε τιμές με συνθήκες χρησιμοποιώντας αυτήν την εκπληκτική συνάρτηση. Δεν χρειάζεται να φιλτράρετε τα δεδομένα σας για να μετρήσετε συγκεκριμένη τιμή. Η λειτουργία Countif είναι απαραίτητη για την προετοιμασία του ταμπλό σας.
Πώς να χρησιμοποιήσετε τη συνάρτηση SUMIF στο Excel | Αυτή είναι μια άλλη βασική λειτουργία του ταμπλό. Αυτό σας βοηθά να συνοψίσετε τιμές υπό συγκεκριμένες συνθήκες.