Χειριστές σε Excel VBA

Στο παραπάνω παράδειγμα, ελέγχουμε αν η τιμή a είναι μικρότερη από b. Δεδομένου ότι αυτό είναι True, η εντολή if εκτελείται και η Else όχι.

Μπορείτε να το ελέγξετε απλά χρησιμοποιώντας τη δήλωση.

a = 3 b = 4 εντοπισμός σφαλμάτων. εκτύπωση α<>

Αυτό θα εκτυπώσει True στο αμέσως παράθυρο.

(<=) Λιγότερο από ή ίσο με:Αυτό χρησιμοποιείται για να ελέγξει εάν η αριστερή τιμή είναι μικρότερη ή ίση με τη σωστή τιμή ή όχι.

Sub Test () a = 4 b = 4 Εάν a <= b τότε 'Θα επιστρέψει True MsgBox "Το a είναι μικρότερο ή ίσο με b." «αυτό θα εκτελεστεί. Άλλο MsgBox "Το a δεν είναι ίσο ή μικρότερο από το b." «Αυτό δεν θα εκτελεστεί. Τερματισμός IF End Sub

Στο παραπάνω παράδειγμα, ελέγχουμε αν η τιμή a είναι μικρότερη από b. Δεδομένου ότι αυτό είναι αληθές, η εντολή If εκτελείται και η άλλη όχι.

Μπορείτε να το ελέγξετε απλά χρησιμοποιώντας τη δήλωση.

a = 4 b = 4 εντοπισμός σφαλμάτων. εκτύπωση a <-b

Αυτό θα εκτυπώσει True στο αμέσως παράθυρο.

(>) Μεγαλύτερο από:Αυτό χρησιμοποιείται για να ελέγξει εάν η αριστερή τιμή είναι μεγαλύτερη από τη σωστή τιμή ή όχι.

Sub Test () a = 3 b = 4 Εάν a> b τότε 'Θα επιστρέψει False MsgBox "Το a είναι μεγαλύτερο από το b." «Αυτό δεν θα εκτελεστεί. Άλλο MsgBox "Το a δεν είναι μεγαλύτερο από το b." «Αυτό θα εκτελεστεί. Τερματισμός IF End Sub

Στο παραπάνω παράδειγμα, ελέγχουμε αν η τιμή του a είναι μεγαλύτερη από το b. Δεδομένου ότι αυτό είναι False, η εντολή if δεν θα εκτελεστεί και το άλλο κάνει.

Μπορείτε να το ελέγξετε απλά χρησιμοποιώντας τη δήλωση.

a = 3 b = 4 debug.print a> b

Αυτό θα εκτυπώσει False στο άμεσο παράθυρο.

(> =) Μεγαλύτερο από:Αυτό χρησιμοποιείται για να ελέγξει εάν η αριστερή τιμή είναι μεγαλύτερη ή ίση με τη σωστή τιμή ή όχι.

Sub Test () a = 3 b = 4 Εάν a> = b τότε 'Θα επιστρέψει False MsgBox "Το a είναι μεγαλύτερο από ή ίσο με b." «Αυτό δεν θα εκτελεστεί. Άλλο MsgBox "Το a δεν είναι μεγαλύτερο ή ίσο με το b." «Αυτό θα εκτελεστεί. Τέλος εαν

Στο παραπάνω παράδειγμα, ελέγχουμε αν η τιμή a είναι μεγαλύτερη ή ίση με b. Δεδομένου ότι αυτό είναι False, η εντολή if δεν θα εκτελεστεί και το άλλο κάνει.

Μπορείτε να το ελέγξετε απλά χρησιμοποιώντας τη δήλωση.

a = 3 b = 4 debug.print a> = b

Αυτό θα εκτυπώσει False στο άμεσο παράθυρο.

() Οχι ίσο με:Αυτό χρησιμοποιείται για να ελέγξει εάν η αριστερή τιμή δεν είναι ίση με τη σωστή τιμή.

Sub Test () a = 3 b = 4 Εάν ab τότε 'Θα επιστρέψει True MsgBox "Το a δεν είναι ίσο με b,"' Αυτό θα εκτελεστεί. Άλλο MsgBox "Τα α και β είναι ίσα." «Αυτό δεν θα εκτελεστεί. Τερματισμός IF End Sub

Στο παραπάνω παράδειγμα, ελέγχουμε αν η τιμή a είναι όχι ίσο με σι. Δεδομένου ότι αυτό είναι αληθές, η δήλωση If θα εκτελεστεί και η άλλη δεν θα εκτελεστεί.

Μπορείτε να το ελέγξετε απλά χρησιμοποιώντας τη δήλωση.

a = 3 b = 4 debug.print ab

Αυτό θα εκτυπώσει True στο αμέσως παράθυρο.

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

4. Λογικοί χειριστές

Οι λογικοί τελεστές χρησιμοποιούνται για την πραγματοποίηση λογικών πράξεων σε μία ή περισσότερες μεταβλητές. Το αποτέλεσμα τέτοιων πράξεων καταλήγει πάντα σε ΑΛΗΘΙΝΟ ή ΛΑΘΟΣ. Οι λογικοί τελεστές συχνά (όχι πάντα) χρησιμοποιούνται για τον έλεγχο περισσότερων από μία συνθηκών.

Παρακάτω είναι οι λογικοί τελεστές που χρησιμοποιούμε στο VBA:

VBA AND Operator (Και ή *): Ο τελεστής VBA AND χρησιμοποιείται για να διασφαλίσει ότι οι συνθήκες στα αριστερά και τα δεξιά του είναι αληθινές. Εάν κάποια από τις συνθήκες είναι False τότε ολόκληρη η πρόταση θα οδηγήσει σε False. Χρησιμοποιούμε τη λέξη -κλειδί And ή το σύμβολο * (αστερίσκος) για πράξεις AND.

Ελέγξτε την παρακάτω δήλωση:

Sub Test () a = 10 b = 20 Αν α <15 Και β <15 Τότε MsgBox "a και b και οι δύο είναι μικρότερες από 15." «Αυτό δεν εκτελείται. Άλλο MsgBox "a το a ή b είναι μεγαλύτερο ή ίσο με 15." «Αυτό εκτελείται. Τέλος Αν Τέλος Υπο 

Όταν εκτελούμε το παραπάνω απόσπασμα, το δεύτερο if δεν εκτελείται. Επειδή η πρώτη πρόταση στα αριστερά είναι αληθινή, αλλά η δήλωση στα δεξιά είναι Λάθος. Επομένως, ολόκληρη η δήλωση επιστρέφει False.

Στις περισσότερες γλώσσες, το σύμβολο & χρησιμοποιείται ως τελεστής AND, αλλά όχι στο VBA. Στο VBA μπορείτε να χρησιμοποιήσετε τον τελεστή πολλαπλασιασμού * (αστερίσκο) ως τελεστή AND για να διασφαλίσετε ότι και οι δύο συνθήκες είναι αληθείς.

Στο παραπάνω παράδειγμα, μπορείτε να χρησιμοποιήσετε την παρακάτω δήλωση if για να κάνετε το ίδιο.

Αν (a <15) * (b <15) Τότε

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

Q1: Ποια θα είναι η έξοδος της παρακάτω δήλωσης; Ενημερώστε με στην παρακάτω ενότητα σχολίων:

debug.print a10 AND a = (b/2) AND a<>

Όταν η τιμή a είναι 15 και b είναι 30. Σημειώστε την παρακάτω ενότητα σχολίων.

VBA Operat χειριστής (or ή +): Ο τελεστής OR χρησιμοποιείται όταν θέλουμε να διασφαλίσουμε ότι είτε η συνθήκη αριστερά είναι TRUE είτε η συνθήκη Right είναι TRUE. Εάν οποιαδήποτε από τις δύο συνθήκες είναι αληθής, τότε το αποτέλεσμα θα είναι αληθινό. Χρησιμοποιούμε τη λέξη -κλειδί OR μεταξύ δύο boolean εντολών. Μπορείτε επίσης να χρησιμοποιήσετε το σύμβολο + (συν) για τη λειτουργία OR. Απλώς βεβαιωθείτε ότι χρησιμοποιείτε σωστά την παρένθεση για να κάνετε σαφείς τις δηλώσεις ενώ χρησιμοποιείτε το σύμβολο +.

Εξετάστε τον παρακάτω κώδικα:

Sub Test () a = 10 b = 20 Αν α <15 b β <15 Τότε MsgBox "a το a ή το b είναι μικρότερο από 15." «Αυτό εκτελείται. Άλλο MsgBox "Ούτε το a ούτε το b είναι μικρότερο από 15." «Αυτό δεν εκτελείται. Τέλος Αν Τέλος Υπο

Όταν εκτελούμε τον παραπάνω κώδικα, εμφανίζεται το πρώτο μήνυμα και παραλείπεται το δεύτερο μήνυμα. Επειδή το a είναι μικρότερο από 15 και το b δεν είναι. Χρειάζεται μόνο μία προϋπόθεση για να είναι True με τον τελεστή OR για να λάβετε την έξοδο ως true.

Γράφετε τη δήλωση ως εξής:

Αν (a <15) + (b <15) Τότε

Ε2: Ποια θα είναι η έξοδος της παρακάτω δήλωσης; Ενημερώστε με στην παρακάτω ενότητα σχολίων:

debug.print a10 a a = (b/2) ή a<>

Όταν η τιμή a είναι 10 και b είναι 5. Γράψτε κάτω στην ενότητα σχολίων παρακάτω.

VBA NOT Operator (Όχι): Ο τελεστής Not χρησιμοποιείται για να αντιστρέψει την τελική τιμή. Με άλλα λόγια, η δήλωση με τελεστή Not επιστρέφει True μόνο εάν η δήλωση πριν είναι FalseΤο Για παράδειγμα, εάν χρησιμοποιείτε τη λέξη-κλειδί Όχι πριν από μια αληθινή δήλωση, θα οδηγήσει σε Λάθος και αντίστροφα. Στο VBA, χρησιμοποιούμε το Δεν λέξη -κλειδί για να ελέγξετε αν κάτι δεν είναι αυτό Σωστό ή Λάθος (;).

Υπό δοκιμή () a = 10 b = 10 Αν Όχι a = b Τότε MsgBox "α και β δεν είναι ίσα." Άλλο MsgBox "α και β είναι και τα δύο ίσα." 'Αυτό εκτελείται Αν τελειώσει υπο

Στον παραπάνω κώδικα, δήλωσηΌχι a = bθα επιστρέψει ψευδής. Αρχικά, το a = b είναι αληθές, αλλά όπως χρησιμοποιήσαμε Όχι πριν από αυτό, το αποτέλεσμα αντιστρέφεται και η πρόταση μετατρέπεται σε False. Στο παραπάνω παράδειγμα, χρησιμοποιήσαμε τις μοναδικές προτάσεις πριν από αυτό. Μπορείτε να έχετε όσες δηλώσεις θέλετε πριν από τον τελεστή Not. Απλώς κλείστε τα σε παρένθεση.

Ε3: Ποια θα είναι η έξοδος της παρακάτω δήλωσης; Ενημερώστε με στην παρακάτω ενότητα σχολίων:

debug.print a10 Not όχι (a = (b/2) * a<>

Όταν η τιμή a είναι 10 και b είναι 5. Γράψτε κάτω στην ενότητα σχολίων παρακάτω.

5. Τελεστές συνένωσης (& ή +)

Αυτοί οι τελεστές χρησιμοποιούνται για τη συνένωση συμβολοσειρών. Το σύμβολο & χρησιμοποιείται για τη συγκόλληση κειμένων. Συνιστάται ο τελεστής να συνδέει συμβολοσειρές. Ωστόσο, μπορείτε επίσης να χρησιμοποιήσετε το σύμβολο + για να συνδέσετε.

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

Δείτε τον παρακάτω κώδικα:

Sub test () a = "Exceltip" b = "is number" c = 1 d = 2 Debug.print a & b & c 'this will print "Exceltip is number 1" Debug.print a + b & c & d' αυτό θα εκτυπώσει "Το Exceltip είναι ο αριθμός 12 'Debug.print a + b + c' αυτό θα είναι ένα σφάλμα. Τέλος υπο

Στον παραπάνω κώδικα, οι δύο πρώτες γραμμές θα λειτουργήσουν τέλεια. Η τρίτη γραμμή θα αντιμετωπίσει σφάλμα επειδή προσπαθούμε να προσθέσουμε κείμενο με αριθμούς. Για να συνδέσουμε αριθμούς χρησιμοποιούμε πάντα το & (amp).

Πολυλειτουργικοί χειριστές σε VBA

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

Το σύμβολο + λειτουργεί ως τελεστής προσθήκης ενώ εργάζεστε με αριθμούς. Ενώ εργάζεστε με boolean τιμές, το σύμβολο συν λειτουργεί ως χειριστής Or στο VBA. Όταν χρησιμοποιείται με τιμές συμβολοσειράς, ο τελεστής συν λειτουργεί ως τελεστής συνένωσης. Ισχύουν οι παρακάτω γραμμές:

Debug. Εκτύπωση 10 + 20 'εκτυπώνει 30. + λειτουργεί ως τελεστής προσθήκης. Εκτυπώσεις Debug.Print (1020) True + λειτουργεί ως χειριστής Or. Debug.Εκτύπωση "10" + "20" 'Εκτυπώνει 1020. Το σύμβολο + λειτουργεί ως τελεστής συνένωσης. 

Το σύμβολο αστερίσκο (*) λειτουργεί ως τελεστής πολλαπλασιασμού όταν οι τελεστέοι είναι αριθμητικοί. Όταν οι τελεστέοι είναι boole, ο αστερίσκος λειτουργεί ως And Operator.

Οι παρακάτω γραμμές κώδικα λειτουργούν τέλεια.

Debug.Print 10 * 20 'εκτυπώνει 200. Το * λειτουργεί ως τελεστής πολλαπλασιασμού. Εκτυπώσεις Debug.Print (1020) False. Το σύμβολο + λειτουργεί ως And τελεστής. 

Λοιπόν, ναι, όλα αυτά αφορούν τους χειριστές του VBA. Ελπίζω να ήταν χρήσιμο. Εάν έχετε αμφιβολίες σχετικά με τους χειριστές του VBA, ρωτήστε στην παρακάτω ενότητα σχολίων.

Η δήλωση If ElseIf στο VBA | Στην αν δήλωση ElseIf, η επόμενη συνθήκη ελέγχεται μόνο όταν πέσει η προηγούμενη συνθήκη. Όταν αντιστοιχεί μια συνθήκη, ο κώδικας σε αυτό το μπλοκ εκτελείται και το στοιχείο ελέγχου εξέρχεται από το μπλοκ If.

Μεταβλητό πεδίο Excel VBA | Το VBA έχει επίσης προσδιοριστικά πεδίου. Αυτοί οι προσδιοριστές πεδίου μπορούν να χρησιμοποιηθούν για να ορίσουν την ορατότητα/το εύρος μιας μεταβλητής στο Excel VBA.

VBA Select Case Statement | Οι Επιλογές Επιλογής Περίπτωσης είναι χρήσιμες όταν έχετε πάρα πολλές συνθήκες για έλεγχο. Είναι εξαιρετικές αντικαταστάσεις πολλαπλών προτάσεων If ElseIf.

Χρήση Loop στο VBA στο Microsoft Excel | Οι βρόχοι στο VBA μας επιτρέπουν να κάνουμε μια παρόμοια εργασία ξανά και ξανά χωρίς επανάληψη κώδικα. Υπάρχουν 3 τύποι βρόχων στο Excel VBA.

ByRef και ByVal Arguments | Όταν ένα όρισμα μεταφέρεται ως όρισμα ByRef σε διαφορετική υπο -συνάρτηση, αποστέλλεται η αναφορά της πραγματικής μεταβλητής. Τυχόν αλλαγές που γίνονται στο αντίγραφο της μεταβλητής, θα αντικατοπτρίζονται στο αρχικό όρισμα.

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

Απενεργοποίηση προειδοποιητικών μηνυμάτων χρησιμοποιώντας το VBA στο Microsoft Excel 2016 | Αυτός ο κώδικας όχι μόνο απενεργοποιεί τις ειδοποιήσεις VBA αλλά αυξάνει επίσης την αποδοτικότητα χρόνου του κώδικα. Ας δούμε πώς.

Δημοφιλή άρθρα:

50 συντομεύσεις Excel για να αυξήσετε την παραγωγικότητά σας | Γίνετε πιο γρήγοροι στην εργασία σας. Αυτές οι 50 συντομεύσεις θα σας κάνουν να εργάζεστε ακόμη πιο γρήγορα στο Excel.

Η συνάρτηση VLOOKUP στο Excel | Αυτή είναι μια από τις πιο δημοφιλείς και δημοφιλείς λειτουργίες του excel που χρησιμοποιείται για την αναζήτηση τιμών από διαφορετικά εύρη και φύλλα.

COUNTIF στο Excel 2016 | Μετρήστε τιμές με συνθήκες χρησιμοποιώντας αυτήν την εκπληκτική συνάρτηση. Δεν χρειάζεται να φιλτράρετε τα δεδομένα σας για να μετρήσετε συγκεκριμένη τιμή. Η λειτουργία Countif είναι απαραίτητη για την προετοιμασία του ταμπλό σας.

Πώς να χρησιμοποιήσετε τη συνάρτηση SUMIF στο Excel | Αυτή είναι μια άλλη βασική λειτουργία του ταμπλό. Αυτό σας βοηθά να συνοψίσετε τιμές υπό συγκεκριμένες συνθήκες.