ΕΑΝ ΟΧΙ στο VBA
Οι λογικές συναρτήσεις είναι χρήσιμες για τους υπολογισμούς που απαιτούν πολλαπλούς όρους ή κριτήρια για έλεγχο. Στα προηγούμενα άρθρα μας, έχουμε δει τις συνθήκες "VBA IF", "VBA OR" και "VBA AND". Σε αυτό το άρθρο, θα συζητήσουμε τη συνάρτηση "VBA IF NOT". Πριν από την εισαγωγή της λειτουργίας VBA IF NOT, επιτρέψτε μου να σας δείξω πρώτα τη λειτουργία VBA NOT.
Τι ΔΕΝ Λειτουργεί στο VBA;
Το "NOT" είναι μία από τις λογικές λειτουργίες που έχουμε με το Excel & VBA. Όλες οι λογικές συναρτήσεις απαιτούν τη διεξαγωγή λογικών δοκιμών και επιστροφή ΑΛΗΘΕΙΑ εάν η λογική δοκιμή είναι σωστή. Εάν η λογική δοκιμή δεν είναι σωστή, τότε θα επιστρέψει FALSE ως αποτέλεσμα.
Αλλά το "VBA NOT" είναι εντελώς αντίθετο από την άλλη λογική συνάρτηση. Θα έλεγα ότι αυτή είναι η αντίστροφη συνάρτηση των λογικών συναρτήσεων.
Η συνάρτηση "VBA NOT" επιστρέφει "FALSE" εάν η λογική δοκιμή είναι σωστή και εάν η λογική δοκιμή δεν είναι σωστή, θα επιστρέψει "TRUE". Τώρα, κοιτάξτε τη σύνταξη της λειτουργίας "VBA NOT".
ΟΧΙ (Λογική δοκιμή)Αυτό είναι πολύ απλό, πρέπει να παρέχουμε τη λογική δοκιμή. Η συνάρτηση NOT αξιολογεί το τεστ και επιστρέφει το αποτέλεσμα.
Παραδείγματα λειτουργίας NOT & IF στο VBA;
Ακολουθούν τα παραδείγματα χρήσης της λειτουργίας IF και NOT στο excel VBA.
Παράδειγμα # 1
Ρίξτε μια ματιά στον παρακάτω κώδικα για ένα παράδειγμα.
Κώδικας:
Sub NOT_Example () Dim k As String k = Not (100 = 100) MsgBox k End Sub
Στον παραπάνω κώδικα, έχω δηλώσει τη μεταβλητή ως String.
Dim k As String
Στη συνέχεια, για αυτήν τη μεταβλητή, έχω εκχωρήσει τη συνάρτηση NOT με τη λογική δοκιμή ως 100 = 100.
k = Όχι (100 = 100)
Τότε έγραψα τον κωδικό για να δείξω το αποτέλεσμα στο πλαίσιο μηνυμάτων VBA. MsgBox k
Τώρα θα εκτελέσω τον κώδικα και θα δω το αποτέλεσμα.
Έχουμε το αποτέλεσμα ως "FALSE".
Τώρα κοιτάξτε πίσω τη λογική δοκιμή. Έχουμε παράσχει τη λογική δοκιμή ως 100 = 100, η οποία είναι γενικά ΑΛΗΘΗ δεδομένου ότι είχαμε δώσει τη συνάρτηση NOT, πήραμε το αποτέλεσμα ως FALSE. Όπως είπα, στην αρχή, δίνει αντίστροφα αποτελέσματα σε σύγκριση με άλλες λογικές συναρτήσεις. Εφόσον το 100 ισούται με 100, επέστρεψε το αποτέλεσμα ως ΛΑΘΟΣ.
Παράδειγμα # 2
Τώρα. Παρακολουθήστε ένα ακόμη παράδειγμα με διαφορετικούς αριθμούς.
Κώδικας:
Υπο NOT_Example () Dim k As String k = Not (85 = 148) MsgBox k End Sub
Ο κωδικός είναι το ίδιο μόνο πράγμα που άλλαξα εδώ είναι ότι άλλαξα τη λογική δοκιμή από 100 = 100 σε 85 = 148.
Τώρα θα τρέξω τον κώδικα και θα δω ποιο είναι το αποτέλεσμα.
Αυτή τη φορά έχουμε το αποτέλεσμα ως Αληθινό. Τώρα εξετάστε τη λογική δοκιμή.
k = Όχι (85 = 148)
Όλοι γνωρίζουμε ότι το 85 δεν είναι ίσο με τον αριθμό 148. Δεδομένου ότι δεν είναι ίσο, η συνάρτηση NOT επέστρεψε το αποτέλεσμα ως TRUE.
ΟΧΙ με συνθήκη IF:
Στο Excel ή στο VBA, οι λογικές συνθήκες δεν είναι πλήρεις χωρίς τη συνθήκη IF συνθήκης. Χρησιμοποιώντας IF σε κατάσταση excel, μπορούμε να κάνουμε πολλά περισσότερα πράγματα πέρα από την προεπιλεγμένη ΑΛΗΘΕΙΑ Για παράδειγμα, στα παραπάνω παραδείγματα, έχουμε τα προεπιλεγμένα αποτελέσματα του FALSE & TRUE; αντί για αυτό, μπορούμε να τροποποιήσουμε το αποτέλεσμα με τα δικά μας λόγια.
Κοιτάξτε τον παρακάτω κώδικα.
Κώδικας:
Sub NOT_Example2 () Dim Number1 As String Dim Number2 As String Number1 = 100 Number2 = 100 If Not (Number1 = Number2) Στη συνέχεια, το MsgBox "Number 1 δεν είναι ίσο με το Number 2" Else MsgBox "Ο αριθμός 1 είναι ίσος με τον αριθμό 2" End if Τέλος Υποτ
Έχω δηλώσει δύο μεταβλητές.
Dim Number1 ως String & Dim Number 2 ως συμβολοσειρά
Για αυτές τις δύο μεταβλητές, έχω αντιστοιχίσει τους αριθμούς ως 100 & 100, αντίστοιχα.
Number1 = 100 & Number2 = 100
Στη συνέχεια, για τη συνάρτηση NOT, έχω επισυνάψει την συνθήκη IF για να αλλάξω την προεπιλεγμένη TRUE ή FALSE. Εάν το αποτέλεσμα της συνάρτησης NOT είναι ΑΛΗΘΕΙ, τότε το αποτέλεσμα θα έχει ως εξής.
MsgBox "Ο αριθμός 1 δεν ισούται με τον αριθμό 2."
Εάν το αποτέλεσμα λειτουργίας NOT είναι ΛΑΘΟΣ, τότε το αποτέλεσμα μου έχει ως εξής
MsgBox "Ο αριθμός 1 είναι ίσος με τον αριθμό 2."
Τώρα θα τρέξω τον κώδικα και θα δω τι θα συμβεί.
Πήραμε το αποτέλεσμα ως "Ο αριθμός 1 είναι ίσος με τον αριθμό 2", οπότε η συνάρτηση NOT δεν επέστρεψε το αποτέλεσμα FALSE στην συνθήκη IF, οπότε η συνθήκη IF επέστρεψε αυτό το αποτέλεσμα
Έτσι, μπορούμε να χρησιμοποιήσουμε την συνθήκη IF για να κάνουμε την αντίστροφη δοκιμή.
