أبو. مشاري قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 السلام عليكم ورحمة الله وبركاته عندي ملف اكسل عبارة عن ملف لمتابعة المعاملات الواردة . المطلوب : حاب أضع تاريخ لمتابعة المعاملات بحيث لا تتعدى 14 يوم للرد على المعاملة وإذا تأخر الموعد عن المدة المفترضة تضيء في خانة " تاريخ الرد " علامة حمراء ويذكر في الخانة عدد الأيام التي تأخرت فيها المعاملة يعني مثلا " 15 أو 16 .. إلخ ،وإذا تم الرد ادخل تاريخ الرد وطبعا لا تظهر علامة حمراء في خانة تاريخ الرد " . والله يحفظكم يرعاكم مرفق مثال مثال.rar
adam13 قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 أخى السلام عليكم أتمنى أن يكون هذا ماتريد مثال.rar
أبو. مشاري قام بنشر سبتمبر 1, 2009 الكاتب قام بنشر سبتمبر 1, 2009 اخي العزيز بارك الله فيك ولكن عندما تحميل المثال يفتح لي صفحة الموقع كيف طريقة التحميل الصحيحة باركا الله فيك
adam13 قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 أخى إضغط على كلمة مثال وسوف يقوم الملف بالتحميل
أبو. مشاري قام بنشر سبتمبر 1, 2009 الكاتب قام بنشر سبتمبر 1, 2009 اخي العزيز شكرا على مساعدتك ولكن انت اضفت خانة الفرق بين تاريخ المعاملة والرد وانا لا اريد ان اضيفها فقط اريد في خانة تاريخ الرد بان تضيىء باللون الاحمر في حال عدم الرد وعند ادخال تاريخ للرد لا تضيىء شاكر لك حسن تعاونك معي
adam13 قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 أخى لو لاحظت فلو زاد الفارق بين تاريخ الرد عن 14 يوم تضئ الخلية باللون الاحمر لكن يصعب دمج العمودين b,c فى عامود واحد لأن المعادلة تعتمد على الفارق بين التاريخين وأحدهما يتم إدخالة يدويا
أبو. مشاري قام بنشر سبتمبر 1, 2009 الكاتب قام بنشر سبتمبر 1, 2009 شكرا لك اخي لكن ربما ياتي احد ويحل المشكلة هذي
عبدالله باقشير قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 السلام عليكم الفرق يتم ايجادة بين تاريخ اليوم وتاريخ المعادلة استخدم المعادلة التالية للخلايا في العمود b كتنسيق شرطي =AND(ISBLANK(B2);TODAY()-A2>14) مثال.rar
يحيى حسين قام بنشر سبتمبر 1, 2009 قام بنشر سبتمبر 1, 2009 اخي ابو مشاري جرب المرفق و هو عبارة عن كود يتفعل عند فتح الملف Justice_.rar
أبو. مشاري قام بنشر سبتمبر 1, 2009 الكاتب قام بنشر سبتمبر 1, 2009 اخي العزيز شكرا على تجاوبك معي بس الملف لم اغير التاريخ يبقى نفس عدد الايام ما يتغير رغم اني حفظته وفتحته مره ثانية بس للاسف نفس الشي ماهي المشكلة؟
أبو. مشاري قام بنشر سبتمبر 2, 2009 الكاتب قام بنشر سبتمبر 2, 2009 اخي العزيز Justice الفكره اعجبتني جدا ارجوك اشرح طريقه عملها للاهمية ارجوك والله يوفقك في دراستك
يحيى حسين قام بنشر سبتمبر 2, 2009 قام بنشر سبتمبر 2, 2009 أخي أبو مشاري الملف يحتوي على الكود التالي Private Sub Workbook_Open() Dim MyCell As Range For Each MyCell In Sheets("æÑÞÉ1").Range("A2:A1000") If IsEmpty(MyCell) Then Exit Sub If MyCell.Value < Date - 14 Then MyCell.Offset(0, 1).Font.Bold = True MyCell.Offset(0, 1).Interior.ColorIndex = 3 MyCell.Offset(0, 1).Value = "ÚÏÏ ÇáÇíÇã ááãÚÇãáÉ åæ " & Date - MyCell End If Next MyCell End Sub و فكرة الكود انه عند فتح الملف يتفعل هذا الكود حيث يقوم بالبحث عن جميع الخلايا في المدى الذي عرفناه من Range("A2:A1000") فاذا كان التاريخ في المدى اقل من 14 يوم حسب طلبك طبعاً يقوم بتلوين الخلية المجاورة و وضع العبارة " عدد أيام المعاملة هو " و يقوم بعملية ربط بينها و بين الفرق بالايام
أبو. مشاري قام بنشر سبتمبر 2, 2009 الكاتب قام بنشر سبتمبر 2, 2009 (معدل) بارك الله فيك ياخي العزيز ونفع بك لكن هنالك مشكلة لنفرض بان تم الرد على الخطاب ووضعت تاريخ الرد كيف نعدل الكود لكي لا يضع عدد الايام للمعاملة ولا يضىء لون احمر ؟؟؟ واسف على الاطالة كما ارجوا ارسال ايميلك لكي اتواصل معك بشكل اكبر اللهم في هذه الساعة المباركة بان يوفقك في دينك ودنياك تم تعديل سبتمبر 3, 2009 بواسطه أبو. مشاري
يحيى حسين قام بنشر سبتمبر 3, 2009 قام بنشر سبتمبر 3, 2009 أخي ابو مشاري لقد ارسلت لك على الايميل ملف يحتوي طلبك حسب ما فهمت من ايميلك و لكني هنا من مشاركتك فهمت شيء أخر و عدلت الملف حسب طلبك بحيث انه اذا تم التعديل على التاريخ في المدى الرئيسي و كان تاريخ التعديل ضمن 14 يوم يقوم الاكسيل بحذف اللون الاحمر و العبارة المرفقة معه Justice_1.rar
أبو. مشاري قام بنشر سبتمبر 3, 2009 الكاتب قام بنشر سبتمبر 3, 2009 مرحبا اخي لا ابدا تاريخ المعاملة لا يتغير ابدا وانما هنالك خانه اخرى يوضع بهاتاريخ الرد هي ما اريد ان يجري عليها العمليات السابقة واسف على ازعاجك
أبو. مشاري قام بنشر سبتمبر 4, 2009 الكاتب قام بنشر سبتمبر 4, 2009 اخي الحبيب مثالك الخاص بالتنسيق الشرطي ممتاز جدا ولكن ينقصه لو نضع عبارة عدد ايام التاخير لكن اكتملت الصورة بشكل ممتاز ولدي سؤال هل يقبل التنسيق الشرطي التاريخ الهجري ؟
اوفيس 2003 قام بنشر سبتمبر 6, 2009 قام بنشر سبتمبر 6, 2009 لو تكرمتم اخي الغالي adam13 انا اريد تعديل على شرحك الله يبارك فيك كما في المثال التالي او اي احد من الإخوة الأعضاء في انتظار الحل
adam13 قام بنشر سبتمبر 6, 2009 قام بنشر سبتمبر 6, 2009 أخى العزيز office 2003 ليت هذا ماتريده qus.rar
اوفيس 2003 قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 بارك الله فيك اخي adam13 وياليت كما طلبت منك توضيح كيفية التلوين اخي الغالي اسف لإزعاجك
اوفيس 2003 قام بنشر سبتمبر 7, 2009 قام بنشر سبتمبر 7, 2009 جزاك الله كل خيــــــــــر وصلت والحمد لله
الردود الموصى بها
Join the conversation
You can post now and register later. If you have an account, sign in now to post with your account.