بن علية حاجي

السلام عليكم ورحمة الله أخي الكريم هذه المرة لم أفهم المطلوب بالضبط وأود أن أقدم هذه المحاولة ... أخوك بن علية Zeina_Farm2011.rar

السلام عليكم ورحمة الله أخي الكريم، غالي والطلب رخيص، يمكنك تبديل المعادلة في الخلية L2 : =E2 - F2 بالمعادلة =IF(E2-F2<0;"تجاوزت العدد المسموح به";E2-F2) أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، عمل جميل ولكن المعادلة التي كتبتهاطويلة بعض الشيء، وقد قمت بتبسيطها وإضافة معادلة أخرى أبسط منها في العمود المجاور... وأريد أن أسأل أخي الكريم ما هو الهدف من الإضافات الأخيرة للملف؟؟ الإضافات والتغييرات التي قمت بها تجدها في الملف المرفق... أخوك بن علية تغير العلامة بين اخر تعديل.rar

السلام عليكم ورحمة الله أخي الكريم إذا كان عدد وارتفاع الأسطر (مملوءة وغير مملوءة) في كل صفحة ثابتين يمكن كتابة كود بسيط يضع في خلية من آخر سطر من كل صفحة مجموع العمود E ثم يقوم بطبع هذه الصفحات (وإذا أردت جعلناه يمسح هذه المجاميع بعد عملية الطبع)... وإذا كان عدد أو ارتفاع الأسطر مختلفا من صفحة لأخرى فلا حيلة لي... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم إن عملية التوزيع صعبة والحل الذي أراه ناجعاهو استحداث دالة جديدة تقوم بهذه العملية، وأقدم لك هذه المحاولة باستعمال الدالة RAND والمشكل الوحيد أن التوزيع يتم تقائيا بالضغط على الزر الذي وضعته ويتم أيضا بالقيام بأي تغيير على خلايا الورقتين أو بالضغط على مفتاح F9 أو عند فتح الملف... المهم هي محاولة وننتظر إخواننا للجود بما عندهم... أخوك بن علية توزيع الموجهين على المدارس.rar

السلام عليكم ورحمة الله أخي الكريم لا أعتقد أن هذا المطلوب من خصائص إكسيل (باعتبار أن عدد الأسطر في كل صفحة يتعلق بتنسيق الصفحة وهوامشها وارتفاع الأسطر فيها...) ولكن يمكنك إضافة هذا المجموع بطريقة يدوية (معادلات) أو تلقائية (كود) في آخر سطر من كل صفحة بعد كل التنسيقات... والله أعلم

السلام عليكم ورحمة الله أخي الكريم، أتمنى أني قد فهمت المطلوب ومحاولتي في الملف المرفق (بعد إضافة وتغيير بعض المعادلات في الجدول).... أخوك بن علية تزهير وتقطيع.rar

السلام عليكم ورحمة الله أخي الكريم، تم تصحيح بعض الخطأ(تمديد نطاق المسح) والاستغناء عن الخلية K1 في الكود... ألق نظرة على الملف المرفق... أخوك بن علية التعداد والقوائم 2010-2011.rar

السلام عليكم ورحمة الله أخي الكريم أهلا بك من جديد بيننا وبين إخوانك... قمت ببعض التغييرات على كود الترحيل وأضفت معادلة تضع عدد تلاميذ القسم في الخلية K1 (مخفية تحت زر الطباعة) للضرورة... أرجو أن يكون التغيير مناسبا للمطلوب... أخوك بن علية التعداد والقوائم 2010-2011.rar

السلام عليكم ورحمة الله أخي الكريم، الآن أصبح الأمر والمطلوب جليا، ما عليك إلا وضع رقم الشهر لنصف السنة ولنهاية السنة ولما يصل الشهر المعني تتغير العلامات تلقائيا حسب المطلوب (ويبقى الجدول فارغا في حالة عدم وضع أرقام للأشهر أو لم يصل الشهر إلى الرقم المعين في الخليتين الملونتين)... يمكن ربط العلامات بفترة بين تاريخين من بداية السنة إلى نصف السنة ثم من نصف السنة إلى نهايتها، والعلامات حين تتغير تبقى ظاهرة طيلة تلك الفترة... والله أعلم تغير العلامة بين المواد_4.rar

السلام عليكم ورحمة الله أخي الكريم جلال الشرح غير مفهوم في كلا الردين، أود أن تضع جدولين متقابلين في الأول تضع العلامات عند المواد المراد إجراؤها في نصف السنة وفي الجدول الآخر العلامات عند المواد المراد إجراؤها في نهاية السنة لعله يكون الفهم أسهل وسيتم المطلوب بإذن الله... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم أهلا وسهلا بك بيننا في هذا الصرح الأخوي العائلي الكبير.... بالنسبة لمسألة JUSTIFY في الإكسيل فهي موجودة ولكنها ليست مثل التي في الوورد، لا يتم تمديد الحروف فيه بل هي تعمل بتمديد الكلمات كاملة فمثلا لو طبقت الخاصية على خلية تحوي كلمتين يتم وضع الأولى في تمام اليمين والأخرى في تماما اليسار ولو كانت الخلية تحوي ثلاث كلمات أو أكثر يتم توزيعها (الكلمات) عمواديا في الخلية بمسافات متساوية... والله اعلم ملاحظة: حتى تعمل هذه الخاصية يجب أن نضغط على ALT+Enter في نهاية مضمون الخلية (لفتح سطر جديد) أو أن يكون مضمون الخلية أكبر من عرضها ليُفتح سطر جديد... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، في الحقيقة لم أفهم المطلوب جيدا ولكني أقدم المحاولة التالية، في الملف المرفق نقوم بوضع رقمي شهري نصف السنة ونهاية السنة في الخانات الملونة وسيتم الطلوب... أخوك بن علية تغير العلامة بين المواد.rar

وعليكم السلام ورحمة الله أخي الكريم وهل هناك شرح غير الذي قدمته لقد وفيت وتكرمت في شرحه... والله أعلم أخوك بن علية

السلام عليكم ورحمة الله أستسمح أخي العزيز طارق وإضافة إلى إلى حله أقدم إليك أخي الكريم الملف المرفق به المطلوب وقد أضفت في العمود A من ورقة DATA معادلة تسجل ترتيبا تصاعديا للأسطر التي تاريخ التحميل فيها ينتمي إلى الفترة المطلوبة (وقد لونتها بالأصفر) ويمكنك إخفاء هذا العمود أو تلوين مضامينه بلا لون ولا تنسى عند تمديد الجدول يجب تمديد هذه المعادلات معه... وفي الورقة REPORT قمت باستعمال الدالتين INDEX و MATCH لاستعدعاء البيانات التي تتوفر فيها الشروط المطلوبة (تاريخ تحويلها من الفترة المعينة في الخليتين I3 و G3)... إلقاء نظرة على الملف المرفق تغني عن كل شرح... أخوك بن علية SALES3.rar

السلام عليكم ورحمة الله أخي الكريم إن الشرح غير مستوف حقه... الفترة التي تريدها (من ...... إلى ......) هل هي في تاريخ التحميل أم في تاريخ التنزيل؟؟؟ أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم والله أنت لا تزعجني البتة وأبقى معك حتى تجد حلا لمشكلتك حتى ولو من طرف إخوتنا الكرام... قمت ببعض التغييرات على المعادلات التي تقوم بحساب فروق التاريخين وإن شاء الله هذه المرة يُستوفى المطلوب إن لم تجد أخطاء أخرى.... أخوك بن علية الوضعية5.rar

السلام عليكم ورحمة الله أخي الكريم إن الخلل في كتابة التوقيت عندك مثلا : ص 10:00 أكتبها بطريقة عادية أي 10:00 وإذا كنت تقصد العاشرة ليلا فاكتبها 22:00 وإذا أردت أن يظهر حرف "م" أو "ص" في الخلية فاختر التنسيق hh:mm AM/PM على الخلية ولكن طريقة حجز التوقيت يبقى باطريقة العادية 10:00 أو 13:30 أو غيرها ولا تحجز حرفي "م" و "ص"... وإن شاء الله تعمل المعادلات بطريقة عادية... أنظر المرفق أخوك بن علية الوضعية3.rar

السلام عليكم ورحمة الله أخي الكريم وضعت في الملف المرفق معادلات طويلة بعض الشيء لا هي ممتازة ولا هي سيئة ولكنها تفي بالغرض... أخوك بن علية الوضعية.rar

السلام عليكم ورحمة الله أخي الكريم أقدم لك هذا الملف به كود يفي بالمطلوب ولكن يمكن أن تجد (من إخواني الكرام) كودا أحسن منه... والكود يقوم بحذف خلايا الأعمدة من B إلى D فقط، ويمكنك تغييره لحذف كل السطر بتبديل السطر التالي من الكود: Range(Cells(cellule.Row, 2), Cells(cellule.Row, 4)).Delete Shift:=xlUp بالسطر: cellule.EntireRow.Delete Shift:=xlUp والكود يتم تنفيذه بالنقر المزدوج في أي مكان من الورقة... والله أعلم أخوك بن علية abc_1.rar

السلام عليكم ورحمة الله أخي الكريم أبعث لك الكود في الملف وهو يعنل جيدا بالتغييرات التي قمت بها... أخوك بن علية MacroLesson.rar

السلام عليكم ورحمة الله أخي الكريم، إن هذا الخطأ حصل لأن الكود يقوم بغلق الملف ComleteMacro.xls وهو غير موجود (غير مفتوح)... إحذف هذا الجزء من الكود (ثلاثة أسطر) وإن شاء الله سيعمل الكود جيدا... أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم، أعتقد أن الخلل في الكود هو في الجزء التالي: If Project = vbYes Then Sheets("Welcome").Select Worksheets("Welcome").ScrollArea = "a1:a1" Workbooks(ThisWorkbook.MacroLesson.xls).Close End If End Sub وتصحيحه حسب رأيي يكون كما يلي If Project = vbYes Then Sheets("Welcome").Select Worksheets("Welcome").ScrollArea = "a1:a1" Else Workbooks("MacroLesson.xls").Close End If End Sub أنظر السطرين الرابع والخامس من هذا الجزء... والله أعلم

السلام عليكم ورحمة الله أخي الكريم، أعتقد أني فهمت من المطلوب (وقد اقتربت من هذا المفهوم في الملف المرفق السابق والخلل أني لم أحسب الحالات التي يكون فيها عدد الأيام متساو) وقد صححتها في الملف المرفق التالي (وأتمنى أن يكون هذا هو المطلوب فعلا): 1_2.rar أخوك بن علية

السلام عليكم ورحمة الله أخي الكريم لم أفهم المطلوب بالضبط... هل تريد أن نضع معادلة في خلايا العمود H تحسب مجموع الخلايا في السطر نفسه في خلايا الأعمدة من C إلى F ولكن مقارنة مع ماذا ؟؟ (أتقصد مقارنة رؤوس هذه الأعمدة مع خلية العمود G؟؟؟) وكيف تكون هذه المقارنة (أكبر أو أصغر من ماذا؟؟؟)؟ وقد قمت باجتهاد على الملف حسب ما أعتقده في الملف المرفق... أخوك بن علية 1_1.rar