رفيع سعد قام بنشر أكتوبر 8, 2016 قام بنشر أكتوبر 8, 2016 الاساتذة الاقاضل مشرفيين واعضاء المنتدى سلام اللة عليكم ورحمتة وبركاتة طبتم وطاب مسائكم ارجو القاء نظرة على الملف المرفق ان امكن واكون شاكر لكم s s.rar
ياسر العربى قام بنشر أكتوبر 8, 2016 قام بنشر أكتوبر 8, 2016 محتاج انت تبص على الملف الرائع دا في كل الاحتمالات ضرب قسمه طرح جمع كله ويطبق على اكثر من شيت لو في ارقام في شيتات تانية كمان ولكن لو كمية البيانات كثيرة الاحتمالات هتكتر المعالجة تصبح بطيئة ولكن لدي ملف بالمصفوفات ولكن هيطلع لك النتائج بدون اماكنها اما هذا الملف فممكن تضيف عنوان الشيت اللي فيه الارقام واسماء الخلايا حتي ممكن نضيف رابط لكل خليه جرب الملف وبلغنى رأيك وشكرا YASSER_Elaraby_4.rar
رفيع سعد قام بنشر أكتوبر 8, 2016 الكاتب قام بنشر أكتوبر 8, 2016 بسم اللة الرحمن الرحيم استاذى العزيز ياسر العربى اولا اسف على التاخير فى الرد لانى سبت الجهاز شوية لكن الملف بتاع حضرتك بعيد عن المطلوب وللتوضيح انا عندى الرقم الموجود فى الخلية a 2 دة رقم اساسى ومتغير ممكن يكون 12 أو اى رقم تانى انا عايز اى رقميين فى الخلايا كلها مجموعهم يساوى هذا الرقم انهم يخدو اى علامة وممكن رقم واحد يوافق فى الجمع مع اكتر من خلية وارجو ان اكون عرفت اوضح المطلوب
ياسر العربى قام بنشر أكتوبر 8, 2016 قام بنشر أكتوبر 8, 2016 تفضل بس الملف كدا فيه ارقام كتير متشابهه عشان كدا هتلاقي الوان تراكمت فوق بعض صغر نطاق الارقام وانت تتأكد من عمل الملف YASSER.rar
أبو حنــــين قام بنشر أكتوبر 8, 2016 قام بنشر أكتوبر 8, 2016 مرحبا تقريا نفس الكود الذي وضعه اخي ياسر Sub ColorRange() Application.ScreenUpdating = False Dim c1 As Range, c2 As Range Range("b3:i16").Interior.ColorIndex = xlNone: Range("b3:i16").Font.ColorIndex = 1 For Each c1 In Range("b3:i16"): For Each c2 In Range("b3:i16") If Val(c1.Value) + Val(c2.Value) = Range("a2").Value Then x = Int(Rnd * 55) c1.Interior.ColorIndex = Val(x): c2.Interior.ColorIndex = Val(x) End If If c1.Value = Range("a2").Value Then c1.Font.ColorIndex = 46 If c2.Value = Range("a2").Value Then c2.Font.ColorIndex = 46 Next Next Application.ScreenUpdating = True End Sub 2
ياسر العربى قام بنشر أكتوبر 8, 2016 قام بنشر أكتوبر 8, 2016 مشكور اخي ابو حنين على الكود احب ان اوضح للاخ الكريم رفيع ان اول اجابة ليا عندما طلب احد الاخوة ا لكرام احتمالات العمليات الحسابية وضعت له مثال كما طلبت انت وبالالوان ولكن مع كثرة الاحتمالات تصبح الالوان بلا قيمة وانصح بالملف الاول فهو احترافي نوعا ما ولدي اسرع منه ولكن هذا يفي بالغرض فيأتي لك بكل احتمالات العمليات الحسابية من جمع وضرب وطرح وقسمة وفي كل شيتات المصنف ويضع النتائج في شيت مستقل وبه عنوان الخلايا واسم الشيت وطبعا انت ادرى بطلبك لعل الالوان تفى بالغرض معك تقبلوا تحياتي 1
رفيع سعد قام بنشر أكتوبر 9, 2016 الكاتب قام بنشر أكتوبر 9, 2016 (معدل) 6 ساعات مضت, ياسر العربى said: مشكور اخي ابو حنين على الكود احب ان اوضح للاخ الكريم رفيع ان اول اجابة ليا عندما طلب احد الاخوة ا لكرام احتمالات العمليات الحسابية وضعت له مثال كما طلبت انت وبالالوان ولكن مع كثرة الاحتمالات تصبح الالوان بلا قيمة وانصح بالملف الاول فهو احترافي نوعا ما ولدي اسرع منه ولكن هذا يفي بالغرض فيأتي لك بكل احتمالات العمليات الحسابية من جمع وضرب وطرح وقسمة وفي كل شيتات المصنف ويضع النتائج في شيت مستقل وبه عنوان الخلايا واسم الشيت وطبعا انت ادرى بطلبك لعل الالوان تفى بالغرض معك تقبلوا تحياتي بسم اللة الرحمن الرحيم استاذى العزيز ياسر العربى اولا حضرتك لك عندى اسفين وشكر واستفسار الاسف الاول على التاخير فى الرد الاسف الثانى لانى لم اطلع على الملف بتاع حضرتك واستعجلت فى الرد وهو فعلا يفى بالغرض وزيادة والشكر لان حضرتك لبيت طلبى بنفس المطلوب فاصبح عندى ملفين تمام التمام اما الاستفسارممكن حضرتك تشرح الكود ولك منى كل الشكر والتقدبر والشكر موصول للاستاذ ابو حنين وكل اعضاء ومشرفيين المنتدى تم تعديل أكتوبر 9, 2016 بواسطه رفيع سعد
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.