shshorbagy قام بنشر يونيو 2, 2009 قام بنشر يونيو 2, 2009 الاخوة الاعزاء السلام عليكم ورحمة الله وبركاته ارجو منم مساعدتي في هذه المشكلة والتي احتاج لها بشده في عملي اريد جمع خلايا صفحة الاكسيل بشرط لون الخلفية للخلية او لو خط الارقام بالخليه مع العلم ان الخلايا تختلف من شهر لاخر وليس لها حد اقصي او ادني حتي اقوم بتسبيت الشرط للقيام بالجمع
أيسم إبراهيم قام بنشر يونيو 2, 2009 قام بنشر يونيو 2, 2009 السلام عليكم أخي العزيز ارفق ملف به مثال على طلبك و بعض التوضيح حتى يتمكن الأخوة من مساعدتك تحياتي
ابو القبطان قام بنشر يونيو 2, 2009 قام بنشر يونيو 2, 2009 للرفع أخي shshorbagy السلام عليكم الحل موجود بإذن الله .. بس ياريت ترفق ملفك للتطبيق عليه new4a
shshorbagy قام بنشر يونيو 3, 2009 الكاتب قام بنشر يونيو 3, 2009 اولا جزاكم الله كل خير عن استجابتكم السريعه لطلبي ومرفق لكم ملف الاكسيل موضحا علية المطلوب لم استطع رفع الملف كملف اكسيل وقد قمت باخذ صورة منه وارسالها لكم ضمن المرفقات shshorbagy.pdf
يحيى حسين قام بنشر يونيو 3, 2009 قام بنشر يونيو 3, 2009 أخي هذا الكود من احد المنتديات الأجنبية جربه Function SumColor(rColor As Range, rSumRange As Range) 'Written by Ozgrid Business Applications 'www.ozgrid.com Dim rCell As Range Dim iCol As Integer Dim vResult iCol = rColor.Interior.ColorIndex For Each rCell In rSumRange If rCell.Interior.ColorIndex = iCol Then vResult = WorksheetFunction.Sum(rCell) + vResult End If Next rCell SumColor = vResult End Function 1
طارق محمود قام بنشر يونيو 3, 2009 قام بنشر يونيو 3, 2009 السلام عليكم رائع أخي يحي كود مضبوط ومعمول بإتقان
shshorbagy قام بنشر يونيو 3, 2009 الكاتب قام بنشر يونيو 3, 2009 اعتذر لكم ولكني لا اعرف كيف استخدم الاكواد
يحيى حسين قام بنشر يونيو 3, 2009 قام بنشر يونيو 3, 2009 تفضل اخي هذا الملف به الكود اعلاه حيث سينتج عن هذا الكود دالة جديدة =SumColor(E9,E1:E10) حيث ان الخلية E9 تحتوي الخلية التي بها اللون الذي ترغب في الجمع بناء عليه و E1:E10 هو المدى الذي ستم جمعه SumColor.rar
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.