بلال العجوري قام بنشر أغسطس 23, 2018 مشاركة قام بنشر أغسطس 23, 2018 السلام عليكم هذه اول مشاركة لي في هذا المنتدى العظيم اود مشاركتكم بكشف حضور وغياب لطلاب المدرسة بشكل يومي وشهري وسنوي مع احصائيات سنوية وشهرية ما زال الملف بحاجة الى بعض التعديلات البسيطة ومن لديه الخبرة في الاكسل يا ريت اذا في اقتراحات لديكم على الملف تقوموا بطرحها لتطوير الملف حتى تعم الفائدة الملف مكون من عدة صفحات الصفحة الاولى يتم تسجيل اسماء الطلاب فيها ويتم استيرادها في باقي الصفحات الشهرية بشكل تلقائي وباقي الصفحات خاصة لكل شهر بشهره الصفحة الاخيرة المجموع السنوي لكل طالب ونسبة الغياب والحضور وشكرا لكم تحياتي كشف الحضور والغياب.rar 1 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 23, 2018 مشاركة قام بنشر أغسطس 23, 2018 ملف جيد و الى الامام لكن ارجو تقبل بعض الملاحظات: 1- لا ضرورة لتحميل ملف كبير بهذا الشكل يكفي ملف صغير مختصر 20 الى 30 صف (نموذج ) والذي يريد اضافة معلومات يكون الامر متاحاً له 2- لا ضرورى لادراج التواريخ يدوياً في كل صفحة من صفحات الشهور (يكفي عمل نسخات (12 نسخة) عن الورقة Salim من هذا الملف واختيار الشهر والسنة و بوم العطلة في كل نسخة) ثم تسمية هذه الصفحات باسماء الشهور اذا اردت ليقوم اكسل بادراج التواريخ ألياً (كما في الصفحة Salim) مع حساب الشهر 28و29و30 أو 31 و تاوين يوم العطلة كما تحدده في الخلية A3 3 -هذه الورقة صالحة لكل الاعوام الدراسية (يكفي تغيير السنة فقط من الخلية A1) في كل صفحة من صفحات الشهور الملف (كنموذج) مرفق كشف Salim.xlsm 2 1 رابط هذا التعليق شارك More sharing options...
محمد قاسم 12 قام بنشر أغسطس 23, 2018 مشاركة قام بنشر أغسطس 23, 2018 6 ساعات مضت, بلال العجوري said: السلام عليكم هذه اول مشاركة لي في هذا المنتدى العظيم اود مشاركتكم بكشف حضور وغياب لطلاب المدرسة بشكل يومي وشهري وسنوي مع احصائيات سنوية وشهرية ما زال الملف بحاجة الى بعض التعديلات البسيطة ومن لديه الخبرة في الاكسل يا ريت اذا في اقتراحات لديكم على الملف تقوموا بطرحها لتطوير الملف حتى تعم الفائدة الملف مكون من عدة صفحات الصفحة الاولى يتم تسجيل اسماء الطلاب فيها ويتم استيرادها في باقي الصفحات الشهرية بشكل تلقائي وباقي الصفحات خاصة لكل شهر بشهره الصفحة الاخيرة المجموع السنوي لكل طالب ونسبة الغياب والحضور وشكرا لكم تحياتي كشف الحضور والغياب.rar بارك الله فيك عمل موفق ان شاء الله والى الامام دائماا 3 ساعات مضت, سليم حاصبيا said: الملف (كنموذج) مرفق كشف Salim.xlsm بارك الله فيك استاذى الجليل هل من شرح مبسط لطريقة عمل التنسيق الشرى بالملف هل يمكن عند الدبل كليك فوق الخليك يتم ادرع حرف غـ تلقائيا فى نفس الخلية بارك الله فيك 1 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 13 ساعات مضت, محمد قاسم 12 said: بارك الله فيك عمل موفق ان شاء الله والى الامام دائماا بارك الله فيك استاذى الجليل هل من شرح مبسط لطريقة عمل التنسيق الشرى بالملف هل يمكن عند الدبل كليك فوق الخليك يتم ادرع حرف غـ تلقائيا فى نفس الخلية بارك الله فيك ممكن ذلك شاهد هذا الملف (العملية تتم عند كبسة اليمين وليس دوبل كليك في نطاق محدد ) كله قابل للتغيير حسب المطلوب Right_Click.xlsm 3 1 رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 السلام عليكم تم التعديل على ملف أخي سليم بإضافة كل الشهور في شيت واحد مع إضافة كود لإظهار الشهر المعني فقط وهذا لأجل الإحصائيات السنوية... يمكن إضافة التعديلات الأخرى الجديدة على هذا الملف... بالنسبة لأيام العطل الأخرى (غير عطلة نهاية الأسبوع) يكفي أن لا نسجل فيها الغيابات... والله أعلم أرجو أن تسهل هذه التعديلات العمل على الملف... أخوكم بن علية كشف hben.xlsm 5 1 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 2 ساعات مضت, بن علية حاجي said: السلام عليكم تم التعديل على ملف أخي سليم بإضافة كل الشهور في شيت واحد مع إضافة كود لإظهار الشهر المعني فقط وهذا لأجل الإحصائيات السنوية... يمكن إضافة التعديلات الأخرى الجديدة على هذا الملف... بالنسبة لأيام العطل الأخرى (غير عطلة نهاية الأسبوع) يكفي أن لا نسجل فيها الغيابات... والله أعلم أرجو أن تسهل هذه التعديلات العمل على الملف... أخوكم بن علية كشف hben.xlsm اكثر من رائع احي بن علية\ بقي شيء واحد يجب اتمامه وهو حماية الخلايا غير الفارغة من الشيت المذكور لعدم التلاعب بالنتائج من قبل الفضوليين (اذ يجوز ان يقوم اجدهم بحذف الغياب لنفسه او لأحد اخر) او يمكن ان يتم ذلك عن طريق خطا غير مقصود من قبل المستخدم يمكن الاستعانة بالكود في مشاركتي على هذا العنوان https://www.officena.net/ib/topic/84508-حماية-الخلايا-غير-الفارغة-بواسطة-باسوورد/ 1 2 رابط هذا التعليق شارك More sharing options...
بلال العجوري قام بنشر أغسطس 24, 2018 الكاتب مشاركة قام بنشر أغسطس 24, 2018 (معدل) مشكورين جدا على مروركم الرائع والاضافات والتعديلات والاقتراحات التي قمتم بطرحها لكن لدي استفسار حول كيفية امكانية اضافة عطلة معينة مثل عطلة العيد فقط ليتم حذفها من مجموع الدوام السنوي ومجموع الدوام في ايام الشهر الذي تمر بها مثل هذه العطل ولدي استفسار عندما قمت بتحميل الملفات المرفقة بعد تعديلاتكم على جهازي يعطيني اشارة علامة تعجب على ايقونة الملف لماذا ؟ انا استخدم اوفيس 2016 وشكرا للجميع تم تعديل أغسطس 24, 2018 بواسطه بلال العجوري اضافة ملاحظة رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 اشارة التعجب هذه تدل على ان الملف يحتوي على ماكرو هذا كل ما فيه رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 2 ساعات مضت, بلال العجوري said: لدي استفسار حول كيفية امكانية اضافة عطلة معينة مثل عطلة العيد فقط ليتم حذفها من مجموع الدوام السنوي ومجموع الدوام في ايام الشهر الذي تمر بها مثل هذه العطل تم اضافة الاعياد والعطل القسرية الى الملف (يجب ادراج تاريخها في العامود AZ ابتداءً من الصف الثاني) كشف Salim A3yad.xlsm رابط هذا التعليق شارك More sharing options...
بلال العجوري قام بنشر أغسطس 24, 2018 الكاتب مشاركة قام بنشر أغسطس 24, 2018 شكرا لك اخي سليم حاصبيا على تفاعلك ولكن كيف يتم انقاص ايام عطل الاعياد من عدد ايام الدوام الفعلي لكل شهر تمر به عطلة ممثالة بمعني انك اضفت اربعة ايام عطلة للعيد ولم يتم تنقيصها من مجموع ايام الدوام في الشهر او السنة رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 تم معالجة الامر و لكن عدد ايام العمل تم ادراجه في الخلية B5 لعدم اخفاءه في حال وقع تحت عامود مخفي بالنسبة للتورايخ يمكن ادراج كل العطل خلال العام كاملاً و اكسل يقوم بادراجها حسب الشهر المناسب واذا حدث يوم تعطيل قسري يمكن اضافتة ابضاً العمل ضمن النطاق AZ100 : AZ2 كشف Salim A3yad1.xlsm رابط هذا التعليق شارك More sharing options...
بلال العجوري قام بنشر أغسطس 24, 2018 الكاتب مشاركة قام بنشر أغسطس 24, 2018 شكرا كثير لك اخي وهل يمكن ان تعطيني الدوال التي استخدمتها في حساب ايام العطل وما هي التعديلات التي قمت بعملها في جوهر الملف حتى يتم الاستفادة منها 1 رابط هذا التعليق شارك More sharing options...
بن علية حاجي قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 السلام عليكم وهذا حل آخر للمطلوب الجديد حيث تم التعديل على الملف مرة أخرى... أولا تم ترتيب الشهور بداية من الشهر 8 إلى 12 للعام الأول (2018) ثم من الشهر 01 إلى الشهر 07 للعام الثاني (2019) مع تعديل كل المعادلات للتتناسب مع هذه التغييرات... وثانيا فيما يخص العطل الأخرى خلال العام الدراسي يمكن إضافة تواريخها في العمود A بداية من الخلية A16 وستدرج في الجدول تلقائيا مع تنسيق شرطي (التلوين بالأزرق لأعمدتها حسب كل شهر) ولا يهم ترتيبها... تم إضافة كود أخي الكريم سليم الذي يخص "كليك يمين" حسب ملاحظاته... أرجو أن تفي الغرض المطلوب. أخوكم بن علية كشف _hben.xlsm 1 رابط هذا التعليق شارك More sharing options...
سليم حاصبيا قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 ورد خطأ بسيط في الملف السابق ارجو المعذرة اليك الكود الصحيح مع الملف المرفق الكود Option Explicit Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Or Target.Address = "$A$2" Then With Application .ScreenUpdating = False .EnableEvents = False End With Dim i%, t%, y% Dim eom As Date eom = Evaluate("EOMONTH(DATE($A$1,$A$2,1),0)") y = Day(eom) Columns("G:ak").Hidden = False ' hid_Vacance For i = 35 To 37 If Cells(14, i) = vbNullString Then Cells(1, i).EntireColumn.Hidden = True End If Next hid_Vacance For i = 7 To 37 If Cells(15, i).Columns.Hidden = True Or Cells(15, i) = Cells(3, 1) Then t = t + 1 End If Next Cells(5, 2) = y - t End If With Application Application.ScreenUpdating = True Application.EnableEvents = True End With End Sub '=============================================== Sub hid_Vacance() Application.EnableEvents = False Dim lraz%: lraz = Cells(Rows.Count, "AZ").End(3).Row Dim match%, x%, tt% Dim yes As Boolean For tt = 2 To lraz yes = IsError(Application.match(Range("AZ" & tt), Range("g14:aK14"), 0)) If Not yes Then x = Application.match(Range("AZ" & tt), Range("g14:aK14"), 0) + 6 Cells(14, x).EntireColumn.Hidden = True End If Next Application.EnableEvents = True End Sub الملف الجديد كشف Salim A3yad2 .xlsm 1 رابط هذا التعليق شارك More sharing options...
محمد قاسم 12 قام بنشر أغسطس 24, 2018 مشاركة قام بنشر أغسطس 24, 2018 24 دقائق مضت, بن علية حاجي said: السلام عليكم وهذا حل آخر للمطلوب الجديد حيث تم التعديل على الملف مرة أخرى... أولا تم ترتيب الشهور بداية من الشهر 8 إلى 12 للعام الأول (2018) ثم من الشهر 01 إلى الشهر 07 للعام الثاني (2019) مع تعديل كل المعادلات للتتناسب مع هذه التغييرات... وثانيا فيما يخص العطل الأخرى خلال العام الدراسي يمكن إضافة تواريخها في العمود A بداية من الخلية A16 وستدرج في الجدول تلقائيا مع تنسيق شرطي (التلوين بالأزرق لأعمدتها حسب كل شهر) ولا يهم ترتيبها... تم إضافة كود أخي الكريم سليم الذي يخص "كليك يمين" حسب ملاحظاته... أرجو أن تفي الغرض المطلوب. أخوكم بن علية كشف _hben.xlsm الله عليك مبدع بجد والله جميل يمكن تطوير العمل كما يلى 1/ عمل كشوب بالطلاب المتجاوزن لعدد محدد من ايام الغياب 2/ عمل انذار للغياب اول وثان 3/ عمل قرار فصل بعد عدد معين من الايام عمل تحليل للغياب لكل فصل عمل تقرير اجمالى للغياب 1 رابط هذا التعليق شارك More sharing options...
allaoua10 قام بنشر أغسطس 26, 2018 مشاركة قام بنشر أغسطس 26, 2018 والله جميل ورائع واصل يااستاذ محمد قاسم 12 نحن ننتظر رابط هذا التعليق شارك More sharing options...
أ.علي الدجني قام بنشر أغسطس 26, 2018 مشاركة قام بنشر أغسطس 26, 2018 برنامج رائع، أبحث عن مثله لتطبيقه في مدرستنا بفلسطين.. ننتظر إبداعكم وتطويركم جزاكم الله خيراً رابط هذا التعليق شارك More sharing options...
allaoua10 قام بنشر أغسطس 26, 2018 مشاركة قام بنشر أغسطس 26, 2018 ماهي المعادلة او الكود الذي يفي بالغرض كشف _hben(1).rar رابط هذا التعليق شارك More sharing options...
مصطفى محمود مصطفى قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 16 ساعات مضت, allaoua10 said: ماهي المعادلة او الكود الذي يفي بالغرض كشف _hben(1).rar اليك الملف بعد اضافة المعادلة تحياتي كشف لمن غاب اكثر من 3.xlsm رابط هذا التعليق شارك More sharing options...
ayman42001 قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 شكرا لكم فتجت الملف وظهر عندي في الصفحة الثالثة هذا ما الحل رابط هذا التعليق شارك More sharing options...
allaoua10 قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 مشكور على المعادلة ولكن انا اريد ان ارحل 3 غيابات متتالية لكي انجز اشعار في اليوم الرابع بمعنى غاب يوم 24اوت و25 اوت و26 اوت في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ رابط هذا التعليق شارك More sharing options...
مصطفى محمود مصطفى قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 1 ساعه مضت, allaoua10 said: بمعنى غاب يوم 24اوت و25 اوت و26 اوت في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ المعادلة تعمل كما تريد خلال العام الدراسي اقصد يمكن ان يغيب الطالب يوم واحد في شهر واليوم الثاني بعد شهرين واليوم الثالث في شهر اخر بعدها يرحل الطالب الذي تجاوزت غياباته ثلاثة ايام خلال العام الواحد وليس شهريا ويمكن ان يتجاوز خلال شهر سيظهر اسمه كذلك تحياتي رابط هذا التعليق شارك More sharing options...
مصطفى محمود مصطفى قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 3 ساعات مضت, ayman42001 said: فتجت الملف وظهر عندي في الصفحة الثالثة هذا ما الحل هذه المعادلات محذوفة في ملف الاستاذ سليم جزاه الله خيرا كونها خارج الاجابة المطلوبة للاخ السائل اما هذه الورقة تجدها في ملف الاستاذ بن علية حاجي جزاه الله خيرا في الاعلى حمل الملف وستجدها تعمل عندك تحياتي لكم رابط هذا التعليق شارك More sharing options...
allaoua10 قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 بارك الله فيك بمعنى غاب يوم 24اوت و25 اوت و26 اوت في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ لاني اريد ارسال اشعار للولي بعد 3 ايام متتالية . لااريد ان يرحل التلميذ اذا غاب يومين وبعد 5 ايام مثلا غاب يوم اخر . لان التلميذ التحق سوف نقوم بالحساب مرة اخرى .وشكرا انا اريد الترحيل بهذه الطريقة 3-(today)=في هذه الحالة يرحل رابط هذا التعليق شارك More sharing options...
مصطفى محمود مصطفى قام بنشر أغسطس 27, 2018 مشاركة قام بنشر أغسطس 27, 2018 3 ساعات مضت, allaoua10 said: انا اريد الترحيل بهذه الطريقة 3-(today)=في هذه الحالة يرحل بهذه الحالة افتح موضوع جديد وبين سؤالك واضرب مثال يدوي لما تريد وان شاء الله سيتدخل الاساتذة للحل لانها تحتاج معادلات مركبة وصعبة تحياتي رابط هذا التعليق شارك More sharing options...
الردود الموصى بها