محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 عندي خلايا كثيرة في ورقة الاكسل واريد ان اجمع الخلايا الملونة فقط أرجوا المساعدة 01.pdf رابط هذا التعليق شارك More sharing options...
أبو محمد عباس قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 السلام عليكم الاخ العزيز لغرض تسهيل العمل على ملفك يجب ان ترسل ملف اكسل وبالنيابة عنك ولابداء المساعدة الاولية ليتسنى للاساتذة الكرام عمل المطلوب ارفقت ملف اكسل فيه التصور الموجود بملف PDF الذي ارفقته ودمتم برعاية الله وحفظه جمع الخلايا الملونة.rar رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 السلام عليكم اربط الكود هذا بزر Sub kh_SumCellColor() Dim Cel As Range Dim v As Double ''''''''''''''''''''''''' For Each Cel In Range("b4:c20") If Cel.Interior.ColorIndex <> xlNone Then v = v + Val(Cel) End If Next ''''''''''''''''''''''''' MsgBox v End Sub رابط هذا التعليق شارك More sharing options...
عبدالله باقشير قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 اذا كنت تريد النتيجة على خلية معينة في الشيت Sub kh_SumCellColor() Dim Cel As Range Dim v As Double ''''''''''''''''''''''''' For Each Cel In Range("b4:c20") If Cel.Interior.ColorIndex <> xlNone Then v = v + Val(Cel) End If Next ''''''''''''''''''''''''' Range("E2").Value = v End Sub رابط هذا التعليق شارك More sharing options...
ريان أحمد قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 السلام عليكم عندما جربت جميع الألوان نجحت يعني هل هذا الكود موجه للون محدد رابط هذا التعليق شارك More sharing options...
أبو حنــــين قام بنشر ديسمبر 3, 2012 مشاركة قام بنشر ديسمبر 3, 2012 بعد إذن أخي الحبيب : عبد الله هذا تعديل بسيط لكود الأخ عبد الله ، و هو يخص اللون الاصفر فقط : Sub kh_SumCellColor() Dim Cel As Range Dim v As Double ''''''''''''''''''''''''' For Each Cel In Range("b4:c20") If Cel.Interior.ColorIndex = 6 Or _ Cel.Interior.ColorIndex = 19 Or _ Cel.Interior.ColorIndex = 36 Then v = v + Val(Cel) End If Next ''''''''''''''''''''''''' Range("C21").Value = v End Sub رابط هذا التعليق شارك More sharing options...
ريان أحمد قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 بارك الله فيك وجزاك الله خير نعم والله إني أفتخر بك كونك مسلم وكونك عربي وكونك جزائري جعلك الله ذخرا للأمة وأطال الله في عمرك مثل هذه الكفاءات نفتخر بها رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 4, 2012 الكاتب مشاركة قام بنشر ديسمبر 4, 2012 عفوا يا أخوان عندي خلية فاضية في نهاية المساحات واريد اجمالي المساحات في الخلية الاخيرة الفاضية وياريت المثال يكون على ورقة اكسل مع توضيح الدالة رابط هذا التعليق شارك More sharing options...
الـعيدروس قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 السلام عليكم هذه داله معرفه وهيا كود الاستاذ الحبيب عبدالله باقشير وعليه تعديل طفيف تستخدم كالتالي 1 = فرضا المدى هو A2:A6 2 = فرضا خلية سمبل اللون هيا C1 =kh_SumCellColor(A2:A6;C1) اول معيار للداله المدى المراد جمع خلاياه والمعيار الثاني الخليه السمبل التي بها اللون المراد جمع الخلايا التي بنفس اللون Public Function kh_SumCellColor(my_r As Range, ByVal x As Range) As Integer Dim Cel As Range Dim v As Double ''''''''''''''''''''''''' For Each Cel In my_r If Cel.Interior.ColorIndex = x.Interior.ColorIndex Then v = v + Val(Cel) End If Next ''''''''''''''''''''''''' kh_SumCellColor = v End Function Kh_Sum_Color.rar رابط هذا التعليق شارك More sharing options...
كعبلاوى قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 نتمنى من اساتذة المنتدى جمع عدد الخلايا الملونة فى الملف المرفق جمع الخلايا الملونة.rar رابط هذا التعليق شارك More sharing options...
اوفيس 2003 قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 رااااااااااااااااااائع ، دالة اكثر من رائعة رابط هذا التعليق شارك More sharing options...
أبو حنــــين قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 (معدل) نفس كود الاخ الحبيب عبد الله باقشير مع تعديل بسيط جمع الخلايا الملونة.rar تم تعديل ديسمبر 4, 2012 بواسطه أبو حنين رابط هذا التعليق شارك More sharing options...
اوفيس 2003 قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 رائع ياغالي او بتطبيق شرح استاذ على يكون الشكل كالأتي جمع الخلايا الملونة.rar رابط هذا التعليق شارك More sharing options...
أبو محمد عباس قام بنشر ديسمبر 4, 2012 مشاركة قام بنشر ديسمبر 4, 2012 السلام عليكم ورحمة الله وبركاته حلول الاساتذة الكرام رائعة جزاهم الله خيرا اخي عاشق عدن المحترم ارفق لك الملف وفيه الكود الذي ارفقه الاستاذ العلامة عبدالله باقشير حفظه الله واعطاه الصحة والعافية والمعدل من قبل الاستاذ والاخ الحبيب ابو حنين حفظه الله واعطاه الصحة والعافية وحسب طلبك( واريد اجمالي المساحات في الخلية الاخيرة الفاضية) عسى ان يكون هو تمام طلبك وجزاك الله خيرا اجمالي المساحات في الخلية الاخيرةالفاضية.rar رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 5, 2012 الكاتب مشاركة قام بنشر ديسمبر 5, 2012 الأخوان الأعزاء أشكركم على روح التعاون وافيد سعادتكم ب الأخ / عباس سماوي جمع المساحات الملونة صح بس لاتوجد أي دالة تدل على طريقة الجمع كيف سأعرف الطريقة ؟ الأخ / أبو حنين جمع المبالغ كلها الملونة والغير ملونة في خلية والخلية الأخرى جمع ناتج القطع الملونة بس بدون اي دالة تدل على الطريقة التي جمعت . الأخ / كعبلاوي نفس طريقة أبو حنين بدون عملية حسابية في الخلية . الأخ / نصار الأخ / أوفس 2003م العملية التابعة لكم صحيحة ولكن كلما جئت أطبقها في الملف التابع لي يطلع لي في الخلية Name ارجوا التوضيح وجزاكم الله خير رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 5, 2012 الكاتب مشاركة قام بنشر ديسمبر 5, 2012 الأخوان الأعزاء مزيدا من التوضيح أرفق الجدول مع شرح المطلوب جمع الخلايا الملونة.pdf 1 رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 5, 2012 الكاتب مشاركة قام بنشر ديسمبر 5, 2012 أشكركم يا أساتذة الأكسل على مساعدتي في جمع الخلايا الملونة وقد كتبت الدالة يدويا فجائت معي name في الخلية وبعدها حاولت أستعمله من الدالات فجائت معي وهي دالة kh_sumcellcolor وأشكركم جميعا وباقي في قائمة ارقام القطع في حالة احصاء الارقام الملونة كيف ؟ رابط هذا التعليق شارك More sharing options...
أبو حنــــين قام بنشر ديسمبر 5, 2012 مشاركة قام بنشر ديسمبر 5, 2012 جرب المرفق جمع الخلايا الملونة.rar رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 5, 2012 الكاتب مشاركة قام بنشر ديسمبر 5, 2012 الأخ / أبو حنين السلام عليكم أرجوا أن تكتب لي الصيغة لأنها ماتبين معاي في الخلايا التي جمعت فيها النواتج صحيحة بس الصيغ التي استعملتها مش مبينة أرجوا كتابتها تحت خلايا الجمع وشكراً رابط هذا التعليق شارك More sharing options...
أبو حنــــين قام بنشر ديسمبر 5, 2012 مشاركة قام بنشر ديسمبر 5, 2012 أنظر الصورة أخي 2.rar رابط هذا التعليق شارك More sharing options...
محمد بن عبيد ( عاشق عدن ) قام بنشر ديسمبر 5, 2012 الكاتب مشاركة قام بنشر ديسمبر 5, 2012 للأسف يا أخوان ماضبطت معايا انا عارف ان المشكلة مني مافهمت كيف الطريقة ولكن اشكركم على كل شئ رابط هذا التعليق شارك More sharing options...
الـعيدروس قام بنشر ديسمبر 5, 2012 مشاركة قام بنشر ديسمبر 5, 2012 السلام عليكم تفضل جمع الخلايا الملونة_A.rar رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
من فضلك سجل دخول لتتمكن من التعليق
ستتمكن من اضافه تعليقات بعد التسجيل
سجل دخولك الان