اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

السلام عليكم

 

هذه اول مشاركة لي في هذا المنتدى العظيم

اود مشاركتكم بكشف حضور وغياب لطلاب المدرسة بشكل يومي وشهري وسنوي مع احصائيات سنوية وشهرية

ما زال الملف بحاجة الى بعض التعديلات البسيطة

 

ومن لديه الخبرة في الاكسل يا ريت اذا في اقتراحات لديكم على الملف تقوموا بطرحها لتطوير الملف حتى تعم الفائدة

 

الملف مكون من عدة صفحات الصفحة الاولى يتم تسجيل اسماء الطلاب فيها ويتم استيرادها في باقي الصفحات الشهرية بشكل تلقائي

وباقي الصفحات خاصة لكل شهر بشهره

الصفحة الاخيرة المجموع السنوي لكل طالب ونسبة الغياب والحضور

 

 

وشكرا لكم

تحياتي

كشف الحضور والغياب.rar

  • Thanks 1
قام بنشر

ملف جيد و الى الامام 

لكن ارجو تقبل بعض الملاحظات:

1- لا ضرورة لتحميل ملف كبير بهذا الشكل يكفي ملف صغير مختصر 20 الى 30 صف (نموذج ) والذي يريد اضافة معلومات يكون الامر متاحاً له

 

2- لا ضرورى لادراج التواريخ يدوياً في كل صفحة من صفحات الشهور (يكفي عمل نسخات (12 نسخة) عن الورقة Salim من هذا الملف
   واختيار الشهر والسنة و بوم العطلة في كل نسخة)   ثم تسمية هذه الصفحات باسماء الشهور اذا اردت
    ليقوم اكسل بادراج التواريخ ألياً (كما في الصفحة Salim) مع حساب الشهر 28و29و30 أو 31 و تاوين يوم العطلة كما تحدده في الخلية A3
 
3 -هذه الورقة صالحة لكل الاعوام الدراسية (يكفي تغيير السنة فقط من الخلية A1) في كل صفحة من صفحات الشهور
 
الملف (كنموذج) مرفق

 

كشف Salim.xlsm

  • Like 2
  • Thanks 1
قام بنشر
6 ساعات مضت, بلال العجوري said:

السلام عليكم

 

هذه اول مشاركة لي في هذا المنتدى العظيم

اود مشاركتكم بكشف حضور وغياب لطلاب المدرسة بشكل يومي وشهري وسنوي مع احصائيات سنوية وشهرية

ما زال الملف بحاجة الى بعض التعديلات البسيطة

 

ومن لديه الخبرة في الاكسل يا ريت اذا في اقتراحات لديكم على الملف تقوموا بطرحها لتطوير الملف حتى تعم الفائدة

 

الملف مكون من عدة صفحات الصفحة الاولى يتم تسجيل اسماء الطلاب فيها ويتم استيرادها في باقي الصفحات الشهرية بشكل تلقائي

وباقي الصفحات خاصة لكل شهر بشهره

الصفحة الاخيرة المجموع السنوي لكل طالب ونسبة الغياب والحضور

 

 

وشكرا لكم

تحياتي

كشف الحضور والغياب.rar

بارك الله فيك  عمل موفق ان شاء الله والى الامام دائماا

 

3 ساعات مضت, سليم حاصبيا said:

 

الملف (كنموذج) مرفق

 

كشف Salim.xlsm

بارك الله فيك استاذى الجليل

هل من شرح مبسط لطريقة عمل التنسيق الشرى بالملف

هل يمكن عند الدبل كليك فوق الخليك يتم ادرع حرف غـ تلقائيا فى نفس الخلية

بارك الله فيك

  • Like 1
قام بنشر
13 ساعات مضت, محمد قاسم 12 said:

بارك الله فيك  عمل موفق ان شاء الله والى الامام دائماا

 

بارك الله فيك استاذى الجليل

هل من شرح مبسط لطريقة عمل التنسيق الشرى بالملف

هل يمكن عند الدبل كليك فوق الخليك يتم ادرع حرف غـ تلقائيا فى نفس الخلية

بارك الله فيك

ممكن ذلك 

شاهد هذا الملف (العملية تتم عند كبسة اليمين وليس دوبل كليك في نطاق محدد )

كله قابل للتغيير حسب المطلوب

 

 

Right_Click.xlsm

  • Like 3
  • Thanks 1
قام بنشر

السلام عليكم

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

أرجو أن تسهل هذه التعديلات العمل على الملف...

أخوكم بن علية

كشف hben.xlsm

  • Like 5
  • Thanks 1
قام بنشر
2 ساعات مضت, بن علية حاجي said:

السلام عليكم

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

أرجو أن تسهل هذه التعديلات العمل على الملف...

أخوكم بن علية

كشف hben.xlsm

اكثر من رائع احي بن علية\

بقي شيء واحد يجب اتمامه وهو حماية الخلايا غير الفارغة من الشيت المذكور 

لعدم التلاعب بالنتائج من قبل الفضوليين (اذ يجوز ان يقوم اجدهم بحذف الغياب لنفسه او لأحد اخر)

او يمكن ان يتم ذلك عن طريق خطا غير مقصود  من قبل المستخدم

يمكن الاستعانة بالكود في مشاركتي على هذا العنوان

https://www.officena.net/ib/topic/84508-حماية-الخلايا-غير-الفارغة-بواسطة-باسوورد/

  • Like 1
  • Thanks 2
قام بنشر (معدل)

مشكورين جدا على مروركم الرائع والاضافات والتعديلات والاقتراحات التي قمتم بطرحها

 

لكن لدي استفسار حول كيفية امكانية اضافة عطلة معينة مثل عطلة العيد فقط ليتم حذفها من مجموع الدوام السنوي ومجموع الدوام في ايام الشهر الذي تمر بها مثل هذه العطل

ولدي استفسار عندما قمت بتحميل الملفات المرفقة بعد تعديلاتكم على جهازي يعطيني اشارة علامة تعجب على ايقونة الملف لماذا ؟

انا استخدم اوفيس 2016

وشكرا للجميع

تم تعديل بواسطه بلال العجوري
اضافة ملاحظة
قام بنشر
2 ساعات مضت, بلال العجوري said:

 

 لدي استفسار حول كيفية امكانية اضافة عطلة معينة مثل عطلة العيد فقط ليتم حذفها من مجموع الدوام السنوي ومجموع الدوام في ايام الشهر الذي تمر بها مثل هذه العطل

تم اضافة الاعياد والعطل القسرية الى الملف (يجب ادراج تاريخها في العامود AZ ابتداءً من الصف الثاني)

كشف Salim A3yad.xlsm

قام بنشر

شكرا لك اخي

سليم حاصبيا

  على تفاعلك ولكن كيف يتم انقاص ايام عطل الاعياد من عدد ايام الدوام الفعلي لكل شهر تمر به عطلة ممثالة

 

بمعني انك اضفت اربعة ايام عطلة للعيد ولم يتم تنقيصها من مجموع ايام الدوام في الشهر او السنة

قام بنشر

تم معالجة الامر و لكن عدد ايام العمل تم ادراجه في الخلية B5 لعدم اخفاءه في حال وقع تحت عامود مخفي

بالنسبة للتورايخ يمكن ادراج كل العطل خلال العام كاملاً و اكسل يقوم بادراجها حسب الشهر المناسب واذا حدث يوم تعطيل قسري يمكن اضافتة ابضاً

العمل ضمن النطاق AZ100 : AZ2

كشف Salim A3yad1.xlsm

قام بنشر

السلام عليكم

وهذا حل آخر للمطلوب الجديد حيث تم التعديل على الملف مرة أخرى... أولا تم ترتيب الشهور بداية من الشهر 8 إلى 12 للعام الأول (2018) ثم من الشهر 01 إلى الشهر 07 للعام الثاني (2019) مع تعديل كل المعادلات للتتناسب مع هذه التغييرات... وثانيا فيما يخص العطل الأخرى خلال العام الدراسي يمكن إضافة تواريخها في العمود A بداية من الخلية A16 وستدرج في الجدول تلقائيا مع تنسيق شرطي (التلوين بالأزرق لأعمدتها حسب كل شهر) ولا يهم ترتيبها... تم إضافة كود أخي الكريم سليم الذي يخص "كليك يمين" حسب ملاحظاته... أرجو أن تفي الغرض المطلوب.

أخوكم بن علية

كشف _hben.xlsm

  • Like 1
قام بنشر

ورد خطأ بسيط في الملف السابق

ارجو المعذرة اليك الكود الصحيح مع الملف المرفق

الكود

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

  • Like 1
قام بنشر
24 دقائق مضت, بن علية حاجي said:

السلام عليكم

وهذا حل آخر للمطلوب الجديد حيث تم التعديل على الملف مرة أخرى... أولا تم ترتيب الشهور بداية من الشهر 8 إلى 12 للعام الأول (2018) ثم من الشهر 01 إلى الشهر 07 للعام الثاني (2019) مع تعديل كل المعادلات للتتناسب مع هذه التغييرات... وثانيا فيما يخص العطل الأخرى خلال العام الدراسي يمكن إضافة تواريخها في العمود A بداية من الخلية A16 وستدرج في الجدول تلقائيا مع تنسيق شرطي (التلوين بالأزرق لأعمدتها حسب كل شهر) ولا يهم ترتيبها... تم إضافة كود أخي الكريم سليم الذي يخص "كليك يمين" حسب ملاحظاته... أرجو أن تفي الغرض المطلوب.

أخوكم بن علية

كشف _hben.xlsm

الله عليك مبدع بجد 

والله جميل 

 

يمكن تطوير العمل كما يلى 

1/ عمل كشوب بالطلاب المتجاوزن لعدد محدد من ايام الغياب

2/ عمل انذار للغياب  اول وثان 

3/ عمل قرار فصل  بعد عدد معين من الايام

عمل تحليل للغياب لكل فصل 

عمل تقرير اجمالى للغياب 

 

  • Like 1
قام بنشر

مشكور على المعادلة ولكن انا اريد ان ارحل 3 غيابات متتالية لكي انجز اشعار في اليوم الرابع

بمعنى غاب يوم 24اوت و25 اوت و26 اوت  في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ

قام بنشر
1 ساعه مضت, allaoua10 said:

بمعنى غاب يوم 24اوت و25 اوت و26 اوت  في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ

المعادلة تعمل كما تريد خلال العام الدراسي اقصد يمكن ان يغيب الطالب يوم واحد في شهر  واليوم الثاني بعد شهرين واليوم الثالث في شهر اخر بعدها يرحل الطالب الذي تجاوزت غياباته 

ثلاثة ايام خلال العام الواحد وليس شهريا ويمكن ان يتجاوز خلال شهر سيظهر اسمه كذلك

تحياتي

قام بنشر
3 ساعات مضت, ayman42001 said:

فتجت الملف وظهر عندي في الصفحة الثالثة هذا

ما الحل

هذه المعادلات محذوفة في ملف الاستاذ سليم جزاه الله خيرا كونها خارج الاجابة المطلوبة للاخ السائل

اما هذه الورقة تجدها في ملف الاستاذ بن علية حاجي جزاه الله خيرا في الاعلى حمل الملف وستجدها تعمل عندك

تحياتي لكم

قام بنشر

بارك الله فيك

بمعنى غاب يوم 24اوت و25 اوت و26 اوت  في 27 اوت يرحل التلميذ الى شيت اشعار1. وهكذا مع جميع التلاميذ

لاني اريد ارسال اشعار للولي بعد 3 ايام متتالية . لااريد ان يرحل التلميذ اذا غاب يومين وبعد 5 ايام مثلا غاب يوم اخر .

لان التلميذ التحق سوف نقوم بالحساب مرة اخرى .وشكرا

انا اريد الترحيل بهذه الطريقة 3-(today)=في هذه الحالة يرحل

قام بنشر
3 ساعات مضت, allaoua10 said:

انا اريد الترحيل بهذه الطريقة 3-(today)=في هذه الحالة يرحل

بهذه الحالة افتح موضوع جديد وبين سؤالك واضرب مثال يدوي لما تريد 

وان شاء الله سيتدخل الاساتذة للحل لانها تحتاج معادلات مركبة وصعبة

تحياتي

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information