كيفية استخدام وظيفة iserror في vba (مع مثال)

يمكنك استخدام الدالة IsError في VBA للتحقق مما إذا كانت خلية معينة تحتوي على قيمة خطأ وإرجاع TRUE أو FALSE وفقًا لذلك.

إليك طريقة شائعة لاستخدام هذه الوظيفة عمليًا:

 SubCheckIsError ()

Dim i As Integer
    
For i = 2 To 11
    Range("B" & i).Value = WorksheetFunction.IsError(Range("A" & i))
Next i

End Sub

يتحقق هذا الماكرو المحدد مما إذا كانت كل خلية في النطاق A2:A11 تمثل قيمة خطأ ويقوم بإرجاع TRUE أو FALSE في الخلية المقابلة في النطاق B2:B11 .

يوضح المثال التالي كيفية استخدام بناء الجملة هذا عمليًا.

مثال: كيفية استخدام الدالة IsError في VBA

لنفترض أن لدينا عمود القيم التالي في Excel:

لنفترض أننا نريد التحقق مما إذا كانت كل قيمة في العمود A هي قيمة خطأ أم لا.

يمكننا إنشاء الماكرو التالي للقيام بذلك:

 SubCheckIsError ()

Dim i As Integer
    
For i = 2 To 11
    Range("B" & i).Value = WorksheetFunction.IsError(Range("A" & i))
Next i

End Sub

عندما نقوم بتشغيل هذا الماكرو، نحصل على الإخراج التالي:

تعرض القيم الموجودة في العمود B TRUE أو FALSE للإشارة إلى ما إذا كانت القيم المقابلة في العمود A هي قيم خطأ أم لا.

لاحظ أن القيم التالية جميعها ترجع TRUE في العمود B:

• #DIV/0!
• #قيمة!
• #NUM!

جميع القيم الأخرى ترجع FALSE لأنها ليست قيم خطأ.

لاحظ أيضًا أن الخلية الفارغة A10 لا تُرجع القيمة TRUE لأنها ليست قيمة خطأ – فهي ببساطة فارغة.

ملاحظة : يمكنك العثور على الوثائق الكاملة لوظيفة VBA IsError هنا .

مصادر إضافية

تشرح البرامج التعليمية التالية كيفية تنفيذ المهام الشائعة الأخرى في VBA:

VBA: كيفية استخدام IF OR لاختبار شروط متعددة
VBA: كيفية استخدام IF AND لاختبار شروط متعددة
VBA: كيفية استخدام IF NOT لاختبار ما إذا لم يتم استيفاء الشرط