كيفية الاستخدام إذا لم يكن في vba؟

في VBA، عند استخدام عبارة IF ، فإنها تنفذ سطرًا من التعليمات البرمجية إذا كان الشرط الذي حددته للاختبار هو TRUE. ولكن عند استخدام عامل التشغيل NOT مع IF، فإنه يتحقق مما إذا كان الشرط الذي حددته غير صحيح وينفذ التعليمات البرمجية بناءً على ذلك.

إنه مثل القيام بعبارة IF المعاكسة، من TRUE إلى FALSE ومن FALSE إلى TRUE.

لنفترض أنك تريد اختبار ما إذا كان A < B، وإذا كان هذا الشرط صحيحًا، فسوف يُرجع IF TRUE، أليس كذلك؟ ولكن عند استخدام IF NOT A < B، فسوف يُرجع FALSE.

ملاحظة: NOT هو عامل تشغيل منطقي.

أمثلة على استخدام VBA إذا لم يكن كذلك

وسنرى هنا مثالا بسيطا لفهم ذلك:

 Sub myMacro() Dim A As Range, B As Range Set A = Range("A1") Set B = Range("B1") If Not A < B Then MsgBox "A is not greater than B." Else MsgBox "B is not greater than A." End If End Sub

في الكود أعلاه، استخدمت عامل التشغيل NOT لاختبار ما إذا كان B ليس أكبر من A.

إذا نظرت إلى بيان الشرط، يمكنك أن تفهم أن الحالة الفعلية التي سيتم اختبارها هي إذا كانت B أكبر من A، ولكن بما أننا استخدمنا عبارة NOT، فإنها سترجع خطأ إذا كان الشرط صحيحًا.

إليك مثال آخر يمكنك استخدامه لفهمه.

 Sub myMacro() If Not ActiveSheet.Name = Sheets("Sheet1").Name Then Sheets("Sheet1").Activate End If End Sub

الآن في هذا الكود، استخدمت NOT مع IF لمعرفة ما إذا كانت الورقة النشطة هي Sheet1 أم لا، وإذا لم تكن كذلك، فإن سطر الكود الذي حددناه سينشط Sheet1 .