وظيفة VBA COUNTIF في Excel (6 أمثلة)

Hugh West

تُستخدم الدالة COUNTIF في Excel لحساب عدد الخلايا داخل النطاق الذي يلبي الشرط المحدد. في هذه المقالة ، سنوضح لك كيفية استخدام وظيفة COUNTIF في Excel مع ماكرو VBA .

تنزيل المصنف

يمكنك تنزيل مصنف Excel التدريبي المجاني من هنا.

وظيفة COUNTIF مع VBA.xlsm

وظيفة COUNTIF في Excel

  • بناء الجملة

WorksheetFunction.CountIf ( Arg1 كنطاق ، Arg2 ) كمزدوجة

  • المعلمات
المعلمة مطلوب / اختياري نوع البيانات الوصف
Arg1 مطلوب النطاق

نطاق الخلايا من خلايا العد.

Arg2 مطلوب متغير رقم ، تعبير ، مرجع خلية ، أو نص يحدد الخلايا المطلوب عدها. على سبيل المثال ، يمكن أن يكون التعبير 20 أو "20" أو "& gt؛ 20" أو "فاكهة" أو B2.
  • نوع الإرجاع

القيمة مزدوجة

6 أمثلة على استخدام وظيفة COUNTIF في Excel مع VBA

In في هذا القسم ، ستتعلم كيفية استخدام وظيفة COUNTIF في Excel لحساب النصوص والأرقام وما إلى ذلك باستخدام كود VBA .

1. دالة ورقة العمل مع COUNTIF في Excel VBA

يمكن استخدام وظيفة ورقة العمل الخاصة بـ Excel لاستدعاء معظمالوظائف الأخرى في Excel المتوفرة في مربع الحوار إدراج دالة في Excel والوظيفة COUNTIF هي إحدى هذه الوظائف.

مع المثال أعلاه ، سوف نتعلم كيفية استخدام دالة ورقة العمل مع COUNTIF لحساب البيانات باستخدام VBA في Excel.

الخطوات:

  • اضغط على Alt + F11 على لوحة المفاتيح أو انتقل إلى علامة التبويب Developer - & gt؛ Visual Basic لفتح محرر Visual Basic .

  • في نافذة التعليمات البرمجية المنبثقة ، من شريط القوائم ، انقر فوق إدراج - & GT. الوحدة النمطية .

  • انسخ الكود التالي والصقه في نافذة الكود.
4722

الكود الخاص بك جاهز الآن للتشغيل.

  • اضغط F5 على لوحة المفاتيح أو من شريط القوائم حدد Run - & gt؛ تشغيل Sub / UserForm . يمكنك أيضًا النقر فوق رمز التشغيل الصغير في شريط القائمة الفرعية لتشغيل الماكرو.

أردنا معرفة ذلك. كم عدد الأرقام الموجودة في مجموعة البيانات لدينا والتي تقل عن 3. لذلك بعد تشغيل الكود حصلنا على نتيجة 4 وهي عدد الأرقام الأقل من 3 لمجموعة البيانات الخاصة بنا.

اقرأ المزيد: كيفية استخدام COUNTIF بين رقمين (4 طرق)

2. وظيفة COUNTIF لحساب نص معين في Excel

إذا كنت تريد حساب أي نص محدد مثل عدد المدن أو الأسماء أو الأطعمة وما إلى ذلك الموجودة في ورقة Excel ، فأنتيمكن استخدام وظيفة COUNTIF في VBA .

من المثال أعلاه ، سوف نتعلم كيفية استخدام COUNTIF لحساب عدد مرات ظهور الاسم John في مجموعة البيانات الخاصة بنا باستخدام ماكرو VBA .

الخطوات:

  • بنفس الطريقة السابقة ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
  • في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.
5636

الرمز الخاص بك جاهز الآن للتشغيل.

  • قم بتشغيل الماكرو وستحصل على العدد الإجمالي.

إذا لم تقم بذلك لا تريد كتابة النص مباشرة في الكود الخاص بك ، ثم يمكنك تخزينه في متغير أولاً ثم تمرير المتغير داخل الشفرة لاحقًا. تمامًا مثل الكود أدناه ،

3465

اقرأ المزيد: Count Text at Start with COUNTIF & amp؛ وظائف LEFT في Excel

3. وظيفة COUNTIF لحساب الرقم باستخدام VBA

يمكنك استخدام وظيفة COUNTIF لاستخراج نتائج معينة.

من على سبيل المثال أعلاه ، سوف نتعلم كيفية استخدام COUNTIF لحساب عدد الأرقام الموجودة في مجموعة البيانات لدينا والتي تكون أكبر من 1.1 مع ماكرو VBA .

الخطوات:

  • بنفس الطريقة السابقة ، افتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
  • في نافذة التعليمات البرمجية ، انسخ الكود التاليوالصقه.
2137

الكود الخاص بك جاهز الآن للتشغيل.

  • تشغيل الماكرو و سوف تحصل على العدد الإجمالي.

كما تمت مناقشته من قبل ، إذا كنت لا ترغب في كتابة الرقم مباشرة في الكود الخاص بك ، فيمكنك تخزينه في المتغير أولاً ثم مرر المتغير داخل الكود لاحقًا. تمامًا مثل الكود أدناه ،

4451

اقرأ المزيد: Excel COUNTIF بمعايير أكبر من وأقل من

قراءات مماثلة

  • وظيفة Excel COUNTIF لحساب عدد الخلايا الأكبر من 0
  • كيفية استخدام وظائف IF و COUNTIF معًا في Excel
  • Excel COUNTIF لحساب الخلية التي تحتوي على نص من خلية أخرى
  • كيفية استخدام دالة COUNTIF لحساب النسبة المئوية في Excel

4. دالة COUNTIF مع نطاق من الكائنات في Excel

يمكنك تعيين مجموعة من الخلايا إلى كائن النطاق ثم استخدام كائن النطاق لحساب القيم في Excel.

الخطوات:

  • فتح محرر Visual Basic من علامة التبويب Developer و أدخل a Module في نافذة التعليمات البرمجية.
  • في نافذة التعليمات البرمجية ، انسخ الكود التالي والصقه.
4112

الكود الخاص بك جاهز الآن للتشغيل.

  • قم بتشغيل الرمز وستحصل على العدد الإجمالي مع التجميع القيمة.

اقرأ المزيد: كيفية استخدام COUNTIF للنطاق غير المتجاور فيExcel

5. طريقة صيغة COUNTIF في Excel

يمكنك أيضًا استخدام طريقة Formula و / أو FormulaR1C1 لتطبيق COUNTIF على خلية في VBA . هذه الطرق أكثر مرونة في القيام بمثل هذه العمليات.

5.1. طريقة الصيغة

تسمح طريقة الصيغة بتحديد نطاق الخلايا كـ B5: B10 الموضح أدناه في المثال.

الخطوات:

  • في إطار التعليمات البرمجية لمحرر Visual Basic ، انسخ الكود التالي والصقه.
6218

الكود الخاص بك جاهز الآن للتشغيل.

هذا الجزء من التعليمات البرمجية سيمنحك العدد الإجمالي للبيانات التي تطلبها.

5.2. طريقة FormulaR1C1

طريقة FormulaR1C1 أكثر مرونة لأنها لا تقتصر على مجموعة من الخلايا.

باستخدام نفس مجموعة البيانات ، سنتعلم الآن كيفية استخدام FormulaR1C1 لحساب القيم في VBA .

الخطوات:

  • في إطار التعليمات البرمجية لـ محرر Visual Basic ، انسخ الكود التالي والصقه.
7350

الكود الخاص بك جاهز الآن للتشغيل.

يمنحك هذا الرمز أيضًا العدد الإجمالي للبيانات التي تطلبها.

إذا كنت لا تريد التعيين نطاق الإخراج ، يمكنك جعل هذا الرمز أكثر مرونة من خلال كتابة مثل هذا ،

1126

ستحسب الصيغة الخلايا التي تلبي الشرط وتضع الإجابة في ActiveCell في ورقة العمل الخاصة بك. يجب الإشارة إلى النطاق داخل الوظيفة COUNTIF باستخدام بناء الجملة الصف (R) و العمود (C) .

قراءة المزيد: كيفية تطبيق COUNTIF بين قيم خليتين في Excel

6. تعيين نتيجة دالة COUNTIF إلى متغير

إذا كنت تريد استخدام نتيجة الصيغة الخاصة بك في مكان آخر بدلاً من مجموعة بيانات Excel ، فيمكنك تعيين النتيجة إلى متغير واستخدامها لاحقًا في كود.

رمز VBA لذلك هو ،

7979

سيتم عرض النتيجة في مربع رسالة Excel.

اقرأ المزيد: COUNTIF مثال على Excel (22 مثالًا)

الخاتمة

توضح لك هذه المقالة كيفية استخدام وظيفة COUNTIF في Excel مع VBA . آمل أن يكون هذا المقال مفيدًا جدًا لك. لا تتردد في السؤال عما إذا كان لديك أي أسئلة بخصوص هذا الموضوع.

هيو ويست مدرب ومحلل إكسل ذو خبرة عالية ولديه أكثر من 10 سنوات من الخبرة في هذا المجال. حاصل على درجة البكالوريوس في المحاسبة والمالية ودرجة الماجستير في إدارة الأعمال. لدى هيو شغف بالتدريس وقد طور منهجًا تعليميًا فريدًا يسهل اتباعه وفهمه. ساعدت معرفته الخبيرة ببرنامج Excel الآلاف من الطلاب والمهنيين في جميع أنحاء العالم على تحسين مهاراتهم والتميز في حياتهم المهنية. من خلال مدونته ، يشارك Hugh معرفته مع العالم ، ويقدم دروسًا مجانية في Excel وتدريبًا عبر الإنترنت لمساعدة الأفراد والشركات على تحقيق إمكاناتهم الكاملة.