اعلن هنا
أكاديمية الصقر للتدريب
أعلن هنا
أعلن هنا
أعلن هنا
أعلن هنا



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





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

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



13-03-2018 07:01 مساء
Eslam Abdullah
menu_open
مشرف قسم الاكسيل
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 617
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 40
قوة السمعة : 3945
الاعجاب : 1066
 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
المشاركات : 3298
الجنس : ذكر
تاريخ الميلاد : 1-10-1978
الدعوات : 11
يتابعهم : 0
يتابعونه : 268
قوة السمعة : 9125
الاعجاب : 3089
 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
المشاركات : 617
الجنس : ذكر
تاريخ الميلاد : 1-9-1995
الدعوات : 2
يتابعهم : 3
يتابعونه : 40
قوة السمعة : 3945
الاعجاب : 1066
 offline 
look/images/icons/i1.gif حساب عدد الخلايا التي تحتوي على لون الخلية المحددة باستخدام VBA
أنا نفسى مش مقتنع بشرح مايكروسوفت دا laugh
لكنى من اليوم أعتزل التفاعل لحين إنتهاء الإمتحانات
ألقاكم أحبائى فيما بعد بإذن الله وبأرنب مشوى أخر biggrin2biggrin2

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




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

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





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
كيفية عدم جمع الخلايا المخفية فى الاكسل مع عماد غازى emad ghazi
8 126 ali mohamed ali
اريد تعديل الكود لكي يحسب عدد الخلايا الملون حسب تنسيق شرطي وهي تاريخ بدل رقم  ابوعلي الحبيب
11 65 YasserKhalil
ازاي اجمع خلايا عدا الخلايا المخفية omar alrayes
1 50 omar alrayes
احصاء عدد الخلايا بطرق عديدة Eslam Abdullah
20 326 محمد أبو عبدو
ترحيل لبعض الخلايا نصر الإيمان
13 199 YasserKhalil

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


 







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



الساعة الآن 01:05 صباحا

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