jjafferr

وعليكم السلام اذا سمحت لي اشرح لك شئ بسيط عن التقرير: . انا اعطيت كل قسم من اقسام التقرير اعلاه رقم ، علشان اعرف الترتيب الذي يشتغل التقرير (يعني ترتيب تشغيل التقرير) ، وهذه نتيجة الصفحة الاولى: . من هذا نلاحظ ان الاكسس ينتهي من (تنسيق وحسابات وقفل) رأس الصفحة رقم 2 ، ثم يصل الى ذيل الصفحة رقم 4 ويعطي النتيجة ، ولأنه اقفل رأس الصفحة رقم 2 ، فلا يمكن ان نرسل اي معلومة له انا اعتذر ، فلا اعرف طريقة لعمل ما طلبته جعفر

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

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

وعليكم السلام غيّر الكود السابق الى هذا الكود: If Me.PrintCount = 1 Then curTotal = curTotal + nz(Me.الثمن,0) جعفر

وعليكم السلام هذا الكود يقوم بالعمل: Option Compare Database Option Explicit 'Optional, but recommended for every module. Dim curTotal As Currency 'Variable to sum [Amount] over a Page. ' 'From http://allenbrowne.com/ser-11.html ' Private Sub PageFooterSection_Format(Cancel As Integer, FormatCount As Integer) Me.PageTotal = curTotal End Sub Private Sub PageHeaderSection_Format(Cancel As Integer, FormatCount As Integer) curTotal = 0 'Reset the sum to zero each new Page. End Sub Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer) If Me.PrintCount = 1 Then curTotal = curTotal + Me.السعر End Sub . . . جعفر 339.اجمالي السعر.mdb.zip

هلا والله

وعليكم السلام انا شرحت موضوع الامر NZ بطريقة موسعة شوي: جعفر

أخوي حسين ايش رايك نطلع مثل ما يقولون Out of the Box ، وننظر للموضوع بشكل ابعد من الاكسس فقط ايش رايك بهذا البرواز: . وهكذا عملته: بحثت في الانترنت عن برواز ، وانزلته ، وكان عرضة اطول من طوله ، فاستعملت برنامج رسومات وادرته 90 درجة وحفظته ، ضيّقت الكائنات في التقرير ، علشان البرواز يبين من كل الجهات ، وبس : . وعلشان حجم البرنامج لا يكبر بسبب الصورة ، احفظ الصورة في مجلد البرنامج واربط الصورة ، بدل ان تجعلها مضمنه جعفر 338.2.برنامج الفواتير.mdb.zip

الأسف الشديد ، الاكسس لا يعطيك امكانية مثل الاكسل والورد ، فكل الذي استطعت البحث والوصول اليه: . عن طريق الكود التالي ، للنموذج الرئيسي: Private Sub Report_Page() Me.DrawStyle = 0 '0-4 Me.DrawWidth = 20 '11 ' Draw a border around the page. Me.Line (0, 0)-(Me.ScaleWidth, Me.ScaleHeight), , B End Sub جعفر 338.1.برنامج الفواتير.mdb.zip

السلام عليكم ويمكن هذا الموضوع يفيدك: جعفر

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

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

في الجدول ، غير نوع الحقل من نص الى Memo ، جعفر

وعليكم السلام تفضل ، استعمل هذا الكود (نفس كودك ، بس عملت فيه نسخة من حدث تدقيق9_AfterUpdate): Option Compare Database Private Sub all_AfterUpdate() Me.Refresh Dim Rs As DAO.Recordset Set Rs = Form.RecordsetClone Rs.MoveFirst Do While Not Rs.EOF Rs.Edit Rs!bbb = all Rs.Update Rs.MoveNext Loop Set Rs = Nothing DoCmd.SetWarnings False DoCmd.OpenQuery "qu" DoCmd.SetWarnings True End Sub Private Sub تدقيق9_AfterUpdate() DoCmd.SetWarnings False DoCmd.OpenQuery "qu" DoCmd.SetWarnings True End Sub جعفر

من طلب العُلا سهر الليالي ومن يركب البحر ، لا يخشى من الغرق

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

استخدم برنامج الضغط winrar او winzip

وعليكم السلام رجاء ترفق التقرير ، وبالتالي نعرف تفاصيله لأن اللي انت تقوله شئ غير طبيعي في التقارير!! بس الصورة الثانية طبيعية ، شو الغلط فيها؟ جعفر

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

اذا تريد تربط النموذج الرئيسي بالنموذج الفرعي ، بحقل واحد: Link Master Fields: اسم حقل النموذج الرئيسي Link Child Fields: اسم حقل النموذج الفرعي اذا تريد تربط النموذج الرئيسي بالنموذج الفرعي ، بحقلين او أكثر: Link Master Fields: اسم الحقل1 من النموذج الرئيسي ؛ اسم الحقل2 من النموذج الرئيسي ؛ اسم الحقل3 من النموذج الرئيسي Link Child Fields: اسم الحقل1 من النموذج الفرعي ؛ اسم الحقل2 من النموذج الفرعي ؛ اسم الحقل3 من النموذج الفرعي والتسلسل هو سر الرابط ، يعني الحقل1 للنموذج الفرعي يقابله في التسلسل الحقل1 للنموذج الفرعي ، وهكذا .. جعفر

وعليكم السلام للنماذج الفرعية الثلاث ، اعمل التالي لكل نموذج فرعي: جعفر

وعليكم السلام عملت تغيير بسيط للحقل "نوع السيارة" في النموذج ، وعليه ، اصبح الكود (يجب ان تختار نوع السيارة ورقم اللوحة كذلك ، او رقم اللوحة فقط ، وإلا فالسيارة المشابهه ستظهر في التقرير): stLinkCriteria = "[نوع السيارة]='" & Me![نوع السيارة].Column(1) & "' And [رقم اللوحة]='" & Me![نوع السيارة].Column(0) & "'" . . جعفر 335.Human Resources DataBase-beta.accdb.zip

أخي الفاضل رجاء لا تعمل مواضيع جديدة مكررة ، واذا اردت لفت نظر المنتدى ، فيكفي ان تضع كلمة "للرفع" ، وسيصبح الموضوع في اعلى القائمة مرة اخرى. تم حذف الموضوع الآخر. جعفر

السلام عليكم سيدي الفاضل ، استعلام التوحيد يأخذ نتائجه من الاستعلامات التي بداخله ، لذا ، يجب عليك ان تضبط نتائج الحقل عن طريق الامر Round مثلا ، لكل استعلام ، ثم تدمجهم مرة اخر في استعلام توحيد جعفر