Excel VBA ΚΑΙ Λειτουργία
AND είναι μια λογική συνάρτηση καθώς και ένας λογικός τελεστής που σημαίνει ότι εάν πληρούνται όλες οι προϋποθέσεις που παρέχονται σε αυτήν τη συνάρτηση, τότε μόνο θα έχουμε το πραγματικό αποτέλεσμα, ενώ εάν κάποια από τις συνθήκες αποτύχει, η έξοδος επιστρέφεται ως ψευδής, έχουμε ενσωματωμένη εντολή AND στο VBA για χρήση.
Ελπίζω να έχετε διαβάσει το άρθρο μας σχετικά με το "VBA OR" και το "VBA IF OR." Αυτή η συνάρτηση είναι ακριβώς το αντίθετο της συνάρτησης OR. Στη συνάρτηση OR, χρειαζόμαστε οποιονδήποτε από τους παρεχόμενους λογικούς όρους για να είμαστε ικανοποιημένοι για να πάρουμε το αποτέλεσμα ως ΑΛΗΘΕ. Αλλά στη συνάρτηση AND, είναι ακριβώς το αντίθετο. Για να λάβετε το αποτέλεσμα ΑΛΗΘΕΙΑ, πρέπει να ικανοποιήσετε όλες τις παρεχόμενες λογικές δοκιμές στο excel.
Εντάξει, δείτε τη σύνταξη της συνάρτησης AND στο excel.
(Λογική δοκιμή) ΚΑΙ (Λογική δοκιμή) ΚΑΙ (Λογική δοκιμή)

Στα παραπάνω, έχω δύο σκορ από 600.
Στη στήλη αποτελεσμάτων, πρέπει να λάβω το αποτέλεσμα ως Αληθινό εάν η βαθμολογία και των δύο δοκιμών είναι μεγαλύτερη από ίση με 250.
Κοιτάξτε την παρακάτω εικόνα.

Όταν εφαρμόζουμε τη λογική συνάρτηση ΚΑΙ έχουμε τα αποτελέσματα. Στο κελί C4 & C5, έχουμε το αποτέλεσμα ως Αληθινό επειδή οι βαθμολογίες Test 1 & Test 2 είναι μεγαλύτερες ή ίσες με 250.
Κοιτάξτε το κελί C6 εδώ. Έχουμε FALSE παρόλο που το σκορ του τεστ 2 είναι ίσο με 250. Αυτό συμβαίνει επειδή, στο τεστ 1, το σκορ είναι μόνο 179.
Παραδείγματα χρήσης του VBA και της λειτουργίας
Παράδειγμα # 1
Για παράδειγμα, θα δοκιμάσουμε τους αριθμούς εδώ, αν 25> = 20 και 30 <= 31.
Βήμα 1: Δηλώστε τη μεταβλητή ως συμβολοσειρά.
Κώδικας:
Υπο AND_Example1 () Dim K As String End Sub

Βήμα 2: Για τη μεταβλητή "k", θα αντιστοιχίσουμε την τιμή εφαρμόζοντας τη συνάρτηση AND.
Κώδικας:
Υπο AND_Example1 () Dim K As String K = End Sub

Βήμα 3: Παρέχετε την πρώτη συνθήκη ως 25> = 20.
Κώδικας:
Υπο AND_Example1 () Dim K As String K = 25> = 20 End Sub

Βήμα 4: Τώρα ανοίξτε τη λειτουργία AND και προμηθεύστε τη δεύτερη λογική δοκιμή, δηλαδή, 30 <= 29.
Κώδικας:
Υπο AND_Example1 () Dim K As String K = 25> = 20 και 30 <= 29 End Sub

Βήμα 5: Τώρα δείξτε το αποτέλεσμα της μεταβλητής "k" στο πλαίσιο μηνυμάτων στο VBA.
Κώδικας:
Υπο AND_Example1 () Dim K As String K = 25> = 20 And 30 <= 29 MsgBox K End Sub

Εκτελέστε τη μακροεντολή για να δείτε ποιο είναι το αποτέλεσμα.

Πήραμε το αποτέλεσμα ως FALSE επειδή δεν εφαρμόσαμε δύο συνθήκες, την πρώτη συνθήκη 25> = 20, αυτή η συνθήκη ικανοποιείται, οπότε το αποτέλεσμα είναι ΑΛΗΘΕΙ και η δεύτερη συνθήκη 30 <= 29 αυτό δεν είναι ικανοποιημένο αποτέλεσμα είναι FALSE. Προκειμένου να επιτευχθεί το αποτέλεσμα ως Αληθινό, πρέπει να πληρούνται και οι δύο προϋποθέσεις.
Παράδειγμα # 2
Τώρα θα αλλάξω τη λογική δοκιμή σε "100> 95 ΚΑΙ 100 <200".
Κώδικας:
Υπο AND_Example2 () Dim k As String k = 100> 95 και 100 <200 MsgBox k End Sub
Εκτελέστε τον κωδικό για να δείτε το αποτέλεσμα.

Εδώ έχουμε ΑΛΗΘΕΙΑ ως αποτέλεσμα γιατί
1 st Λογική Test: 100> 95 = ΑΛΗΘΕΣ
2 nd Λογική Test: 100 <200 = ΑΛΗΘΕΣ
Δεδομένου ότι έχουμε τα Αληθινά αποτελέσματα και για τις δύο λογικές δοκιμές, το τελικό μας αποτέλεσμα ως ΑΛΗΘΕ.
Παράδειγμα # 3
Τώρα θα δούμε δεδομένα από το φύλλο εργασίας. Χρησιμοποιήστε τα δεδομένα που έχουμε χρησιμοποιήσει για να δείξετε το παράδειγμα της λειτουργίας excel AND.

Εδώ η συνθήκη είναι Test 1 Score> = 250 AND Test 2 Score> = 250 .
Δεδομένου ότι έχουμε περισσότερα από ένα κελιά δεδομένων, πρέπει να χρησιμοποιήσουμε βρόχους για να αποφύγουμε τη σύνταξη περιττών και χρονοβόρων γραμμών κωδικών. Έχω γράψει τον παρακάτω κώδικα για εσάς. ο τύπος και η λογική είναι το ίδιο μόνο πράγμα που έχω χρησιμοποιήσει το "VBA For Next Loop".
Κώδικας:
Υπο AND_Example3 () Dim k As Integer For k = 2 to 6 Cells (k, 3). Value = Cells (k, 1)> = 250 And Cells (k, 2)> = 250 Next k End Sub
Αυτό θα δώσει το αποτέλεσμα ακριβώς το ίδιο με τη λειτουργία του φύλλου εργασίας μας, αλλά δεν θα λάβουμε τύπους. Λαμβάνουμε μόνο αποτελέσματα.

Με αυτόν τον τρόπο, μπορούμε να εφαρμόσουμε τη λογική συνάρτηση AND για να δοκιμάσουμε πολλές συνθήκες, οι οποίες όλες πρέπει να είναι ΑΛΗΘΕΣ για να φτάσουν στα επιθυμητά αποτελέσματα.
Αυτό λειτουργεί εντελώς αντίθετο από τη συνάρτηση OR, όπου το OR απαιτεί οποιαδήποτε από τις παρεχόμενες συνθήκες να είναι ΑΛΗΘΕΣ για να φτάσει τα αποτελέσματα, αλλά ΚΑΙ απαιτεί 100% αποτέλεσμα σε μια λογική δοκιμή για να φτάσει τα αποτελέσματα.