VBA'daki koşul ifadeleri

Excel VBA'da kullanılan en önemli koşul deyimleri deyimlerdir. Eğer… O zaman и Vaka Seç. Bu ifadelerin her ikisi de bir veya daha fazla koşulu test eder ve sonuca bağlı olarak farklı eylemler gerçekleştirir. Bu iki koşullu operatör hakkında daha sonra daha ayrıntılı olarak konuşacağız.

Visual Basic'te “If…Then” İfadesi

Kullanım Eğer… O zaman koşulu kontrol eder ve doğruysa (DOĞRU), belirtilen eylem kümesi gerçekleştirilir. Koşul YANLIŞ ise gerçekleştirilecek bir dizi eylemi de tanımlayabilir.

Operatör sözdizimi Eğer… O zaman bunun gibi:

If Условие1 Then

   Действия в случае, если выполняется Условие1

ElseIf Условие2 Then

   Действия в случае, если выполняется Условие2

Else

   Действия в случае, если не выполнено ни одно из Условий

End If

Bu ifadede, elementler Başka и başka koşullar operatörü, gerekmedikçe atlanabilir.

Aşağıda, operatörün kullanıldığı bir örnek verilmiştir. Eğer… O zaman Aktif hücrenin dolgu rengi, içindeki değere göre değişir:

If ActiveCell.Value < 5 Then ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет ElseIf ActiveCell.Value < 10 Then ActiveCell.Interior.Color = 49407 'Ячейка окрашивается в оранжевый цвет Else ActiveCell.Interior.Color = 255 'Ячейка окрашивается в красный цвет End If

Koşul doğru olur olmaz koşullu ifadenin yürütülmesinin iptal edildiğini unutmayın. Bu nedenle, eğer değişkenin değeri Aktif hücre 5'ten küçükse, ilk koşul gerçekleşir ve hücre yeşil renkte olur. Bundan sonra, ifadenin yürütülmesi Eğer… O zaman kesintiye uğrar ve diğer koşullar kontrol edilmez.

VBA'da koşullu operatörü kullanma hakkında daha fazla bilgi edinin Eğer… O zaman Microsoft Developer Network'te bulunabilir.

Visual Basic'te "Vaka Seç" İfadesi

Kullanım Vaka Seç operatöre benzer Eğer… O zaman ayrıca koşulun doğruluğunu da kontrol eder ve sonuca bağlı olarak seçeneklerden birini seçer.

Operatör sözdizimi Vaka Seç bunun gibi:

Select Case Выражение

Case Значение1

   Действия в случае, если результат Выражения соответствует Значению1

Case Значение2

   Действия в случае, если результат Выражения соответствует Значению2

...

Case Else

   Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения

End Select

Eleman Else Kılıf gerekli değildir, ancak beklenmeyen değerlerin ele alınması için önerilir.

Aşağıdaki örnekte, yapı kullanılarak Vaka Seç içindeki değere bağlı olarak mevcut hücrenin dolgu rengini değiştirir:

SELECT ActiveCell.Value Case IS <= 5 ActivECell.Inter.color = 65280 'чейка оный цвет vaka 6, 7, 8 ActivEcell.insior.color = 9' чей ор Вinter case iri 'чей ор Вinter iri. Color = 49407 'чейаа о ц цвется В ч цвет vaka 10 ila 65535 ActivECell.interior.color = 11' чейа ореыйыйый activter.col лinter лinter ~ лл лinter лinter лinter лinter лinter лinter ~ лл, ле лter.cers `л лл лinter лinter лinter лinter лinter л xл ле ле ле л xо ле activ x case ле activ x eyalet.

Yukarıdaki örnek, bir öğe için çeşitli şekillerde nasıl değer ayarlayabileceğinizi gösterir. dava yapım aşamasında Vaka Seç. Bu yollar:

Vaka <= 5Böylece anahtar kelimeyi kullanarak Vaka değerin karşılanıp karşılanmadığını kontrol edebilirsiniz İfadeler formun durumu <= 5.
dava 6, 7, 8, 9Bu şekilde değerin eşleşip eşleşmediğini kontrol edebilirsiniz. İfadeler Listelenen değerlerden biri ile. Listelenen değerler virgülle ayrılır.
dava 10Bu, değerin eşleşip eşleşmediğini kontrol eder İfadeler verilen bir değerle.
dava 11 İşte bu 20Böylece, değerin karşılanıp karşılanmadığını kontrol etmek için bir ifade yazabilirsiniz. İfadeler formun durumu 11 gelen 20 için ("11<=değer<=20" eşitsizliğine eşdeğerdir).
Else KılıfBunun gibi, anahtar kelimeyi kullanarak başka, eğer değer ise durum için eylemler belirtilir. İfadeler listelenen seçeneklerden hiçbiriyle eşleşmiyor dava.

Koşullardan biri bulunur bulunmaz ilgili eylemler gerçekleştirilir ve yapıdan çıkar. Vaka Seç. Yani, her durumda, listelenen dallardan yalnızca biri yürütülecektir. dava.

VBA deyiminin çalışması hakkında daha fazla bilgi Vaka Seç Microsoft Developer Network'te bulunabilir.

Yorum bırak