العبارات الشرطية الأكثر أهمية المستخدمة في Excel VBA هي البيانات اذا ثم и حدد الحالة. يختبر كلا التعبيرين شرطًا واحدًا أو أكثر ، وبناءً على النتيجة ، يتم تنفيذ إجراءات مختلفة. سنتحدث عن هذين العاملين الشرطين بمزيد من التفصيل بعد ذلك.
عبارة "If… Then" في Visual Basic
المُشغل اذا ثم يتحقق الشرط ، وإذا كان صحيحًا (TRUE) ، فسيتم تنفيذ مجموعة الإجراءات المحددة. يمكنه أيضًا تحديد مجموعة من الإجراءات التي يجب تنفيذها إذا كان الشرط خطأ.
صيغة المشغل اذا ثم مثله:
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' ейкшсный. окрашивается в красный цвет End If
لاحظ أنه بمجرد أن يصبح الشرط صحيحًا ، يتم إلغاء تنفيذ العبارة الشرطية. لذلك ، إذا كانت قيمة المتغير خلية نشطة أقل من 5 ، يصبح الشرط الأول صحيحًا ويتم تلوين الخلية باللون الأخضر. بعد ذلك ، يتم تنفيذ البيان اذا ثم تمت مقاطعته ولا يتم فحص الشروط الأخرى.
تعرف على المزيد حول استخدام عامل التشغيل الشرطي في VBA اذا ثم يمكن العثور عليها على شبكة مطوري Microsoft.
بيان "تحديد الحالة" في Visual Basic
المُشغل حدد الحالة على غرار المشغل اذا ثم من حيث أنه يتحقق أيضًا من صحة الشرط ، وبناءً على النتيجة ، يختار أحد الخيارات.
صيغة المشغل حدد الحالة مثله:
Select Case Выражение
Case Значение1
Действия в случае, если результат Выражения соответствует Значению1
Case Значение2
Действия в случае, если результат Выражения соответствует Значению2
Case Else
Действия в случае, если результат Выражения не соответствует ни одному из перечисленных вариантов Значения
End Select
العنصر حالة أخرى ليس مطلوبًا ، ولكنه موصى به للتعامل مع القيم غير المتوقعة.
في المثال التالي ، باستخدام البناء حدد الحالة يغير لون تعبئة الخلية الحالية اعتمادًا على القيمة الموجودة فيها:
حدد حالة ActiveCell.Value Case <= 5 ActiveCell.Interior.Color = 65280 'Ячейка окрашивается в зелёный цвет Case 6، 7، 8، 9 ActiveCell.Interior.Color = 49407' Ячейка окрсно. اللون = 10 'Ячейка окрашивается в жёлтый цвет Case 65535 To 11 ActiveCell.Interior.Color = 20' ейка окрашивается в лиловый цвет Case Else.Centolor
يوضح المثال أعلاه كيف يمكنك تعيين قيمة لعنصر بطرق مختلفة. الإطار في البناء حدد الحالة. هذه هي الطرق:
| الحالة هي <= 5 | وهكذا ، باستخدام الكلمة الحالة هي يمكنك التحقق مما إذا كانت القيمة مرضية التعبيرات حالة النموذج <= 5. |
| الإطار 6 ، 7 ، 8 ، 9 | بهذه الطريقة يمكنك التحقق مما إذا كانت القيمة متطابقة التعبيرات بإحدى القيم المدرجة. القيم المدرجة مفصولة بفواصل. |
| الإطار 10 | هذا يتحقق إذا كانت القيمة متطابقة التعبيرات بقيمة معينة. |
| الإطار 11 هذا هو 20 | وبالتالي ، يمكنك كتابة تعبير للتحقق مما إذا كانت القيمة مرضية التعبيرات حالة النموذج من 11 ل20 (ما يعادل عدم المساواة "11 <= القيمة <= 20"). |
| حالة أخرى | مثل هذا ، باستخدام الكلمة آخر، تتم الإشارة إلى الإجراءات للحالة إذا كانت القيمة التعبيرات لا يتطابق مع أي من الخيارات المدرجة الإطار. |
بمجرد العثور على أحد الشروط ، يتم تنفيذ الإجراءات المقابلة ويخرج الهيكل. حدد الحالة. أي ، على أي حال ، سيتم تنفيذ فرع واحد فقط من الفروع المدرجة. الإطار.
مزيد من المعلومات حول تشغيل بيان VBA حدد الحالة يمكن العثور عليها على شبكة مطوري Microsoft.