اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
صفحتنا على الفيس بوك
أعلن هنا



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





حساب عدد الخلايا التي تحتوي على لون الخلية المحددة باستخدام VBA

السلام عليكم ورحمة الله وبركاته الأعراض فى Microsoft Excel الصيغة نحن نعرف أن فى الإحصاء الفئة هناك وظيفة ..



13-03-2018 07:01 مساء
Eslam Abdullah
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 916
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 48
قوة السمعة : 5309
الاعجاب : 1511
 offline 

السلام عليكم ورحمة الله وبركاته
 
  • الأعراض
           فى Microsoft Excel الصيغة نحن نعرف أن فى الإحصاء الفئة هناك وظيفة لحساب عدد الخلايا داخل نطاق التى تفى بشرط منح ،
           استدعاء الدالة COUNTIF. يمكن تنسيق المعايير على هذه الداله كنص أو الرقم ، بل أيضا ألوان الخلايا.
           وبعد ذلك كيف يمكننا الحصول على النتائج مع تلك المعايير مع الدالة COUNTIF لا يمكن الحلول.

 
 
MTg4NDEx4033122_en_1
 
  • الحل

    على الرغم من دون استخدام الدالةCOUNTIF، نحن لا يزال الحصول على النتائج باستخدامVBA. باستخدام VBA، يمكننا إنشاءUDF (دالة معرفة من قبل المستخدم)وحفظه في ملفالوظيفة الإضافيةبحيث يمكن استخدامه لكل مصنف وكمبيوتر آخر.
  • ما يمكن القيام به

    فيما يلي خطوات إنشاء الحساب UDF لون الخلية:
        1- فتح Microsoft Excel ثم اضغط Alt + F11 لإظهار نافذة " محرر Visual Basic ".
        2- في القائمة إدراج ، حدد الوحدة النمطية لإنشاء وحدة نمطية. ثم كتابة البرنامج النصي التالي:
Function CountCcolor(range_data As Range, criteria As Range) As Long
    Dim datax As Range
    Dim xcolor As Long
xcolor = criteria.Interior.ColorIndex
For Each datax In range_data
    If datax.Interior.ColorIndex = xcolor Then
        CountCcolor = CountCcolor + 1
    End If
Next datax
End Function

MjE0MjU3MQ38384033124_en_1
     3- قم بإغلاق إطار VBE والعودة إلى Excel.
     4- لاختبار UDF، إنشاء بعض بيانات النموذج أو يمكنك تحميل هذا الملف المثال لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب.
     5- في الخلية D3كتابة الدالة: = كونتككولور(range_data، معايير)
         حدد الخلية C2 إلى C51 في أرجومين range_data،
         حدد الخلية F1 في معايير أرجومين،
 
 
MTcxNDUwMQ54544033125_en_1
 
     6- اضغط مفتاح الإدخال Enter والنتيجة في الخلية F2 6. هذا يعني عدد الخلايا التي تحتوي على لون خلية أزرق من 6 خلايا.

NDYzNDE254033126_en_1

    7- يمكنك أيضا اختبار لون آخر. تغيير لون الخلية F1 بأي لون ترغب من البيانات باستخدام "نسخ التنسيق" للحصول على نفس اللون.
 
NDM2NTkwMQ38384033127_en_1
 
   8- يمكنك أيضا تعبئة الجبهة الديمقراطية، حيث يمكن استخدام الدالة في المصنف وجهاز آخر. الرجاء هذه الخطوات ما يلي:

         الخطوة 1: حفظ المصنف
 
        1- كتابة الاسم الذي تريده إلى المسماة في المربع اسم الملف . هنا أنا اسم لون الخلية عدد.
        2- لنوع الملف، اختر تنسيق Excel الإضافية (.xlam) .



            ملاحظة: يمكنك حفظ ملف الوظيفة الإضافية في أي مكان تريده. ولكن إذا كنت تريد أن يكون مدرجاً في Excel مضمن،
            يجب حفظه إلى الموقع الافتراضي. على جهاز الكمبيوتر
            مع نظام التشغيل Windows 7، يكون الموقع الافتراضي لأي إصدارات من
           
Microsoft Excel: C:UsersRADDINIAppDataRoamingMicrosoftAddIns

      الخطوة 2: تثبيت الوظيفة الإضافية
 

       1- فتح Microsoft Excel على الكمبيوتر الذي تريد تثبيت مربع الحوار "فتح" الإضافية الإضافية عن طريق النقر فوق إضافة في علامة التبويب المطور .
       2- في مربع الحوار الوظيفة الإضافية ، انقر فوق الزر استعراض حيث يتم عرض مربع الحوار استعراض .
 
NDkyMTk4MQ52524041376_en_1
 
 
      3- انتقل إلى موقع الملف هذا ملف الوظيفة الإضافية حفظ. اختر الملف وانقر فوق فتح.
      4- في مربع الحوار وظائف إضافية تأكد من خانة الاختيار إضافة غير محددة. ثم انقر فوق موافق.

NDUxMTgyMQ55554041377_en_1
 
          الآن بتثبيت UDF دالة عد لون الخلية أصبحت جاهزة للإستخدام.
 
منقول من موقع مايكروسوفت
 
 


أثارت هذه المشاركة إعجاب: mahmoud ayad،





13-03-2018 08:52 مساء
مشاهدة مشاركة منفردة [1]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3938
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 295
قوة السمعة : 11119
الاعجاب : 3943
 offline 
look/images/icons/i1.gif حساب عدد الخلايا التي تحتوي على لون الخلية المحددة باستخدام VBA
بارك الله فيك أخي العزيز إسلام

كنت أفضل تشرح الموضوع بأسلوبك المميز .. سيبك من مايكروسوفت ، تحس إنها بتكلم آلة مش إنسان smile

أثارت هذه المشاركة إعجاب: Eslam Abdullah،




13-03-2018 11:13 مساء
مشاهدة مشاركة منفردة [2]
Eslam Abdullah
menu_open
خبير معتمد
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 916
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 48
قوة السمعة : 5309
الاعجاب : 1511
 offline 
look/images/icons/i1.gif حساب عدد الخلايا التي تحتوي على لون الخلية المحددة باستخدام VBA
أنا نفسى مش مقتنع بشرح مايكروسوفت دا laugh
لكنى من اليوم أعتزل التفاعل لحين إنتهاء الإمتحانات
ألقاكم أحبائى فيما بعد بإذن الله وبأرنب مشوى أخر biggrin2biggrin2

أثارت هذه المشاركة إعجاب: YasserKhalil،




14-03-2018 06:30 صباحا
مشاهدة مشاركة منفردة [3]
YasserKhalil
menu_open عضوية موثقة
مراقب عام
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 21-08-2017
رقم العضوية : 3
المشاركات : 3938
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 295
قوة السمعة : 11119
الاعجاب : 3943
 offline 
look/images/icons/i1.gif حساب عدد الخلايا التي تحتوي على لون الخلية المحددة باستخدام VBA
ربنا يوفقك إن شاء الله أخي الحبيب إسلام .. ونتمنى لك الحصول على أعلى التقديرات (امتياز مع مرتبة الشرف)

أثارت هذه المشاركة إعجاب: Eslam Abdullah،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
جمع أو عد الخلايا الملونة Sum & Count Colored Cells YasserKhalil
38 1271 YasserKhalil
دمج الخلايا المتشابهة في عمود باستخدام إجراء عام YasserKhalil
11 121 YasserKhalil
دمج الخلايا الممتلئة بالصفوف الفارغة Eslam Abdullah
10 1151 YasserKhalil
كيفية عدم جمع الخلايا المخفية فى الاكسل مع عماد غازى emad ghazi
8 240 ali mohamed ali
اريد تعديل الكود لكي يحسب عدد الخلايا الملون حسب تنسيق شرطي وهي تاريخ بدل رقم  ابوعلي الحبيب
11 113 YasserKhalil

الكلمات الدلالية
الخلايا ، حساب ، التي ، تحتوي ، الخلية ، المحددة ، باستخدام ،


 







اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.



الساعة الآن 03:48 مساء

أعلن هنا
أعلن هنا
أعلن هنا