كل الانشطه

للرقع

اذا نفذت ارفع العمل

ايضا لا تعمل اي شيء خارج الجداول مثل النماذج النماذج تأتي في الآخر وع اكواد لتسهيل الادخال جرب ادخل بيانات من خلال الجداول .. اعمل على الجداول الثلاث .. راس الفاتورة / التفاصيل / الدفع يعني ادخل عملية شراء واحدة او عمليتين ومثلها بيع ونفحص المخرجات من خلال استعلام ستكتشف بنفسك الحقول اذا مكتملة او انك بحاجة الى ادراج حقل ما

الامر ابسط مما تتصور اولا المثال هو من عملك .. يعني انت اللي كاتب الحقول بحروف اجليزية انا فقط اختصرت : 1-جدول المشتريات وجدول تفاصيله واالمبيعات وتفاصيله الى جدولين فقط وغيرت في تسمية الحقول بما يناسب الدمج 2- دمج المورد والزبون بحقل واحد ثانيا يوجد تسميات توضيحية للحقول باللغة العربية افتح الجداول على العرض وانت تفهم

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

طيب استاذ لدينا 03 حالات في "عدم إعادة الزواج(3)" 01- عند وفاة الزوج : يكتب كمايلي *- لم تتزوج منذ وفاة زوجها السيد (6) : علي بن عزة المتوفي بتاريخ : 12/01/2022 وتظهر جميع الخطوط k1 الى غاية k7 بإستثناء k3 تختفي 02- حالة طلاق الزوجة : يكتب كمايلي *- لم تتزوج منذ طلاقها من زوجها السيد (7) : صالح بن عتوس بتاريخ : 17/06/1997 وتظهر جميع الخطوط k1 الى غاية k7 بإستثناء k4 تختفي 03- حالة طلاق الزوجة قبل وفاة الطليق : يكتب كمايلي *- لم تتزوج منذ طلاقها من زوجها السيد (7) : قسومة نور الدين بتاريخ : 26/02/1998 وتظهر جميع الخطوط k1 الى غاية k7 بإستثناء k4 تختفي فتح تقرير FACE14.zip

السلام عليكم آسف للازعاج بس والله لسه موفاهم طريقة الاستاذ @ابوخليل اريد ان اعملها بنفسي الجداول والحقول باللغة العربية ثم انا اعكسها للعة الانكليزية لافهم الموضوع اكثر المطلوب: - عدد الجداول - اسماء الجداول - اسماء الحقول - طريقة الربط

يبدو ان المشكلة مسح كل الأحداث بما فيهم الوحدات النمطية

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

تلخيص جميل جدا .. 🙂 رزقك الله بنوته جميلة .. 👩 .. تتربى في عزك على الطاعة .. 🌷

مرفق جزء من أحد المشاريع السابقة ، لفاتورة البيع والشراء مع المستلزمات ،، تم حذف أجزاء كثيرة من المشروع وأكواد واستعلامات ليس لها علاقة بالمطلوب ,, New DB.accdb

بارك الله فيك وزادك الله من فضله وعود حميدا .... نورت المنتدى

بالنسبة لترقيم الفاتورة البعض لا تفرق لديه الارقام مشتريات او مبيعات .. فقط ترقيم متسلسل يشمل الكل .. وهنا يكون نوع الحقل رقمي لا مشكل بل هو اقوى والبعض الآخر يريد التفرقة بين المبيعات والمشتريات بحرف او حرفين في بداية الرقم .. وهنا يكون نوع حقل الترقيم نصي الذي يريد التفريق لا يعتبر حقل نوع العملية مهما .. لأن رقم الفاتورة هو الدليل رايي .. ان رقم الفاتورة هو عبارة عن معرف فريد لا يتكرر ابدا .. فلا داعي للتفرقة ويكتفى بنوع العملية عند التصفية

هل اطلعت على المرفق الأخير ؟ هذه الجداول هي الاساسية التي يدور عليها العمل .. وبالتحديد 3 منها فقط رأس الفاتورة / التفاصيل / المدفوعات البقية تعتبر جداول ثابتة خدمية ان احتجت لجداول خدمية اخرى سوف تأتي لا حقا .. لا مشكلة ولن يتأثر عملك

ارفق القاعدة

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

حاضر أخي الفاضل سوف أنفذ ما قلت وأوافيك

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

شكرا استاذ @ابوخليل شكرا استاذ @Foksh يعني قصدك يكون جدولين الجدول الاول : راس فاتورة البيع والشراء الجدول الثاني : اطراف فاتورة البيع والشراء وشكرا

بعد تجربة سابقة لفكرة الجدول الواحد أو جدول الحركات ، وجدت أنها أفضل فكرة لتصميم برنامج محاسبي أو كاشير يختص بالبيع والشراء .. اذا وجدت الملف سأرفقه هنا عله يساعدك أخي @Ahmed_J في الوصول الى هدفك وطلبك ..

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

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

يجب ان تتتأكد من صحة المخرجات سبق وطلبت منك ادخال الدرجات لجميع الصفوف فيما لا يقل عن 10 طلاب لكل صف مراعيا جميع الشروط المحتملة ثم تطلع على الكشوف .. وتقرير الرسوب وتتأكد من صحة المخرجات 100% ثم ترفق لنا العمل .. وهذا هو المهم .. من اجل نعتمده كأصل صحيح

شكرا لحضرتك ولأستاذنا الفاضل (foksh ) علي كوده الرائع

الف شكر اخي الغالي @Foksh على هذا الكود التحفة اختصر ثلاثة ارباع الزمن Dim totalRecords As Long Dim recordsWithPositive1 As Long totalRecords = Nz(DCount("*", queryName), 0) recordsWithPositive1 = Nz(DCount("*", queryName, "[1]>0"), 0) For i = 1 To 14 Me("t" & i) = totalRecords Me("Te" & i) = recordsWithPositive1 Dim maleCount As Long Dim femaleCount As Long maleCount = Nz(DCount("*", queryName, "[gender]=1 AND [" & i & "]=0"), 0) femaleCount = Nz(DCount("*", queryName, "[gender]=2 AND [" & i & "]=0"), 0) Select Case i Case 1 maleCtrl = "Text1" femaleCtrl = "Text11" totalCtrl = "Text111" Case 2 maleCtrl = "Text2" femaleCtrl = "Text22" totalCtrl = "Text222" Case 3 maleCtrl = "Text3" femaleCtrl = "Text33" totalCtrl = "Text333" Case 4 maleCtrl = "Text4" femaleCtrl = "Text44" totalCtrl = "Text444" Case 5 maleCtrl = "Text5" femaleCtrl = "Text55" totalCtrl = "Text555" Case 6 maleCtrl = "Text6" femaleCtrl = "Text66" totalCtrl = "Text666" Case 7 maleCtrl = "Text7" femaleCtrl = "Text77" totalCtrl = "Text777" Case 8 maleCtrl = "Text8" femaleCtrl = "Text88" totalCtrl = "Text888" Case 9 maleCtrl = "Text9" femaleCtrl = "Text99" totalCtrl = "Text999" Case 10 maleCtrl = "Text10" femaleCtrl = "Text100" totalCtrl = "Text1000" Case 11 maleCtrl = "Text_11" femaleCtrl = "Text_111" totalCtrl = "Text_1111" Case 12 maleCtrl = "Text12" femaleCtrl = "Text122" totalCtrl = "Text1222" Case 13 maleCtrl = "Text13" femaleCtrl = "Text133" totalCtrl = "Text1333" Case 14 maleCtrl = "Text14" femaleCtrl = "Text144" totalCtrl = "Text1444" End Select Me(maleCtrl) = maleCount Me(femaleCtrl) = femaleCount Me(totalCtrl) = maleCount + femaleCount Next i Data7.rar