عمر ضاحى

هذا ما قصدته (مرفق ملف) فيه ما قمت بعمله لان واضح ان فى مشكله فى استخدام قاعدة iif مع Between داخل الاستعلام ممكن تتحل بحل اخر عن طريق مديول (مجربتهاش لاني ضعيف فيها صراحتا) لكن جربت جميع الاشكال والطريق ال ممكن اتوقعها (من وجهة نظرى الشخصيه الضعيفه) لكن فشلت فى حلها غير بهذه الطريقه Pro-Acc-S7.rar

خلاص ولله الحمد حليتها بحل اخر خارج الصندوق بتاعي قمت بعمل حقلين اخرين فى فورم الارصده قيمتهم بتساوي تحويل التواريخ الى شهر وسنه للحقلين الاصليين للتواريخ الاستعلام وعملت حدث بعد التحديث If Me.OP1 = 2 Then Me.Con1 = Format([txtdate1], "mm-yyyy") Me.Con2 = Format([txtdate2], "mm-yyyy") Else Me.Con1 = Format(#1/1/1900#, "mm-yyyy") Me.Con2 = Format(#12/31/2500#, "mm-yyyy") End If وعملت له نداء فى كل شئ يخص التاريخ فى الفورم وفى الاستعلام وضعت هذا المعيار >=[Forms]![frmReportBalance]![Con1] And <=[Forms]![frmReportBalance]![Con2] واشتغل تمام ^_^ ايضا بعد هذا يتم اخفاء المربع النص الجديد لان ليس له فائده ان يكون ظاهر ^_^

الموضع باختصار عاوز اقول للاستعلام Q_SumErad و Q_SumMsrofat لو Forms]![frmReportBalance]![OP1]=2 ضع المعيار Between [Forms]![frmReportBalance]![txtdate1] And [Forms]![frmReportBalance]![txtdate2] اما لو كانت القيمه غير كده يشتغل بدون معيار اى ([TblErad]![EradDate]) بس كده ^_^

مش عارف انا حاسس ان فى حاجه فيتاني حاجه المفترض اعملها او اعيد صياغتها او انا ناسيها ايه هي مش عارف انا اتحيرت بجد

فكره اخرى فاشله IIf([Forms]![frmReportBalance]![OP1]=2;([TblErad]![EradDate])>=[Forms]![frmReportBalance]![txtdate1] And ([TblErad]![EradDate])<=[Forms]![frmReportBalance]![txtdate2];([TblErad]![EradDate])) مع ان هذه المقطع شغال تمام ([TblErad]![EradDate])>=[Forms]![frmReportBalance]![txtdate1] And ([TblErad]![EradDate])<=[Forms]![frmReportBalance]![txtdate2]

السلام عليكم ورحمة الله وبركاته معي هذا الداله IIf([Forms]![frmReportBalance]![OP1]=2;Between [Forms]![frmReportBalance]![txtdate1] And [Forms]![frmReportBalance]![txtdate2];([TblErad]![EradDate])) لكنها لا تعمل جيدا مرفق قاعدة بها النموذج الذى اريد برمجته 01.rar

هو ايه الخطأ فى هذه الداله IIf([Forms]![frmReportBalance]![OP1]=2;Between [Forms]![frmReportBalance]![txtdate1] And [Forms]![frmReportBalance]![txtdate2];([TblErad]![EradDate])) انا عاوز اقول انا كان فى النموذج اختيار رقم 2 اعمل لى فلتر بين تارخين اما اذا كان القيمه غير 2 اجلب لى كل البيانات لكن مش بيظهر لى نتائج

الله يبارك فى استاذى الكريم هذا هو 😍

اه مظبوط النتيجه دي والخانات الفارغه ممكن نضع معيار مثلا اذا كانت النتيجه null يضع 0 ولا ايه رأيك انت

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

كما فى المرفق الاتي Q-Sum-Erad هنا هتلاقى ان عدد الاشهر 4 Q-Sum-Msrofat هنا هتلاقى ان عدد الاشهر 6 انا عاوز Q-Sum-F1 يظهر لى اسم الفروع والاشهر بالحاله الخاصه به مثل ان فرع3 فى شهر 5 ايراد 0 ومصروفات 1000 01.rar

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

الف الف شكر لك هو ما اريد بابسط صوره

السلام عليكم ورحمة الله وبركاته كل سنه وانتم طيبين مرفق قاعدة بيانات فيها جدولين اساسيين لتسجيل المصروفات والايرادات وهم TblErad ( جدول الايرادات) TblMsrofat (جدول المصروفات) اريد ان اعمل استعلام يتكون من 4 صفوف (اساسيين) الصف الاول فيه رقم الشهر مثل 01-2022 و 02-2022 (مصدره الاشهر التى تم التسجيل فيها) الصف الثاني يكون فيه اجمالى الايرادات فى الشهر الصف الثالث اجمالى المصروفات فى الشهر الصف الرابع الفرق بينهم (المكسب والخساره) ولكم جزيل الشكر TEST07.rar

عندي استعلام اريد ان استخدم معه هذه الداله IIf([Forms]![frmReportMsrofat]![OP2]=1;1;IIf([Forms]![frmReportMsrofat]![OP2]=2;2;Is Not Null)) الداله شغال على قيمه 1 وقيمه 2 لكن اريد ايضا ان اجعل الاستعلام يظهر جميع البيانات جربت استخدم Like "*" <0 <>0 كلها تجارب فاشله معي ممكن اعرف السبب Test_S7.rar

وكما وعدتكم ...تم بحمد الله وفضله ...ثم بمساعدة استاذى ومعلمي @ابو جودي ..سائل المولى عز وجل ان يكرمه ويحفظه من كل شر من الانتهاء من فكرة البرنامج كما ذكرة ..واعلم انه ليس مكانه لكن قد يساعد ForTest.rar

روعه

الف الف شكر لحضرتك لكن الفكره اني كنت عاوزها تكون بشكل آلى بالكامل بدون تدخل مني لذا اضن ان هذا ممكن فى الاكسيس انا بالفعل بدأت فى تنفيذ الفكره على الاكسيس ونجحت فى 90% لكن باقى ان اجعل الاكسيس يخرجلى عدد ملفات PDF بعدد الموظفين وان شاء الله بعدما انتهي من حلها سوف اضع نسخه هنا فى الموضوع لكي تكون نواه لمساعدة اخرين

السلام عليكم ورحمة الله وبركاته ...تحيه طيبه للجميع ..بعد اذن حضرتكم عندي ملف اكسيل ..فيه بصمة الموظفين كلهم العمود الاول A فيه ارقام الموظفين ..اريد كود يقوم بتصدير ملف الاكسيل الى PDF كل موظف فى ملف لحاله ..علما ان الصف رقم 1 فيه عناوين (المسميات) باعتذر جدا على الخطأ هذا منى ظنا انه لا يحتاج لبساطة الفكره (فى اعتقادي)(وصعوبة تنفيذها على ارض الواقع) مرفق ملف ...الملف فيه بصمة 6 موظفين ..قد يزيد او ينقص العدد ..اريد ان اعمل كود يستورد البيانات مثلا من ملف اخر اكسيل ومن ثم تصدير الى PDF ..مع الشكر ForTest.xls

هل هذا ما تريد ؟ برجاء اذا كان هذا ما تريد اختيار افضل اجابه ^_^ لشرح ما تم فى حدث بعد التحديث للكمبوبوكس اضفت هذا الكود Dim db As DAO.Database Dim rst As DAO.Recordset Set db = CurrentDb Set rst = db.OpenRecordset("companies", dbOpenDynaset) With rst .FindFirst Criteria:="[م]=" & Text74 If Not .NoMatch Then Combo76 = ![الرقم الضريبي] Text82 = ![العنوان] End If .Close End With Set rst = Nothing db.Close Set db = Nothing وتم التعديل على مصدر بيانات الكمبوبوكس لاحضار رقم المعرف وتم اخفائه عن طريق جعل مساحته 0 وباقى المساحه للسماء الشركات (طبعا تم تعديل عدد الاعمدة الى 2) نصيحه لك (مهمه جدا جدا) حاول الا تجعل اسماء الحقول فى الجداول بالعربي ^_^ Test_S7.mdb

بعد اذن الجميع وهذه فكره اخرى بسيطه كنت وجدتها على النت واضفتها عندي Bar.accdb

^_^ ابشر ان شاء الله اتحلت نجرب نعدل على الكود بحث يعمل مجلدات جديده باسم الموظف (رقم ID)

اولا اسمحو لى ان اضيف طلب تعديل بسيط عجبنى الكود صراحتا وكنت حابب انى احسن على الكود عن طريق اولا ان يتم استبدال كلمة "الملفات" بمعرف السجل ID عمل كود لمعرفة اذا كان هناك مجلد يحمل نفس المعرف ام لا اذا كان لا يعمل مجلد جديد ويجعل اسمه نفس اسم المعرف علشان ممكن يتم مثلا عمل خطابات معينه لموظفين فيقوم الكود بارسال بيانات الموظف الى ملف الورد وحفظه فى مجلد يحمل رقم الموظف بحيث اذا كان هناك اكثر من طلب خطاب للموظف يكونو محفوظين فى مجلد واحد يخص الموظف ^_^

حاولت اشغله لكن ظهر لى مشكلة فى المكتبات وللاسف واقف عليها مش عارف اكمل ال تقريبا فهمته انها محتاجه MICROSOFT DAO 3.6 OBJECT LIBRARY لكن الملف كان ناقص من عندي جربت انزله لكن برضه ما اشتغل

هو ده الف الف شكر لحضرتك السهل الممتنع ^_^