VBA ΚΑΙ Λειτουργία | Πώς να χρησιμοποιήσετε και λογικό χειριστή στο VBA;

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 παρόλο που η βαθμολογία του Test 2 είναι ίση με 250. Αυτό συμβαίνει επειδή στο Test 1 το σκορ είναι μόνο 179.

Παραδείγματα χρήσης του VBA και της λειτουργίας

Μπορείτε να κατεβάσετε αυτό το Πρότυπο VBA ΚΑΙ Excel εδώ - Πρότυπο VBA ΚΑΙ Excel

Παράδειγμα # 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 And 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 αυτό δεν είναι ικανοποιημένο αποτέλεσμα είναι ΛΑΘΟΣ. Για να λάβετε το αποτέλεσμα ως ΑΛΗΘΕΙΑ, πρέπει να πληρούνται και οι δύο προϋποθέσεις.

Παράδειγμα # 2

Τώρα θα αλλάξω τη λογική δοκιμή σε "100> 95 ΚΑΙ 100 <200"

Κώδικας:

 Υπο AND_Example2 () Dim k As String k = 100> 95 και 100 <200 MsgBox k End Sub 

Εκτελέστε τον κωδικό για να δείτε το αποτέλεσμα.

Εδώ έχουμε το ΑΛΗΘΕΜΑ ως αποτέλεσμα γιατί

1η Λογική Δοκιμή: 100> 95 = ΑΛΗΘΕΙΑ

2η λογική δοκιμή: 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% αποτέλεσμα σε μια λογική δοκιμή για να φτάσει τα αποτελέσματα.


$config[zx-auto] not found$config[zx-overlay] not found