Οι πιο σημαντικές δηλώσεις συνθήκης που χρησιμοποιούνται στο Excel VBA είναι οι δηλώσεις Αν τότε и Επιλέξτε Περίπτωση. Και οι δύο αυτές εκφράσεις δοκιμάζουν μία ή περισσότερες συνθήκες και, ανάλογα με το αποτέλεσμα, εκτελούν διαφορετικές ενέργειες. Θα μιλήσουμε για αυτούς τους δύο τελεστές υπό όρους με περισσότερες λεπτομέρειες στη συνέχεια.
Δήλωση "Αν… Τότε" στη Visual Basic
Χειριστής Αν τότε ελέγχει τη συνθήκη και, εάν είναι αληθής (TRUE), τότε εκτελείται το καθορισμένο σύνολο ενεργειών. Μπορεί επίσης να ορίσει ένα σύνολο ενεργειών που θα εκτελεστούν εάν η συνθήκη είναι FALSE.
Σύνταξη χειριστή Αν τότε σαν αυτό:
If Условие1 Then
Действия в случае, если выполняется Условие1
ElseIf Условие2 Then
Действия в случае, если выполняется Условие2
Else
Действия в случае, если не выполнено ни одно из Условий
End If
Σε αυτή την έκφραση, τα στοιχεία Άλλο и αλλιώς ο χειριστής συνθηκών μπορεί να παραλειφθεί εάν δεν είναι απαραίτητοι.
Παρακάτω είναι ένα παράδειγμα στο οποίο, χρησιμοποιώντας τον τελεστή Αν τότε Το χρώμα πλήρωσης του ενεργού κελιού αλλάζει ανάλογα με την τιμή σε αυτό:
Αν ActiveCell.Value < 5 Τότε ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный лак ElseIf ActiveCell.Value < 10 Τότε ActiveCell.Interior.Color = 49407 'ЯшиойжетьейсейтейныйCell = 255 'ЯщиойжетьейтейныйCell. окрашивается в красный цвет Τέλος Αν
Σημειώστε ότι μόλις η συνθήκη γίνει αληθής, η εκτέλεση της δήλωσης υπό όρους ματαιώνεται. Επομένως, εάν η τιμή της μεταβλητής ActiveCell λιγότερο από 5, τότε η πρώτη συνθήκη γίνεται αληθής και το κελί χρωματίζεται πράσινο. Μετά από αυτό, η εκτέλεση της δήλωσης Αν τότε διακόπτεται και οι υπόλοιπες συνθήκες δεν ελέγχονται.
Μάθετε περισσότερα σχετικά με τη χρήση του τελεστή υπό όρους στο VBA Αν τότε μπορείτε να βρείτε στο Δίκτυο προγραμματιστών της Microsoft.
Δήλωση "Select Case" στη Visual Basic
Χειριστής Επιλέξτε Περίπτωση παρόμοιο με τον χειριστή Αν τότε στο ότι ελέγχει επίσης την αλήθεια της συνθήκης και, ανάλογα με το αποτέλεσμα, επιλέγει μία από τις επιλογές.
Σύνταξη χειριστή Επιλέξτε Περίπτωση σαν αυτό:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
...
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
Στοιχείο Υπόθεση άλλο δεν απαιτείται, αλλά συνιστάται για χειρισμό μη αναμενόμενων τιμών.
Στο παρακάτω παράδειγμα, χρησιμοποιώντας την κατασκευή Επιλέξτε Περίπτωση αλλάζει το χρώμα πλήρωσης του τρέχοντος κελιού ανάλογα με την τιμή σε αυτό:
Επιλογή Case ActiveCell.Value Case Is <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается во зелёный Case 6, 7, 8, 9 ActiveCell.Interior.Color = 49407 'Ячейка окрашивается во зелёный Case 10, 65535, 11, 20 ActiveCell.Interior.Color = 10498160 'Ячейжеельные. Χρώμα = 255 'Καλώς οριζόντια στο χρώμα θήκη XNUMX Έως XNUMX ActiveCell.Interior.Color = XNUMX 'Επιλέξτε το χρώμα του χρώματος Case Else ActiveCell.Interior.Color =
Το παραπάνω παράδειγμα δείχνει πώς μπορείτε να ορίσετε μια τιμή για ένα στοιχείο με διάφορους τρόπους. Περίπτωση υπό κατασκευή Επιλέξτε Περίπτωση. Αυτοί είναι οι τρόποι:
| Υπόθεση είναι <= 5 | Έτσι, χρησιμοποιώντας τη λέξη-κλειδί Υπόθεση είναι μπορείτε να ελέγξετε αν η τιμή ικανοποιεί Εκφράσεις κατάσταση της φόρμας <= 5. |
| Περίπτωση 6, 7, 8, 9 | Με αυτόν τον τρόπο μπορείτε να ελέγξετε εάν η τιμή ταιριάζει Εκφράσεις με μία από τις αναφερόμενες τιμές. Οι τιμές που αναφέρονται διαχωρίζονται με κόμμα. |
| Περίπτωση 10 | Αυτό ελέγχει εάν η τιμή ταιριάζει Εκφράσεις με δεδομένη τιμή. |
| Περίπτωση 11 Αυτό είναι 20 | Έτσι, μπορείτε να γράψετε μια έκφραση για να ελέγξετε εάν η τιμή ικανοποιεί Εκφράσεις κατάσταση της φόρμας από 11 να 20 (ισοδυναμεί με την ανισότητα "11<=τιμή<=20"). |
| Υπόθεση άλλο | Όπως αυτό, χρησιμοποιώντας τη λέξη-κλειδί αλλιώς, οι ενέργειες υποδεικνύονται για την περίπτωση εάν η τιμή Εκφράσεις δεν ταιριάζει με καμία από τις επιλογές που αναφέρονται Περίπτωση. |
Μόλις βρεθεί μία από τις συνθήκες, εκτελούνται οι αντίστοιχες ενέργειες και η δομή εξέρχεται. Επιλέξτε Περίπτωση. Δηλαδή, σε κάθε περίπτωση, θα εκτελεστεί μόνο ένας από τους αναγραφόμενους κλάδους. Περίπτωση.
Περισσότερες πληροφορίες σχετικά με τη λειτουργία της δήλωσης VBA Επιλέξτε Περίπτωση μπορείτε να βρείτε στο Δίκτυο προγραμματιστών της Microsoft.