جمع عدد الخلايا الملونة بالتنسيق الشرطي

مرحبا حسام موسى صبحي القدرة

اهلا وسهلا بك في مجتمع مايكروسوفت

نشكرك على تواصلك معنا  ويسعدنا تقديم المساعدة لك والاجابة على استفسارك.

ما نستطيع مساعدتك به حول هذا الموضوع هو توفير المعلومات العامة عن كيفية استخدام هذه العمليات في الاكسل تستطيع مراجعة الروابط التالية :

1- استخدام الدالات في Excel 2013

2- انشاء ماكرو او حذفه

 إذا كنت بحاجة الى مزيد من التوضيحات الرجاء مشاركتنا بها من خلال الرد ويسعدنا تقديم المساعدة.

شكرا لك على المشاركة في مجتمع مايكروسوفت

ممكن شرح بالفيديو ياصديقي وجزاك الله كل خير

استخدم هذه الدالة  udf

وضعها فى موديل

Function ColorFunction(rColor ``As Range, rRange ``As Range, ``Optional SUM ``As Boolean``)

Dim rCell ``As Range

Dim lCol ``As Long

Dim vResult

lCol = rColor.Interior.ColorIndex

If SUM = ``True Then

For Each rCell ``In rRange

If rCell.Interior.ColorIndex = lCol ``Then

vResult = WorksheetFunction.SUM(rCell, vResult)

End If

Next rCell

Else

For Each rCell ``In rRange

If rCell.Interior.ColorIndex = lCol ``Then

vResult = 1 + vResult

End If

Next rCell

End If

ColorFunction = vResult

End Function