ahmedhafez قام بنشر سبتمبر 6, 2009 قام بنشر سبتمبر 6, 2009 السلام عليكم يا جماعة الخير مرفق شيت اذا كان يوجد طريقة لجمع الملون فقط هل هذاممكن مرفق مثال فقط يوجد عندى شيت يحتوى على اكتر من 500 خلية فهل هذا ممكن test colour.rar
ابو القبطان قام بنشر سبتمبر 6, 2009 قام بنشر سبتمبر 6, 2009 كل سنه وانت طيب اخونااحمد حافظ لو تكرمت ارسل ملفك بهيئة اوفيس 2003 واظن انا ارسلت لك هذا الملف من قبل ؟؟ اخوك : حسن
يحيى حسين قام بنشر سبتمبر 6, 2009 قام بنشر سبتمبر 6, 2009 اخي احمد هذا كود من احد المواقع الأجنبية [b]Function ColorFunction(rColor As Range, rRange As Range, Optional SUM As Boolean)[/b] Dim rCell As Range Dim lCol As Long Dim vResult '''''''''''''''''''''''''''''''''''''' 'Written by Ozgrid Business Applications 'www.ozgrid.com 'Sums or counts cells based on a specified fill color. ''''''''''''''''''''''''''''''''''''''' 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 [b]End Function[/b] و هذا هو رابط الموضوع الأصلي http://www.ozgrid.com/VBA/sum-count-cells-by-color.htm
ahmedhafez قام بنشر سبتمبر 6, 2009 الكاتب قام بنشر سبتمبر 6, 2009 السلام عليكم اخى الكريم حسن واخى يحيى بارك الله فيكم سبقتونى انا فعلا كنت قد وجدت الكود الموجود فى المواقع الاجنبية المرفق من قبل اخى الكريم جوست وكنت داخل المنتدى لوضعة لافادة الاعضاء كل سنة وانتم طيببين يا اخى الكريم
اوفيس 2003 قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 ياليت اخواني الأعزاء لو ترسلو لنا ملف به مثال وبه الكود الله يبارك فيكم
محمد يحياوي قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 اخي الكريم هذا المرفق به مثالين لدالتين تقومان بنفس العمل ط¬ظ…ط¹ ط§ظ„ط®ظ„ظٹط© ط§ظ„طھظ‰ ظ…ظ„ظˆظ†ط© ظپظ‚ط·.rar
محمد يحياوي قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 عذرا استاذي Justice لم انتبه لردك على العموم زيادة الخير خيرين
أ / محمد صالح قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 طبعا مشكورين ولكن لي اقتراح على أي أساس يكون التلوين؟ ونستعمل sumif بمعنى أننا نلون مثلا القيم أكبر من 100 مثلا نستعمل الدالة sumif بنفس الشرط والله أعلم 1
سالم شباني قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 السلام عليكم إليكم الملف المرفق به كود يحسب قيم الخلايا حسب لونها للأمانة الكود منقول بارك الله في صاحبه دون أن أنسى مساهمات الأساتذة مشكورين test colour.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.