ابوخليل

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

في الاستعلام مصدر بيانات القائمة .. ضعي المعيار المناسب حسب الرغبة ( = أو <> )

تفضل يمكنك ايضا البحث عن رقم العملية في مربع التحرير اتمنى ان يحقق مطلوبك TransBom1.rar

يبدو ما فيه حل معك .. الى الآن لم تفهم الفكرة خلاص .. انتظرني سوف احقق مطلوبك حسب المعطيات في المثال .. بطريقين كلها سوف تعمل ان شاء الله 1- تكتب رقم العملية وتنقر انتر او 2- تختار من مربع التحرير لأن رقم المنتج لا يمكن التعامل معه كمعيار ... ولكنك سوف تطلع عليه من مربع التحرير

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

هل يمكنك معرفة رقم الحركة وادراجه ؟؟ بدلا من رقم المنتج

انت لم تفهمني سوف اعمل لك مربع تحرير في النماذج الجديدة يعرض المنتج لتختاره على كلامك سوف يظهر لك منتج متكرر 20 مرة كيف تختار المنتج الهدف .. هل تاريخ العملية كافي لتتعرف عليه ؟ المعيار الصحيح هو رقم الحركة رقم الحركة فريد لا يتكرر

طيب .. الحل يكون باختيار المنتج المناسب ما هي حقول المنتج التي تستدل بها عليه من خلال الجدول الرئيسي .. من اجل تختاره .. فتظهر لك بياناته في الرئيس وتفاصيلها في الفرعي

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

من ردت فعلك وردك الجميل 🤣 انت اسم على مسمى اعتقد اني فهمتك اذا فهمي صحيح فإن الجدول الاول ومصاحبه الفرعي عبارة عن جدول اصناف .. ولكن بدلا من جدول واحد جعلت الاصناف في جدولين والجداول التي تريد النقل اليها هي جداول الحركة صح يا امير ..؟؟

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

تم الاصلاح وذلك بتعديل المعيار وايضا هذا تم ضبطه بتغيير مصدر بيانات الحقل INSTALLMENT APPEND 9.rar

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

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

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

نعم استاذ @عمر ضاحى لماذا ؟؟؟ اعتقد ان الفكرة عوجاء

لو تغير حرف في مسميات داخل الجداول لا شك ستواجه مشاكل في جميع البرنامج في النماذج وفي التقارير على فكرة .. الاستعلامات تم الاستغناء عنها وتم حذفها من المرفق السابق .. لا اعلم كيف انت ارجعتها دوما اعمل على آخر مثال يتم رفعه مثال3.rar

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

من خلال الاطلاع على مصنف اكسل تم ملاحظة الآتي : اولا- بالنسبة للترويسة A- جميع حقول الصفين متشابهة : ( التاريخ /اليوم / الفترة / الوقت /الزمن ) بمعنى انها مكررة ويكتفى بواحد منها الحقول المختلفة : الصف والمادة فقط ........... لهذا يجب اخذ هذا الأمر في الاعتبار B- تحتاج هذه الترويسة الى جدول يخصها وتتم تعبئة البيانات لكامل المدرسة قبل اعداد اللجان على اعتبار ان كل لجنة تحتوي على صف او صفين بالكثير ثانيا : تفاصيل اللجان تحتاج جدول فرعي يخصها ومرتبط بجدول الترويسة يتم من خلاله ادخال رقم اللجنة والصف والعدد ومن و الى واسم المعلم تحتاج الى ضوابط عند اختيار الصف في النموذج بحيث لا يتم عرض الا الصفوف الظاهرة في الترويسة وضوابط لعدد الطلاب في الصف حتى لا يتم ادراج اعداد غير موجودة .. وضوابط لارقام الجلوس المدرجة

آمين وإياكم .. والحمد لله

تفضل احصائية سنوية حسب الفرد او حسب الكل جرب تفتح الاحصائية قبل اختيار موظف وبعد الاختيار وانظر الى عنوان التقرير EvaluationEmpUp8.rar

وهذه طريقة مباشرة حسب مثالك : Private Sub Command1_Click() Dim rs As Recordset Set rs = CurrentDb.OpenRecordset("t1") rs.MoveLast rs.MoveFirst Do While Not rs.EOF rs.Edit rs!itempercent = (rs!itemsale \ 100) * 70 rs!vol = rs!itemsale - rs!itempercent rs.Update rs.MoveNext Loop Me.Requery End Sub النسبة المئوية3.rar

غالبا نسبة الخصم متغيرة من وقت لآخر وعلى حسب مثالك المرفق يكون مكانها الصحيح في الاستعلام والتقرير .. وغير ثابتة في الجدول .......................................... المتبع عادة ان نسبة الخصم ومبلغه تكون امام الصنف في جدول الاصناف ، وعند التطبيق يظهر (مبلغ الخصم ونسبته) في عمود الخصم في نموذج المبيعات حسب الصنف المختار يتم تحديث حقل نسبة الخصم في جدول الاصناف وعليه يتم رصد مقدار الخصم في الجدول نفسه ليظهر في فاتورة المبيعات عند ادراج الصنف ( على الاصل او الأساس بان الكمية=1) اذا اردنا تثبيتها في الجدول لا بد ان تكون العملية من خلال نموذج المبيعات ........................................... اذا لم يعجبك ما بين السطور المنقطة وتريد الرصد في الجدول حسب مثالك بالضبط .. هنا يمكن عمل كود يقوم بالمهمة تفضل محاولة سريعة النسبة المئوية2.rar

تفضل Dim x As Date x = Nz(DLookup("dat", "tabl", "dat=[dd]"), 0) If x = Me.dd Then Me.t4.Requery Me.t4.Visible = True Else Me.t4.Requery Me.t4.Visible = False MsgBox " التاريخ الذي اخترته غير موجود", , "تنبيه" End If 122024.rar

اهلا ابا حسان كنت احسب انك انت السائل ولم انتبه ان مشاركتك هي حل للمطلوب لذا لما رأيت تسميات الحقول بالحروف العربية استغربت كثيرا !!!