انتم مبرمجي العراق صدقا شغلكم راقي وفي مبرمج ثاني اسمه حيدر الحداد لوو قناه عاليوتيوب وكذالك المحاسب العراقي وايهاب عبدالرزاق الجبوري شغلكم ما شاء الله جميل
@@access3588 If IsNull([]) Then MsgBox ("") DoCmd.CancelEvent Else If IsNull([]) Then MsgBox ("") DoCmd.CancelEvent Else If [] > [] Then MsgBox ("") DoCmd.CancelEvent Else If [] > [] Then MsgBox ("") DoCmd.CancelEvent Else If [] > [] And [] > [] Then MsgBox ("") DoCmd.CancelEvent Else Dim r r = MsgBox("", vbYesNo, "") If r = vbYes Then DoCmd.Close acForm, "" DoCmd.Close acForm, "" DoCmd.OpenForm "" MsgBox "Í" Else If r = vbNo Then MsgBox "" DoCmd.CancelEvent End If End If End If End If End If
مرحبا بالنسبه للمجموع يعني مجموع ديون الشركه تبقه نفسها ما تنقص لأنك تاخذ المجموع من الجدول و بهاي الحاله الجدول في حالة جمع مستمره للمجموع بدون نقص ليش ما تضيف حقول للجدول تنقص بيها من المجموع
@@access3588 ينفع لو بنفس الجدول نضيف حقلين واحد يكون للمبلغ الواصل و الحقل الثاني للتسديد و نخلي بياناته محسوب بحيث تكون قيمته المجموع ناقص المبلغ الواصل
@@كرارالكعبي-ك1ف لا ما ينفع لسبب انو عندك جدول دخل فيه مادة تم شرائها تمام اجة الزبون سدد دفعة اولى بعدين سدد دفعة ثانية بعدين سدد دفعة ثالثة هيك كيف راح اتكون بجدول واحد لازم تعمل جدول ثاني يتقبل عدة صفوف لصف واحد في جدول الاول
حبيبي ممكن طريقه تخليني احذف سجلات الديون الي تجيني من دالة المجموع في الجدول يعني بعد كل عملية تصفير للديون يقوم بحذف السجلات السابقه من الجدول و يبدأ سجل جديد
طيب انا ابغى ارسلك ملف اكسل اذا تسمح ابغاك تشيك عليه انا تعبت عليه مره لكن الملف يعلق احتاج احول عملي نفسه على الاكسس ويكون بنفس المواصفات كيف اتواصل معاك عشان ارسلك الملف وتشوفه
مشاء الله شرح ممتاز
اشكرك اخوية
ابداع مستمر 🌹🌹🌹
شكرا لك
الله يبارك بيك ويخليك، ويديم التوفيق حليفك.
ويبارك فيك اخوية
@@access3588
بالمناسبة كود نموذج1 الخاص بالمجموع سواء بالدولار او الدينار في نهاية الدرس السابق( السادس) ما جاي يصير ودائما يطلع خطا .
وين الخطأ ؟
@@mshal.q تأكد اخي من علامات التنصيص وعدم ترك اي فراغ بالكود
@@access3588
شكرا جزيلا، كان الخطأ في اعداد اللغة الخاصة بالحاسوب وتم حلها .. تحياتي وتقديري يا طيب.
مشكور خال
الله يعطيك العافيه
ويعطيك الف عافية
عملك جداَ قيم ومحاضرات جداَ راقية ربي يوفقك لأن حيل نستفاد من خبراتك بس بلا زحمة ممكن طريقة الترقيم التلقائي علئ الاكسس لأن حيل نواجة مشكله بالتسلسل إذا حذفنة صف باكملة الترقيم ما يصحح ارجو منك تنزل محاضرة علئ هذا الموضوع
ان شاء الله
الله يبارك فيك و يوفقك يا رب
استاذ عندي سؤال اكدر اسوي بزر معين ماكرو و vb كود بنفس الحدث ؟
نعم اخي اعمل كود لتشغيل المايكروا
وبعدها اكتب الكود تبعك
انتم مبرمجي العراق صدقا شغلكم راقي
وفي مبرمج ثاني
اسمه حيدر الحداد لوو قناه عاليوتيوب
وكذالك المحاسب العراقي
وايهاب عبدالرزاق الجبوري
شغلكم ما شاء الله جميل
الكل فيهم البركة ... اشكرك اخي العزيز
بدون زحمه عندي مشكله بزر تسديد نقلت كود مثل ماكاتبه انته بدون اي غلط ويطلع عندي من اضغط عليه
Block If without End If
شنو سبب
ارسلي الكود هنا الي كتبته بالزر
@@access3588 بين الاقتباسات كلمات بلانكليزي متخربطه (يعني ذني بلغه عربيه) بسبب نسخ اهمشي الكود شوفه
@@access3588
If IsNull([]) Then
MsgBox ("")
DoCmd.CancelEvent
Else
If IsNull([]) Then
MsgBox ("")
DoCmd.CancelEvent
Else
If [] > [] Then
MsgBox ("")
DoCmd.CancelEvent
Else
If [] > [] Then
MsgBox ("")
DoCmd.CancelEvent
Else
If [] > [] And [] > [] Then
MsgBox ("")
DoCmd.CancelEvent
Else
Dim r
r = MsgBox("", vbYesNo, "")
If r = vbYes Then
DoCmd.Close acForm, ""
DoCmd.Close acForm, ""
DoCmd.OpenForm ""
MsgBox "Í"
Else
If r = vbNo Then
MsgBox ""
DoCmd.CancelEvent
End If
End If
End If
End If
End If
@@عبوسيالسيد-ط8غ9ف اخي ارسلي الملف
اعتقد عندك اخطاء في المسميات
@@access3588 تدلل وين ارسله الك عندك تلكرام او احد برامج اتواصل وياك
السلام عليكم استاذ .. اعاني في جزئية تسديد المبلغ في ملف التسديد .. واكون شاكر لك
السلام عليكم الله يجزيكم الخير ويبارك الله بجهودكم يااستاذنا
مشكلتي عندي النموذج1 والتسديد لا يقبل ادخار الارقام علما انني ناقل الاكواد جيدا
شكرا جزيلا
مرحبا
بالنسبه للمجموع يعني مجموع ديون الشركه
تبقه نفسها ما تنقص لأنك تاخذ المجموع من الجدول و بهاي الحاله الجدول في حالة جمع مستمره للمجموع بدون نقص
ليش ما تضيف حقول للجدول تنقص بيها من المجموع
لازم ايصير مجموع ديون وبجدول مجموع التسديد
وراح يكون المجموع ناقص التسديد
@@access3588 ينفع لو بنفس الجدول نضيف حقلين واحد يكون للمبلغ الواصل و الحقل الثاني للتسديد و نخلي بياناته محسوب بحيث تكون قيمته المجموع ناقص المبلغ الواصل
@@كرارالكعبي-ك1ف لا ما ينفع لسبب
انو عندك جدول دخل فيه مادة تم شرائها تمام
اجة الزبون سدد دفعة اولى
بعدين سدد دفعة ثانية
بعدين سدد دفعة ثالثة
هيك كيف راح اتكون بجدول واحد
لازم تعمل جدول ثاني يتقبل عدة صفوف لصف واحد في جدول الاول
@@access3588 شكرا ♥️
حبيبي ممكن طريقه تخليني احذف سجلات الديون الي تجيني من دالة المجموع في الجدول
يعني بعد كل عملية تصفير للديون يقوم بحذف السجلات السابقه من الجدول و يبدأ سجل جديد
🌟🌟🌟🌟🌟
صراحتا شغل امعدل اوسهل للتعلم من غير تعقيد ...
اشكرك اخي
انصحك باستخدام مايك احترافي لعمل الشروحات عشان مايطلع صوت زنه في المقطع
ان شاء الله
مشكلة بالكمبيوتر اخي كانت لما بيوصل الشاحن يعمل هذا الصوت ان شاء الله محلولة
الله يكرمك
انا احتاج اعمل فاتورة بيع وكشف حساب العملاء وسند قبض وكشف حساب سنوي وشهري بدون فاتورة مشتريات وبدون مخزن ايش تنصحني افضل مقطع ياريت تعطيني الرابط
@@beeshoo0 اخي العزيز برنامج الديون ينفعك اسهل من هل برنامج
طيب انا ابغى ارسلك ملف اكسل اذا تسمح ابغاك تشيك عليه انا تعبت عليه مره لكن الملف يعلق احتاج احول عملي نفسه على الاكسس ويكون بنفس المواصفات كيف اتواصل معاك عشان ارسلك الملف وتشوفه
@@beeshoo0
moona3146@gmail.com
🌟🌟🌟🌟🌟