انتقل إلى المحتوى الرئيسي

كيف نحسب أو نجمع الخلايا بناءً على ألوان الخط في إكسيل؟

كيف يمكنك الحصول على عدد الخلايا أو جمع كل الخلايا التي تحتوي على لون خط معين في Excel؟ على سبيل المثال ، لدي مجموعة من البيانات في ورقة العمل كما هو موضح في لقطة الشاشة التالية ، والآن أريد حساب أو تلخيص الخلايا التي تحتوي على لون خط أحمر وأزرق وأسود على التوالي. في العادة ، لا توجد طريقة مباشرة للتعامل مع هذه المهمة ، هنا ، سأتحدث عن بعض الحيل للحصول على هذه الوظيفة.

عد الخلايا أو جمعها استنادًا إلى ألوان الخط باستخدام الوظيفة المحددة بواسطة المستخدم

عد الخلايا أو جمعها بناءً على لون الخط مع بعض الوظائف المفيدة

عد الخلايا أو جمعها استنادًا إلى لون الخط مع ميزة مذهلة - العد حسب اللون


عد الخلايا أو جمعها استنادًا إلى ألوان الخط باستخدام الوظيفة المحددة بواسطة المستخدم

عد الخلايا بناءً على ألوان الخط:

لحساب عدد الخلايا بألوان خطوط معينة ، يرجى القيام بما يلي:

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.

كود فبا: عد الخلايا بناءً على ألوان الخط:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        CountColour = CountColour + 1
    End If
Next
End Function

3. ثم احفظ هذا الرمز وارجع إلى ورقة العمل ، ثم أدخل هذه الصيغة في خلية فارغة = CountColour (A1: D10، A2) ، انظر لقطة الشاشة:

ملاحظات: في الصيغة أعلاه ، A1: D10 هو النطاق الذي تريد استخدامه و A2 هي الخلية ذات لون الخط المحدد الذي تريد حسابه.

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


مجموع الخلايا على أساس ألوان الخط:

لتجميع الخلايا بناءً على ألوان الخط ، يمكن أن تساعدك الوظيفة المعرفة من قبل المستخدم التالية.

1. اضغط باستمرار على ALT + F11 مفاتيح ، ويفتح نافذة ميكروسوفت فيسوال باسيك للتطبيقات.

2. انقر إدراج > وحدة، والصق الكود التالي في ملف نافذة الوحدة.

كود فبا: مجموع الخلايا على أساس ألوان الخط:

Public Function SumByColor(pRange1 As Range, pRange2 As Range) As Double
'Update by Extendoffice
Application.Volatile
Dim rng As Range
Dim xTotal As Double
xTotal = 0
For Each rng In pRange1
    If rng.Font.Color = pRange2.Font.Color Then
        xTotal = xTotal + rng.Value
    End If
Next
SumByColor = xTotal
End Function

3. ثم احفظ هذا الرمز وارجع إلى ورقة العمل الأصلية ، ثم أدخل هذه الصيغة = SumByColor (A1: D8، A1) في خلية فارغة ، انظر لقطة الشاشة:

ملاحظات: في الصيغة أعلاه ، A1: D10 هو النطاق الذي تريد استخدامه و A2 هي الخلية ذات لون خط معين تريد جمعه.

4. ثم اضغط أدخل key ، وسوف تضيف جميع الخلايا بألوان الخط الأحمر. إذا كنت تريد جمع الخلايا الملونة الأخرى للخط ، يرجى إدخال الصيغة بشكل متكرر. سوف تحصل على النتيجة التالية:


عد الخلايا أو جمعها بناءً على لون الخط مع بعض الوظائف المفيدة

قد تكون الوظيفة المحددة من قبل المستخدم مزعجة بالنسبة لك للحفظ والتطبيق ، هنا ، سأوصي بأداة سهلة الاستخدام-كوتولس ل إكسيل، مع وظائفه المتقدمة ، يمكنك حل هذه المهمة بسرعة وسهولة.

نصيحة:لتطبيق هذا كونتبيفونتكولور و اللون الميزات ، أولاً ، يجب عليك تنزيل ملف كوتولس ل إكسيل، ثم قم بتطبيق الميزة بسرعة وسهولة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

عد الخلايا بناءً على ألوان الخط:

1. انقر فوق الخلية التي تريد وضع نتيجة العد فيها ، ثم انقر فوقها كوتولس > وظائف Kutools > الإحصاء والرياضيات > كونتبيفونتكولور، انظر لقطة الشاشة:

2. في الحجج الوظيفية في مربع الحوار ، حدد نطاق البيانات وخلية فهرس الألوان التي تريد حسابها حسب لون الخط ، انظر لقطة الشاشة:

3. ثم انقر فوق OK زر ، ستحصل على نتيجة العد الأولى ، للحصول على نتائج أخرى ، ما عليك سوى نسخ هذه الصيغة وتغيير مراجع الخلايا حسب حاجتك. انظر لقطة الشاشة:


مجموع الخلايا على أساس ألوان الخط:

1. انقر فوق الخلية التي تريد وضع نتيجة العد فيها ، ثم انقر فوقها كوتولس > وظائف Kutools > الإحصاء والرياضيات > اللون، انظر لقطة الشاشة:

2. في الحجج الوظيفية مربع الحوار ، حدد نطاق البيانات وخلية فهرس اللون التي تريد جمعها حسب لون الخط ، انظر الصورة:

3. ثم انقر فوق OK زر ، ستحصل على أول نتيجة ، للحصول على نتائج أخرى ، ما عليك سوى نسخ هذه الصيغة وتغيير مراجع الخلايا حسب حاجتك. انظر لقطة الشاشة:

انقر لتنزيل Kutools for Excel والتجربة المجانية الآن!


عد الخلايا أو جمعها استنادًا إلى لون الخط مع ميزة مذهلة - العد حسب اللون

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

نصيحة:لتطبيق هذا عد حسب اللون الميزة ، أولاً ، يجب عليك تنزيل ملف كوتولس ل إكسيل، ثم قم بتطبيق الميزة بسرعة وسهولة.

بعد تثبيت كوتولس ل إكسيل، يرجى القيام بذلك على النحو التالي:

1. حدد نطاق البيانات الذي تريد حسابه وجمعه بناءً على ألوان مختلفة.

2. انقر كوتولس بلس> عد حسب اللون، انظر لقطة الشاشة:

3. في عد حسب اللون مربع الحوار، اختر التنسيق القياسي من طريقة اللون المنسدلة، وحدد الخط تحت نوع العد القائمة المنسدلة ، وتم حساب الخلايا ذات ألوان الخط نفسها ، وإضافتها ، ومتوسطها ، وما إلى ذلك ، انظر لقطة الشاشة:

4. ثم انقر فوق انشاء تقرير زر ، سوف تحصل على الإحصائيات في مصنف جديد. انظر لقطة الشاشة:

انقر لتنزيل Kutools for Excel والتجربة المجانية الآن!


المزيد من المقالات:

  • حساب مجموع الخلايا على أساس لون الخلفية في Excel
  • لنفترض أن لديك نطاقًا من الخلايا بألوان خلفية مختلفة ، مثل الأحمر والأخضر والأزرق وما إلى ذلك ، ولكنك الآن تحتاج إلى حساب عدد الخلايا في هذا النطاق التي لها لون خلفية معين وتلخيص الخلايا الملونة بنفس اللون المحدد . في Excel ، لا توجد صيغة مباشرة لحساب مجموع خلايا الألوان وعددها ، وسأقدم لك هنا بعض الطرق لحل هذه المشكلة.
  • جمع / عدد الأرقام الجريئة في مجموعة من الخلايا في Excel
  • عندما يكون لديك نطاق بيانات يحتوي على بعض الأرقام الغامقة في ورقة عمل ، وتريد الآن جمع أو حساب الخلايا الغامقة فقط ، بالطبع يمكنك إضافتها واحدة تلو الأخرى يدويًا ، ولكنها ستستغرق وقتًا طويلاً. كيف يمكنك جمع أو حساب الخلايا الجريئة فقط في Excel بطريقة سهلة وسريعة؟
  • تطبيق التدرج اللوني عبر خلايا متعددة
  • في Excel ، يمكننا بسهولة ملء لون الخلفية لخلية أو عدة خلايا ، ولكن في بعض الأحيان ، نحتاج إلى ملء اللون بالتدرج كما هو موضح في لقطة الشاشة التالية ، كيف يمكن الحصول على تدرج اللون في خلية أو عبر خلايا متعددة في Excel؟
  • أعمدة الخلية المتسلسلة والحفاظ على لون النص في Excel
  • كما نعلم جميعًا ، أثناء ربط أعمدة الخلية أو دمجها في عمود واحد ، سيتم فقد تنسيق الخلية (مثل لون خط النص وتنسيق الأرقام وما إلى ذلك). في هذه المقالة ، سأقدم بعض الحيل لدمج أعمدة الخلية في واحدة والحفاظ على لون النص بسهولة قدر الإمكان في Excel.

حساب أو جمع الخلايا بناءً على لون الخط / الخلفية / التنسيق الشرطي:

كوتولس ل إكسيل: مع أكثر من 300 وظيفة إضافية مفيدة في Excel ، يمكنك تجربتها مجانًا دون قيود خلال 30 يومًا. تنزيل وتجربة مجانية الآن!

أفضل أدوات إنتاجية المكتب

🤖 مساعد Kutools AI: إحداث ثورة في تحليل البيانات على أساس: التنفيذ الذكي   |  إنشاء التعليمات البرمجية  |  إنشاء صيغ مخصصة  |  تحليل البيانات وإنشاء الرسوم البيانية  |  استدعاء وظائف Kutools...
الميزات الشعبية: البحث عن التكرارات أو تمييزها أو تحديدها   |  حذف الصفوف الفارغة   |  دمج الأعمدة أو الخلايا دون فقدان البيانات   |   جولة بدون صيغة 
سوبر بحث: معايير متعددة VLookup    VLookup ذات القيمة المتعددة  |   VLookup عبر أوراق متعددة   |   بحث غامض ....
قائمة منسدلة متقدمة: إنشاء القائمة المنسدلة بسرعة   |  القائمة المنسدلة التابعة   |  قائمة منسدلة متعددة التحديد ....
مدير العمود: إضافة عدد محدد من الأعمدة  |  نقل الأعمدة  |  تبديل حالة رؤية الأعمدة المخفية  |  مقارنة النطاقات والأعمدة 
الميزات المميزة: التركيز على الشبكة   |  عرض تصميم   |   شريط الفورمولا الكبير    مدير المصنفات والأوراق   |  مكتبة الموارد (النص السيارات)   |  منتقي التاريخ   |  اجمع أوراق العمل   |  تشفير/فك تشفير الخلايا    إرسال رسائل البريد الإلكتروني عن طريق القائمة   |  سوبر تصفية   |   مرشح خاص (تصفية غامق / مائل / يتوسطه خط ...) ...
أفضل 15 مجموعة أدوات12 نص الأدوات (إضافة نص, إزالة الأحرف، ...)   |   +50 رسم الأنواع (مخطط جانت، ...)   |   40+ عملي الصيغ (احسب العمر على أساس تاريخ الميلاد، ...)   |   19 إدخال الأدوات (أدخل رمز الاستجابة السريعة, إدراج صورة من المسار، ...)   |   12 تحويل الأدوات (أرقام إلى كلمات, نتيجة تحويل عملة، ...)   |   7 دمج وتقسيم الأدوات (الجمع بين الصفوف المتقدمة, تقسيم الخلايا، ...)   |   ... و اكثر

عزز مهاراتك في Excel باستخدام Kutools for Excel، واختبر كفاءة لم يسبق لها مثيل. يقدم Kutools for Excel أكثر من 300 ميزة متقدمة لتعزيز الإنتاجية وتوفير الوقت.  انقر هنا للحصول على الميزة التي تحتاجها أكثر...

الوصف


يجلب Office Tab الواجهة المبوبة إلى Office ، ويجعل عملك أسهل بكثير

  • تمكين التحرير والقراءة المبوبة في Word و Excel و PowerPointوالناشر والوصول و Visio والمشروع.
  • فتح وإنشاء مستندات متعددة في علامات تبويب جديدة من نفس النافذة ، بدلاً من النوافذ الجديدة.
  • يزيد من إنتاجيتك بنسبة 50٪ ، ويقلل مئات النقرات بالماوس كل يوم!
Comments (52)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Hi..


I used it to count and sum from matrix. The problem is that the I need to count/sum in multiple range of cells. Is it possible to update this code to do this?
This comment was minimized by the moderator on the site
Hello, Joseph,

Maybe there is no direct way for you to count or sum the cell values based on font color in multiple ranges, but, you can apply the third method in this article and use Count by Color feature of Kutools for Excel, with this feature, you just need to select the multiple ranges first, and then apply the feature.
https://www.extendoffice.com/documents/excel/1418-excel-count-sum-by-font-color.html#a3

Please try it, thank you!
This comment was minimized by the moderator on the site
COUNT CELLS BY FONT COLOR tutorial was great! But it is not working when the font color was based on the conditional formatting. Do you have something for this concern?
This comment was minimized by the moderator on the site
Hello,
The codes in this article can not support the conditional formatting, but, you can use our Kutools for Excel's Count by Color feature, it can help you to count or sum conditional font colors. Please try it.
This comment was minimized by the moderator on the site
This was exactly what I needed - Thanks!
This comment was minimized by the moderator on the site
= SumByColor (A1: D8, A1) NÃO FUNCIONOU


=SumByColor(A1:D8;A1) FUNCIONOU

TIRANDO ESPAÇO E USANDO " ; " AO INVÉS DE " , " AI FUNCIONOU LEGAL.

USO EXCEL 10


MUITO BOM.


OBRIGADO
This comment was minimized by the moderator on the site
Is there a way to change Count Or Sum Cells Based On Font Colors With User Defined Function into count or sum cells based on de conditional formating?

I've tried with

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double

Application.Volatile
Dim rng As Range
For Each rng In pRange1

If rng.FormatConditions.Font.Color = pRange2.FormatConditions.Font.Color Then
CountColour = CountColour + 1

End If
Next
End Function

But it appears not to work, any suggestion?
Thanks
This comment was minimized by the moderator on the site
Hello, Borja,
May be you can use our product, Kutools for Excel, with its Count by Color feature, you can quickly count or sum the cell values based on the conditional formatting without any VBA code, please try. You can download it and free trial in 60 day.
Thank you!
This comment was minimized by the moderator on the site
I tried the SumByColor. It works, but not if the numbers have been coloured by conditional formatting. For example, I have a list of different numbers that are coloured red if they are within a range set by a conditional formatting rule. I would then like to sum only the red-coloured numbers. But the SumByColor VBA code does not work in this situation. Any suggestions to make it work. Thanks
This comment was minimized by the moderator on the site
Hello, Xiahui,
The above code can not applied to conditional formatting color, but, you can use our Kutools for Excel' Count by color feature, with it, you can quickly get the result for counting or summing based on the conditional formatting color. See the below screenshot:
This comment was minimized by the moderator on the site
Hey
Nice macro. I used it to just count from a simple matrix. The problem is that the macro counts also empty cells. How to exclude empty cells from counting?
This comment was minimized by the moderator on the site
Hello, Kriss,
To count the cells based on font color excluding the blank cells, please apply the below User Defined Function, please try:

Public Function CountColour(pRange1 As Range, pRange2 As Range) As Double
Application.Volatile
Dim rng As Range
For Each rng In pRange1
If rng.Value <> "" Then
If rng.Font.Color = pRange2.Font.Color Then
CountColour = CountColour + 1
End If
End If
Next
End Function
This comment was minimized by the moderator on the site
Exactly what I was looking for! This will save me lots of time. Thank You
This comment was minimized by the moderator on the site
Muito obrigada já ajudou muito, porém a minha formula só adiciona à soma outro número quando eu uso o pincel para mudar a cor, se eu trocar a cor da fonte pela barra de ferramenta não dá certo, alguém saber me explicar -
This comment was minimized by the moderator on the site
This was SO helpful - Thanks very much!
There are no comments posted here yet
Load More
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations