مساعدة في حساب مجموع الجلسات والمبلغ الشهري

[AboBahaa]

السلام عليكم ورحمة الله وبركاته

اخواني الكرام

المطلوب من المثال المرفق هو جمع عدد الجلسات في التربية الخاصة وعلاج النطق والطبيعي والسلوك والتأهيل المهني لايجاد المبلغ الشهري وذلك بـــــــــدون خاصية    sum  بمربع النص فأنا اريد طريقه أخرى بكود اخر لاظهار الناتج بالجداول وذلك كالاتي بعد ايجاد عدد الجلسات ضرب ناتج  عدد الجلسات في   30 يوم يظهر المبلغ الشهري في مربع نص المبلغ الشهري -- او بطريقة أخرى ضرب ناتج عدد الجلسات في اربع اسابيع في 7.5 ليظهر المبلغ الشهري في مربع نص المبلغ الشهري وكل هذا يظهر بالجداول

فاتورة.rar

[Shivan Rekany]

4 ساعات مضت, aabbt5 said:

السلام عليكم ورحمة الله وبركاته

اخواني الكرام

المطلوب من المثال المرفق هو جمع عدد الجلسات في التربية الخاصة وعلاج النطق والطبيعي والسلوك والتأهيل المهني لايجاد المبلغ الشهري وذلك بـــــــــدون خاصية    sum  بمربع النص فأنا اريد طريقه أخرى بكود اخر لاظهار الناتج بالجداول وذلك كالاتي بعد ايجاد عدد الجلسات ضرب ناتج  عدد الجلسات في   30 يوم يظهر المبلغ الشهري في مربع نص المبلغ الشهري -- او بطريقة أخرى ضرب ناتج عدد الجلسات في اربع اسابيع في 7.5 ليظهر المبلغ الشهري في مربع نص المبلغ الشهري وكل هذا يظهر بالجداول

فاتورة.rar

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

Public Sub التربية_الخاصة_فردي_AfterUpdate()
    Me.عدد_الجلسات = Nz(Me.التربية_الخاصة_فردي, 0) + Nz(Me.علاج_النطق, 0) + Nz(Me.العلاج_الوظيفي, 0) + Nz(Me.العلاج_الطبيعي, 0) + Nz(Me.تعديل_السلوك, 0) + Nz(Me.تأهيل_مهني, 0)
    Me.اجمالي_المبلغ_الشهري = Me.عدد_الجلسات * 30
End Sub

وفي حدث بعد تحديث لكل مربع تم استدعاء هذا الامر هكذا

Private Sub العلاج_الطبيعي_AfterUpdate()
    التربية_الخاصة_فردي_AfterUpdate
End Sub

اليك القاعدة بعد تعديل

فاتورة.rar

[AboBahaa]

الف الف شكر ا اخي الكريم Shivan Rekany