hasdan قام بنشر أكتوبر 31, 2012 مشاركة قام بنشر أكتوبر 31, 2012 (معدل) الشرح في المرفق ولكم جزيل الشكر Book4.rar تم تعديل أكتوبر 31, 2012 بواسطه hasdan رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر أكتوبر 31, 2012 مشاركة قام بنشر أكتوبر 31, 2012 أخي العزيز/ hasdan طلبك غير واضح ما المعطيات في العمودين ( d ) و ( E) فضلا شيء من التوضيح بشكل مفصل والعفو رابط هذا التعليق شارك More sharing options...
hasdan قام بنشر أكتوبر 31, 2012 الكاتب مشاركة قام بنشر أكتوبر 31, 2012 اخي العزيز الشهابي المطلوب تضليل الخلايا حسب معطيات الخلايا e و f علما بأن E بداية التاريخ و F نهاية التاريخ بمعنى اخر تضليل الخلايا المحصورة بين التاريخين وكلما تم تغيير التاريخ يتغير التضليل شكرا لك رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر أكتوبر 31, 2012 مشاركة قام بنشر أكتوبر 31, 2012 تفضل أخى تم تعديل التواريخ من والى لكى تكون متوافقة حسب طلبك Sub ragab() Application.ScreenUpdating = False LR = [E10000].End(xlUp).Row Range("G3:NH" & LR).Interior.ColorIndex = xlNone For Each cl In Range("E3:E" & LR) For Each cll In [G2:NH2] If cll >= cl And cll <= cl.Offset(0, 1) Then Cells(cl.Row, cll.Column).Interior.ColorIndex = 3 End If Next Next Application.ScreenUpdating = True End Sub Book5555.rar رابط هذا التعليق شارك More sharing options...
hasdan قام بنشر أكتوبر 31, 2012 الكاتب مشاركة قام بنشر أكتوبر 31, 2012 الاخ العزيز رجب جاويش هذا هو المطلوب تماما. هل يمكن تفيد نفس العملية تلقائيا بدون وجود زر وهل يمكن تنفيد نفس العملية من خلال Conditional Formatting تحياتي لك رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر أكتوبر 31, 2012 مشاركة قام بنشر أكتوبر 31, 2012 أخي العزيز/hasdan اعذرني أخي العزيز لعدم فهم طلبك والآن وبعد أن فهمت المطلوب وبعد اذن أستاذنا القدير ( رجب جاويش ) والذي من خلال حله بكوده الرائع فهمت المطلوب جرب هذه المعادلة في التنسيق الشرطي =IF(AND(G$2>=$E3;G$2<=$F3);TRUE;FALSE)=TRUE وهذا ملفك بعد تطبيق المعادلة عليه والعفو Book4.rar رابط هذا التعليق شارك More sharing options...
hasdan قام بنشر أكتوبر 31, 2012 الكاتب مشاركة قام بنشر أكتوبر 31, 2012 اخي العزيز الشهابي سلمت الايادي اختصرت عليّ الكثير فألف شكرا لك رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر أكتوبر 31, 2012 مشاركة قام بنشر أكتوبر 31, 2012 أخى الحبيب / الشهابى شكرا جزيلا أخى الفاضل على هذه الكلمات الرقيقة وبجد تسلم ايديك على هذه المعادلة الجميلة التى أوجزت فأنجزت تقبل أرق وأجمل تحياتى رابط هذا التعليق شارك More sharing options...
رجب جاويش قام بنشر نوفمبر 1, 2012 مشاركة قام بنشر نوفمبر 1, 2012 أخى الفاضل / الشهابى لإثراء الموضوع يمكن اختصار المعادلة السابقة الى الصورة التالية =AND(G$2>=$E3;G$2<=$F3) Book4.rar رابط هذا التعليق شارك More sharing options...
الشهابي قام بنشر نوفمبر 1, 2012 مشاركة قام بنشر نوفمبر 1, 2012 أستاذي العزيز/ رجب جاويش أخى الفاضل / الشهابى لإثراء الموضوع يمكن اختصار المعادلة السابقة الى الصورة التالية =AND(G$2>=$E3;G$2<=$F3) بصراحة سلمت أيديكم أنتم يا أستاذ أختصرت المعادلة وأستفدنا درس وفائدة كبيرة وهي أنه يمكن الاستغناء عن دالة IF جزاكم الله خير وبارك فيكم وحقظكم الله من كل مكروه تقبل تحياتي تلميذكم الشهابي رابط هذا التعليق شارك More sharing options...
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.