kanory

هذه ابسط طريقة .... طباعة.accdb

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

جرب المرفق لعله ماتريد .... DATA144 - kanory.mdb

وعليكم السلام استاذي الغالي .... التقرير يعمل عندي اوقيس 19

تفضل أخي الكريم خط السير 2021 (1).rar

ربما هذا ما تريده .... جرب واعلمنا بالنتيجة ؟؟؟؟ مثال اوفيسنا القيم الافتراضية (1).accdb

هل هذا ماتريده .....

اهم الاختلافات : اسماء المخازن في الكمبولست هي التر تظهر في التقرير يمكن تعديل مسميات المخازن من خلال الجدول أنظر الصور

طيب شوف المرفق هذا ربما اكثر احترافية ... __DATA144 - kanory.mdb

تفضل .................. __DATA144 - kanory.mdb

هل هذا ما تريد ؟؟؟؟؟

اخي الكريم هل طبق ما في هذه المشاركة للعلم ان التقرير والكود اساسا اعتماده على الارقام .... يعني لو حذفت هذه الارقام يختل الكود وطريقة ظهور البيانات في التقرير وهذا يعيدنا للمربع الاول للسؤال .... 😅

استبدلها بهذا ... ="مستودع"

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

بالنسبة لعبارة مخزن تجدها في التقرير اما رقم ١ و ٢ و٣ تجدها في الاستعلام لاحظ الصور ... الشرح فيها

هذا طلبك الاول ... قي المرفق ... انظر الصورة .... هذه النقطة معتمده في الاساس عل الاستعلام الذي انت فعلته .... انظر الاستعلام ومن اين اتت هذه المسميات لأنها موجودة في برنامجك اساسا ‏‏DATA144 - kanory.mdb

مشاركة من الاساتذه : طريقة اخرى تمكنك من اختيار مخازن بعينها لتظهر في التقرير ..... جرب ووافينا بالنتيجة ... ‏‏DATA144 - kanory.mdb

جرب هذا الكود ... Like "*" & [Forms]![SearchF]![k].[Text] & "*"

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

وهذه طريقة اخرى مشاركة مع استاذي الفاضل @kha9009lid وهي عن طريق انشاء جدول وفرز عمليات كل الموظفين من الجدول المعطى ثم عرضها عن طريق استعلام تجميع ميزة هذه الطريقة انها لا تتقيد بعدد الموظفين الذين يشتركون في العملية ( يعنى ممكن مشاركة العملية عدد لا حصر له من الموظفي ... اثنين أو 100 ) وهذا هو الكود المستخدم DoCmd.SetWarnings False DoCmd.RunSQL "DELETE * FROM Table3" DoCmd.SetWarnings True Dim rstS As DAO.Recordset Dim rstD As DAO.Recordset Dim x() As String Dim i As Long Set rstS = CurrentDb.OpenRecordset("Select * From [Table1]") Set rstD = CurrentDb.OpenRecordset("Select * From Table3") DoCmd.Hourglass True Do While Not rstS.EOF x = Split(rstS![الاسم], "-") For i = LBound(x) To UBound(x) rstD.AddNew rstD!عدد_العمليات = rstS![عدد_العمليات] rstD!الاسم = Trim(x(i)) rstD.Update Next i rstS.MoveNext Loop rstS.Close: Set rstS = Nothing rstD.Close: Set rstD = Nothing DoCmd.Hourglass False Me.Requery Exit Sub op.accdb

هل هناك جدول اخر لاسماء الموظفين غير هذا الجدول ؟؟؟؟ ممكن تزودنا به

طيب جرب المرفق .... kan_761.accdb

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

هههههه ... البرمجة تعلم الصبر

فقط احذف هذا من الكود لديك ... Me.Requery