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

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

قام بنشر (معدل)

حياك الله اخي الكريم 

الصورة لا تعمل للأسف ولكن استخدم دالة Dcount  بشرط اسم الشعبة وتاريخ اليوم Date()

يفضل ارفاق مثال صغير للتطبيق في حال ما وصلت المعلومة .

بالتوفيق

 

تم تعديل بواسطه سعيد صواب
قام بنشر (معدل)

حياك الله اخي الكريم 

هذا مثال على مجموع الحضور للصف الأول بتاريخ اليوم 

الق نظرة على النموذج frm1  وفي حدث عند التحميل 

Me.ATTend1 = Nz(DCount("id", "q1", "D = date() And cclass = '" & 1 & "'"), 0)

شاهد التعديل في الجدول والاستعلام 

استبدل التسميات في الكود بما تريد وقم بتغييرها بعد الإستبدال ..

بالتوفيق

تفقد الطلاب.rar

تم تعديل بواسطه سعيد صواب
  • Like 1
قام بنشر

جزاك الله خيرا وأحسن الله إليك

تمت العملية بنجاح

لكن هناك مشكلة لا يتم تحديث الحقل إلا إذا تم إغلاقه وفتحه


وهل هناك طريقة لحساب الغياب أيضاً
وشكراً لكم مرة أخرى

تفقد الطلاب.rar

الت22قاط.PNG

قام بنشر

حياك الله اخي الكريم

مشكلة عدم تحديث القيمة الا اذا فتح النموذج لان الحدث موجود في حدث عند التحميل للنموذج 

جرب ان تضع الحدث في الحالي للنموذج ...

بالنسبة للغياب يجب ان يكون هناك شرط نبني عليه القيمة ... 

مثلا ضع خانة اختيار وهي افضل بحيث تكون القيمة صحيحة في حالة الحضور وخطاء في حالة الغياب

وبكذا تقدر تضيفها للشرط ... وتجمع الخانات ..

 

بالتوفيق

  • Like 1
قام بنشر

جزاكم الله خيرا على تجاوبكم 

لم أفلح في هذه الطريقة رغم اني وصعت الكود في كل الأحوال تقريبا الحالي-قبل-بعد-عند....

لكن نجحت في أن وضعته في صف الحقول البقية وفي نفس النموذج الفرعي فصار يتحتدث تلقائيا عند الإدخال

هل عندكم فكرة أخرى ليبقى كما هو في الصورة السابقة

  • 3 weeks later...

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

×
×
  • اضف...

Important Information