بحث مخصص من جوجل فى أوفيسنا
Custom Search
|
-
Posts
442 -
تاريخ الانضمام
-
تاريخ اخر زياره
السمعه بالموقع
11 Goodعن العضو safwatscc
البيانات الشخصية
-
Gender (Ar)
ذكر
-
Job Title
مدرس
-
البلد
مصر
وسائل التواصل
-
Yahoo
safwatscc@yahoo.com
اخر الزوار
1,799 زياره للملف الشخصي
-
الاخ الفاضل : الاستاذ ايو خليل بكل عام وانتم بخير بارك الله فيك فعلا حللت لى مشكلة كانت تواجهنى ولم اجد لها حل وبفضل هذا الموضوع تم والحمد لله
-
الاخ الفاضل مساهمة بسيطة ملف وجدته عندى لاحد الاخوة بارك الله فيهم قمت بتعديل بسيط علية حقل لا يقبل أكثر من 14خانات ولا أكثر2.rar
-
الاخ الافاضل الاستاذ : ابو خليل جربت هذا بعد مشاركتك ولكن ايضا تضهر رسالة المعيار الاول ثم تظهر رسالة المعيار الثانى هل من طريقة اخرى عن طريق كود بحيث ان الاستعلام لا نضع فيه هذا المعيار ولكن وبالضغط على فتح النموذج يتم وضع المعيار الموجود فى الكود وعند غلق النموذج يحذف المعيار من الاستعلام وهكذا مع كل نموذج لان نفس المشكلة توجهنى عند عمل التقارير وخاصة لو هناك علاقات
-
للرفع
-
الاخوة الافاضل مطلوب المساعدة
-
الاخوة الافاضل مربع النص Dofa فى النموذج هو عدد الدفعات فى السنة ويحوى الارقام من 1 الى 12 الدفعة كل 2 اى كل شهرين حاولت التعديل فى الكود السابق فى السطر newdate = DateAdd("m", [Dofa] + i, Me.Start) فاصبح البرنامج يبدا اول قسط على اساس قيمة Dofa وشغال المطلوب ان يكرر الكلام دة وكل الدفعات التالية نفس الكلام
-
الاخوة الافاضل ان يتم وضع متغير لعدد الاشهر فى الكود السابق لو وضع 2 يقسم كل شهرين ولو 3 يقسم كل ثلاث اشهر وهكذا الرجاء الافادة
-
الاخوة الافاضل Dim i As Integer Dim newdate As Date Dim z As String Dim rst As DAO.Recordset Set rst = CurrentDb.OpenRecordset("Trabet_Month", dbOpenDynaset) If Me.Bakey Mod Me.PriceDofa > 0 Then z = Int(Me.Bakey / Me.PriceDofa) Else z = Int(Me.Bakey / Me.PriceDofa) - 1 End If For i = 0 To z newdate = DateAdd("m", i, Me.Start) rst.AddNew 'rst!id = me.id rst!ID = Me.ID rst!Date = newdate rst!iD2 = i + 1 If i = z And z = Int(Me.Bakey / Me.PriceDofa) Then rst!Price_Dofa = Me.Bakey Mod Me.PriceDofa Else rst!Price_Dofa = Me.PriceDofa End If rst.Update Next i DoCmd.Requery End Sub هذا كود اخر يحل مشكلة باقى الاقساط ويعمل ولكن الاشهر متتالية مطلوب التعديل فيه على اساس انه هناك متغير لعدد الاشهر لو عدد الاشهر 2 يكون التقسيم كل شهرين وهكذا على اساس ان الدفع كل شهرين او ثلاثة او اربعة وهكذا مطلوب ضرورى بارك الله فيكم
-
للرفع بارك الله فيكم
-
الاخ والاستاذ الفاضل :Bluemind بارك الله فيك فعلا تم المطلوب من حيث تسلسل الاقساط طلب اخر الله يكرمك فى الملف المرفق قمت بتعديل على اساس ان هناك دفعة من الاقساط وحسب الاختيار من مريع تحرير اسمة Dofa الدفعة كل 1 او 2 او 3 او 4 شهر على حسب الاختيار هل ممكن ان تاريخ الاقساط يكون على حسب الاخيار من مربع تحرير Dofa بمعنى لو الدفعة كل ثلاث شهور البداية مثلا فى شهر 2 يبقى التاريخ الثانى فى شهر 5 وهكذا ارجوا ان تكون وصلت الفكرة وبارك الله فيكم تقسيط3.rar
-
الاخوة الافاضل بعد البحث فى المنتدى والمواقع الاخرى تم الحل لكنه ناقص ولكنها خطوة فى الطريق بوجد عدة اسئلة واضافات للكود ولكن لشروط المشاركة سوف اطرح سؤال سؤال اولا: هل يمكن عند اضافة الاقساط يتم تسلسلها من 1 الى اخر قسط بارك الله فيكم تقسيط2.rar