جدول المحتويات
تُستخدم العبارات الشرطية لتنفيذ مجموعة من الإجراءات اعتمادًا على الشرط المحدد في لغات البرمجة. في هذه المقالة ، سوف نعرض لك ما هو If - Then - Else العبارة الشرطية في VBA Excel هو وكيفية استخدامه.
تنزيل المصنف
يمكنك تنزيل مصنف Excel التجريبي المجاني من هنا.
If-Then-Else in VBA.xlsm
مقدمة إلى عبارة If - Then - Else في VBA
VBA If - Then - Else يتم استخدام العبارة الشرطية بشكل أساسي لتحديد تدفق تنفيذ الظروف. إذا كان الشرط صحيحًا ، فسيتم تنفيذ مجموعة معينة من الإجراءات ، وإذا كان الشرط خاطئًا ، فسيتم تنفيذ مجموعة أخرى من الإجراءات.
4559
أو ،
7673
هنا ،
| الوسيطة | مطلوب / اختياري | الوصف |
|---|---|---|
| الشرط | مطلوب | تعبير رقمي أو تعبير سلسلة يقيم ما إذا كان التعبير هو صحيح أو خطأ . إذا كانت الحالة خالية ، فإنها تعتبر خطأ . |
| عبارة | اختيارية | نموذج من سطر واحد لا يحتوي على عبارة أخرى . يجب فصل جملة واحدة أو أكثر بنقطتين. إذا كان الشرط هو صحيح ، فسيتم تنفيذ هذه العبارة. |
| else_statements | اختيارية | عبارة واحدة أو أكثر هييتم إجراؤه إذا لم يكن هناك شرط سابق هو صحيح . |
4 أمثلة على استخدام VBA If - Then - Else Statement in Excel
في هذا القسم ، ستتعلم كيفية استخدام If-Then-Else في كود VBA مع 4 أمثلة.
1. ابحث عن أكبر رقم بين عددين باستخدام If - Then - Else Statement
إذا كان لديك رقمان وتريد معرفة أيهما أكبر (أو أصغر) ، فيمكنك استخدام عبارة If-Then-Else في VBA .
الخطوات:
- اضغط على Alt + F11 على لوحة المفاتيح أو انتقل إلى علامة التبويب Developer - & GT. Visual Basic لفتح محرر Visual Basic .
- في نافذة التعليمات البرمجية المنبثقة ، من شريط القوائم ، انقر فوق إدراج - & GT. الوحدة النمطية .
- انسخ الكود التالي والصقه في نافذة الكود.
7889
الكود الخاص بك الآن جاهز للتشغيل.
هنا ، نقارن رقمين 12345 و 12335 ، لمعرفة أيهما أكبر. عادةً ما تكون هذه العملية مثالية للعثور على أرقام كبيرة في مجموعة بيانات كبيرة.
- اضغط على F5 على لوحة المفاتيح أو من شريط القائمة حدد تشغيل - & GT. تشغيل Sub / UserForm . يمكنك أيضًا النقر فوق رمز التشغيل الصغير في شريط القائمة الفرعية لتشغيل الماكرو.
ستحصل على النتيجة في Excel MsgBox
في حالتنا ، الرقم 12345 - مخزن في متغير Num1 - أكبر من الرقم 12335 ، Num2 . لذا يوضح لنا MsgBox أن الرقم الأول أكبر من الرقم الثاني .
اقرأ المزيد: Excel Formula لإنشاء رقم عشوائي (5 أمثلة)
2. التحقق من نتائج الطالب باستخدام If - Then - Else Statement in VBA
يمكنك التحقق مما إذا كان الطالب يجتاز أو يفشل في الاختبار بهذه العبارة في رمز VBA .
الخطوات:
- بنفس الطريقة السابقة ، افتح محرر Visual Basic من علامة التبويب المطور و إدراج a الوحدة النمطية في نافذة التعليمات البرمجية.
- في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.
6873
الرمز الخاص بك جاهز الآن تشغيل.
هذا الرمز سيتحقق مما إذا كانت الخلية D5 تحتوي على قيمة أكبر من 33 . إذا حدث ذلك ، فسيظهر ناتجًا واحدًا ، وإذا لم يحدث ذلك فسيظهر شيئًا آخر.
- تشغيل الماكرو و ستحصل على النتيجة وفقًا للرمز الخاص بك.
انظر إلى مجموعة البيانات أعلاه مع النتيجة ، الخلية D5 تحمل 95 وهو بالتأكيد أكثر من 33 ، ومن ثم فإنه يعرض النتيجة هي اجتياز . ولكن إذا قمنا بتشغيل رمز الخلية D7 (22) ، فسيتم عرضه بخلاف ذلك.
اقرأ المزيد: كيفية استخدام بيان حالة VBA ( 13 أمثلة)
قراءات مماثلة
- كيفية استخدام وظيفة السجل في Excel VBA (5 مناسبأمثلة)
- استخدام دالة VBA LTrim في Excel (4 أمثلة)
- كيفية استخدام وظيفة VBA FileDateTime في Excel (3 استخدامات)
- استخدام مشغل تعديل VBA (9 أمثلة)
- وظيفة VBA EXP في Excel (5 أمثلة)
3. تحديث التعليقات في تقدير الطالب باستخدام عدة If - Then - Else Statement in VBA
لقد تعلمت كيفية استخراج ما إذا كان طالب ناجح أم لا باستخدام واحد If-Then-Else العبارة ، ولكن هذه المرة ستتعرف على عبارات متعددة If-Then-Else مع المثال التالي.
سنقوم بتشغيل VBA كود لملء تلك المربعات التعليق بناءً على شروط متعددة.
الخطوات:
- بنفس الطريقة السابقة ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
- في نافذة الكود ، انسخ الكود التالي والصقه.
7375
الرمز الخاص بك جاهز الآن للتشغيل.
هذا الرمز سوف يطبع التعليقات وفقًا للدرجة التي تم الحصول عليها بواسطة الطلاب.
- قم بتشغيل هذا الرمز وانظر الصورة التالية حيث يتم ملء مربعات التعليقات بالنتائج المناسبة.
4. بيان If-Then-Else لتحديث الاتجاهات الأساسية بناءً على الكود في Excel
يمكنك أيضًا استخدام If-Then-Else للعثور على الاتجاهات الأساسية بناءً على رمز المؤشر قدمت. انظر الىالصورة التالية حيث سنكتشف الاتجاهات بناءً على الأحرف الأولى التي تم تقديمها.
الخطوات:
- افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
- في الكود نافذة ، انسخ الكود التالي والصقه.
1859
الكود الخاص بك جاهز الآن للتشغيل.
- تشغيل هذا الرمز وستحصل على أسماء الاتجاهات في الخلايا المعنية.
أو ، إذا كنت تريد العثور على اتجاه واحد فقط بناءً على الكود ، إذن يمكنك استخدام الكود أدناه.
9369
سيأخذ هذا الرمز القيمة من الخلية B5 في الاعتبار ويعيد النتيجة وفقًا لها في الخلية C5 .
على سبيل المثال ، إذا كتبت " N " في الخلية B5 ، فستعطيك " الشمال ؛ إذا كتبت " S " في الخلية B5 ، فستظهر لك " الجنوب " في الخلية C5 .
الخاتمة
توضح لك هذه المقالة كيفية استخدام العبارة If - Then - Else في Excel مع VBA . آمل أن يكون هذا المقال مفيدًا جدًا لك. لا تتردد في السؤال عما إذا كان لديك أي أسئلة بخصوص هذا الموضوع.
