Jump to content
أوفيسنا

حقل منضم فى نموذج رئيسى يساوى قيمة مربع نص غير منضم


Go to solution Solved by kha9009lid,

Recommended Posts

السادة الاعزاء الخبراء الافاضل

بعد التحية

عندى نموذج رئيسى  اسمة LF  يحتوى على عدد حقول منهم حقل اسمة d

      وعندى نموذج فرعى اسمة LL 

بة عدة حقول السعر والكمية الاجمالى مثلا 5 السعر*3 الكمية= الاجمالى15

20 =10 السعر2 *  الكمية

يوجد حقل غير منضم   للاجمالى العام =15+20 = 35  اسمة الاجمالى العام

dاريد بعد تحديث حقل السعر فى الفرعى قيمة الحقل   

فى الرئيسى تساوى الاجمالى العام فى الفرعى 

اتمنى طلبى يكون واضح وخالص الشكر

 

Link to post
Share on other sites

اخى الكريم

فى النموذج الفرعى فى مربع نض غير منضم تضع فيه وخلى المربع غير منضم فى تذييل النموذج الفرعى

(total)sum=

فى النموذج الرئيسي فى مربع غير منضم تضع

[total]![form].[LL]=

جرب مكنش انتظر من اهل الخبرة

Link to post
Share on other sites

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

Link to post
Share on other sites

مقيش امل من حل هذا المشكل 

بدل عمل زر امر يجعل القيمتين متساويتن

Link to post
Share on other sites
9 ساعات مضت, husamwahab said:

جرب هذا المرفق عسى ان تجد طلبك

ممتاز اخي و استاذي حسام ولاثراء الموضوع

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

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

اما فكرتي المتواضعة طالما ان الاجمالي للفاتورة الحالية موجود في النموذج الفرعي ممكن اختصار الكود ليكون

Me.Recalc
Me.Parent!d = Me.XSum

في البداية ااستخدمنا recalc لاعادة تحديث الحقول المحسوبة

ثم جعلنا قيمة الاجمالي في الرئيسي تساوي الاجمالي في الفرعي

 

DB.accdb

  • Like 3
Link to post
Share on other sites

اشكركم علي تعبكم ومساعدتي في حل مشكلتي خالص الشكر لكم ولكن ظروف عملي كفرد من أفراد الجيش الابيض لم أتمكن من فتح المرفق المرسل دعواتكم  لنا وللمرضى بالشفاء

Link to post
Share on other sites

استاذى الفاضل  kha9009lid

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

Me. Parent

ماذا تعني هل هي خاصة بالبرمجة

1619167472770-1989261692.jpg

Link to post
Share on other sites

معلمي الفاضل kha9009lid

اسم النموذج الرئيسى mortga_be 

اسم الحقل total_mor

اسم النموذج الفرعي Hm

الحقل التجميع غير منضم اسمة Tm

Link to post
Share on other sites

عليكم السلام، ارفق قاعدة بياناتك لكي نتمكن من مساعدتك.

Link to post
Share on other sites
7 ساعات مضت, jo_2010 said:

Me. Parent

ماذا تعني هل هي خاصة بالبرمجة

تعني النموذج الاب

ونستخدمها بدلا من كتابة اسم النموذج الرئيسي

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

17 ساعات مضت, jo_2010 said:

عملي كفرد من أفراد الجيش الابيض لم أتمكن من فتح المرفق المرسل دعواتكم  لنا وللمرضى بالشفاء

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

 

Link to post
Share on other sites

جرب ضع الامر التالي في حدث بعد التحديث للسعر

Me.Recalc
Me.Parent![Total_mor] = DSum("[total]", "hark_mort", "[c_mort]=" & [Forms]![mortga_be]![c_mort])

نفس حل اخي حسام بعد اضافة معيار رقم المرتجع

تحياتي

Link to post
Share on other sites
  • Solution

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

وللتغلب على هذه المشكلة

في امر حذف الصنف المسترجع استبدل الكود الموجود بالكود التالي

On Error Resume Next
If MsgBox(" عفوا  هل تريد  مسح  هذا الصنف ....    " & sanf_name.Value & vbCrLf & _
" ", _
vbQuestion + vbMsgBoxRight + vbYesNo, _
"   حذف صنف ") = vbYes Then
DoCmd.SetWarnings False
DoCmd.RunCommand acCmdDeleteRecord
Call P_mor_AfterUpdate
Else

DoCmd.RunCommand acCmdUndo
End If

 

Link to post
Share on other sites

معلمى واستاذى الفاضل kha9009lid

خالص الشكر والتقدير  على حل المشكلة التى  اتعبتنى اسابيع خالص الشكر للخبير الفاضل الزى تعلمت وساتعلم منة الكثير 

Link to post
Share on other sites

Join the conversation

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

Guest
Reply to this topic...

×   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.

  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...

Important Information