abouelhassan

رزقت خير الدارين استاذى ان شاء الله شكر وتقدير وفائق الاحترام من اخيك

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

للرفع رفع الله قدرك اخى الكريم

استاذ سامي الحداد بارك الله فيك اخى تسلم وتعيش يارب احترامى وتقديرى لك اخى

ربنا يحفظك يارب ويكرمك اللهم امين معلش استاذى الحبيب حدثت مشكلة لدى حيث ان لدى كود فى قاعدة البيانات فى نفس الحدث AfterUpdate Private Sub iPage_AfterUpdate() On Error Resume Next Dim X X = iPage Dim i, i2 As Integer DoCmd.GoToRecord , , acFirst For i = 0 To Me.Form.Recordset.RecordCount - 1 If iPage = X Then i2 = i2 + 1 If i2 > 1 Then If MsgBox("تم استخدام الحساب مسبقا" & vbNewLine & "هل تريد التراجع ؟", vbCritical + vbYesNo + vbMsgBoxRight, "تنبيه") = vbYes Then DoCmd.SetWarnings False DoCmd.RunCommand acCmdUndo DoCmd.SetWarnings True Exit Sub End If End If End If DoCmd.GoToRecord , , acNext Next i DoCmd.GoToRecord , , acNewRec Me.iName.SetFocus End Sub عند اضافة الكود الخاص بحضرتك اليه حدث تعارض ممكن الاطلاع استاذى DoCmd.RunCommand acCmdSaveRecord Dim i As Long, k As Long Dim Total As Double Dim rs As DAO.Recordset Total = 0 Set rs = Me.RecordsetClone If Nz(rs.RecordCount, 0) = 0 Then Set rs = Nothing Exit Sub End If rs.MoveLast k = rs.RecordCount rs.MoveFirst For i = 1 To k If rs!iPage = 1 Then Total = Total - Nz(rs!iAmount, 0) Else Total = Total + Nz(rs!iAmount, 0) End If rs.MoveNext Next i Me.txtSum = Total Set rs = Nothing اريد جمع الكودين بنفس الحدثAfterUpdate ربنا يكرمك يارب

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

الاساتذة هل بالامكان امدادى بكود لتنفيذ المطلوب مع خالص الشكر والدعاء

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

السلام عليكم ورحمة الله اخوانى الاساتذة احتاج الى فى تكست المجموع بدون احتاج الى ان تظهر مجموع المبالغ بها وفى حالة وجود اسم الحساب الايراد3 يظهر بها مبلغ الايراد3- مجموع المبالغ يعنى فى هذه الصورة يظهر بها600-100+200+300+700=-700 600 الايراد3-100 الايراد1+200 الايراد8+300 الايراد5+700 الايراد1 بغض النظر عن مكان وجود الايراد3 الشرط هو كلمة الايراد3 اما اذا لو كان كلمة الايراد3 غير موجودة السطر كله غير موجود يظهر فى التكست المجموع للمبالغ=1000 بارك الله فيكم اخوانى الافاضل 2300-3.rar

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

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

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

استاذى الحبيب د.كاف يار بارك الله لنا فيك اللهم امين وجعل كل ايام سعادة مثل ما تسعدنا اللهم امين يارب ما احتاجه تعديل لملخص الحسابات الحالى استاذى يظل كما هو عندما لا اختار حساب هنا وفى حالة ان اختار حساب مثل الصورة هنا اختارت الحساب صرف والعميل جديد1 اريد ان يستدعى ملخص الحسابات كالتالى نوع الحساب دائن مدين الرصيد صرف 3600 2000 1600 تجميعات 3600 2000 1600 فاهمنى استاذى مش ملخص الحسابات القديم لا عايز تعديل للحالى فاهمنى استاذى الحبيب

روعة شكر وتقدير واحترام من اخيك استاذنا

للرفع

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

روعة تسلم ايدك استاذنا والشكر للاستاذ محمد ابو عبدالله احترامى

السلام عليكم اساتذتى الافاضل وضعت الكود تمام الحمد لله اصبح يعمل تمام تحت زر اسمه back up ولكن لدى زر خروج اردت عند الضغط على خروج ان يعمل الكود استخدمت الكود حيث ان backub_click هو اسم كود النسخة الاحتياطية بس لم يعمل مع الغلق Private Sub BtnExit_Click() Call Backub_Click DoCmd.Quit End Sub هل امر call غلط شاكر فضلكم اخواتى الاساتذة الافاضل

تسلم ايدك استاذى الحبيب husamwahab تمام جدااااا ربنا يحفظك يارب ويديك الصحة والعافية يارب ويعزك دائما كل الشكر والتقدير وخالص الاحترام من اخيك

اشكرك استاذى الحبيب ممكن بعد اذنك شرح اوى اعمله ربنا يحفظك يارب ويديك الصحة والعافية

السلام عليكم استاذى husamwahab @husamwahab كل عام وحضرتك بكل خير اعتذر لحضرتك هذه المشكلة مش عارف احلها منذ اهديتنى الفورم فى مثال حضرت يعمل تمام ام بالقاعدة لدى لدى هذه المشكلة ارجو توضيح سببها لو امكن اخى فى الله ارضت اضافة حساب جديد هنا فى رقم4 الحساب اسمه مالك ماجد مثلا تم اضافة الحساب تمام كما بالصورة فى مكانه رقم 4 تمام عندما اذهب الى الجدول اجد الحساب رقمه مضبوط تمام بس مش فى مكانه اجد انه اخر حساب وبجانبه رقم الصحيح عكس المثال الموجود بالاعلى فى مشاركة حضرتك بعد تنفيذ نفس الكلام بالضبط اجد ان الحساب فى الجدول موجود رقم 4 فى مكانه وهذه صورة من القاعدة بمشاركة حضرتك الحساب فى مكانه تمام ممكن حضرتك تساعدنى فى سبب المشكلة بارك الله في استاذى الغالى 22f22.rar

شكر وتقدير واحترام من اخيك استاذنا

بميزان حسناتك يارب وكل من ساهم ربنا يكرمه يارب

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

كل عام وانتم بخير يارب