اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

alloui79

عضو جديد 01
  • Posts

    29
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو alloui79

  1. مساعدة في تحويل الاعمدة الى صفوف اكسس والعكس
  2. اخي الكريم ابو احمد جزاك الله كل خير هذا هو المطلوب طلب اخير اخي ابو احمد اريد ان يظهر مانجز على الاستعلام مطبق في التقرير كل صفحة فيها 20 سجل مع مجموع ال20 سجل في اخر الصفحة ومجموع الكلي ل220 سجل في اخر صفحة مع الاخذ بعين الاعتبار لتجميعات السابقة
  3. فكرة الاستعلام ممتازة جدا لكن يبقى شيئ اخر فقد اظفت للاستعلام fonction اخر GP: Fix(CpteDom("[N°]";"Table1";"[N°]<" & [N°])/220)+1 يقوم بتقسم على 220 سجل تقريبا 10 صفحات وهو المطلوب وفي اخر صفحة يظهر المجموع الكلي لكل 220 سجل المطلوب اظافة فئة ثانية اسمها OUP تكون بالحروف اقربلك الصورة مثل كل 1000 سجل ينتمي لحرف a ويقسم على 220 سجل اي 10 صفحات 1000 سجل تنتمي لحرف b ويقسم على 220 سجل اي 10 صفحات الى اخر Database12.accdb
  4. التتحديد يكون على التقرير وليس على النمودج للاسف لم اتوصل الى حل المشكلة
  5. سلام عيكم ارجو مساعدتي في هدا التقرير تحديد 20 سجل في كل صفحة مع مجمع كل صفحة والمجموع الكلي في اخر صفحة Database11.accdb
  6. ارجو من الاخ عمر الضاحي ان يفيدني في حل هذ المشكل
  7. كل عام وانتم بالف خير تقبل الله منكم الصيام والقيام
  8. اريد ان تظهر تفاصيل التقرير بكلمة (لاشي) في وسط الجدول واحدة غير مكرر . تظهر الاسماء فقط وذلك لعدم وجد ائ معطيات اومبلغ لتقريب الصورة ارفقت لكم ملف اكسس مع ملف وورد فيه الجدول الذي اريد اعمل مثله بالاكسس Database10 (1).accdb لا شيى.docx
  9. اريده كما في المثال المرفق لكم بصغة اكسيل لكن في اكسس في تفاصيل التقرير لا شي.xlsx
  10. هل من الممكن ان تكون جملة لا توجد بينات لعرضها في وسط تقصيل التقرير
  11. تفاصيل التقرير تظهر بكلمة (لاشي) واحدة غير مكرر وذلك بشرط اذا لم يكن هناك ائ معطيات
  12. للاسف بعد ماتاكدة جيدا اتضح بعد التجربة ان لم ينجع مع التقرير 1 الفارغ ولم يظهر ارجو التحقق من الكود ممكن تجرب هذا Private Sub Commande24_Click() Dim varcode As String Dim vars As String Dim ContRec As Integer ContRec = DCount("code", "listecont", "[code]='" & Me.code & "'") Debug.Print "ContRec >> " & ContRec If Me.code.Value <> "" Then varcode = "'" & Me.code.Value & "'" If x <> "" Then x = x & " and " End If x = x & "code = " & varcode & " " End If 'If Nz(DLookup("mtRole", "listecont", "code='" & Forms!Chrche_Filter!code & "'"), 0) <> 0 Then ' ' DoCmd.OpenReport "data", acViewPreview, , x 'Else ' DoCmd.OpenReport "nodata", acViewPreview, , x 'End If If ContRec <= 0 Then DoCmd.OpenReport "nodata", acViewPreview, , x ElseIf ContRec >= 1 And ContRec <= 17 Then DoCmd.OpenReport "data", acViewPreview, , x ElseIf ContRec >= 18 And ContRec <= 999999999 Then DoCmd.OpenReport "data", acViewPreview, , x End If End Sub شكرا لك اخ عمر ضاحي فلا هذه المرة اشتغل معايا
  13. مشكور استاذ عمر وضاحي نجحت الفكر تسلم اخي للاسف بعد ماتاكدة جيدا اتضح بعد التجربة ان لم ينجع مع التقرير 1 الفارغ ولم يظهر ارجو التحقق من الكود ممكن تجرب هذا Private Sub Commande24_Click() Dim varcode As String Dim vars As String Dim ContRec As Integer ContRec = DCount("code", "listecont", "[code]='" & Me.code & "'") Debug.Print "ContRec >> " & ContRec If Me.code.Value <> "" Then varcode = "'" & Me.code.Value & "'" If x <> "" Then x = x & " and " End If x = x & "code = " & varcode & " " End If 'If Nz(DLookup("mtRole", "listecont", "code='" & Forms!Chrche_Filter!code & "'"), 0) <> 0 Then ' ' DoCmd.OpenReport "data", acViewPreview, , x 'Else ' DoCmd.OpenReport "nodata", acViewPreview, , x 'End If If ContRec <= 0 Then DoCmd.OpenReport "nodata", acViewPreview, , x ElseIf ContRec >= 1 And ContRec <= 17 Then DoCmd.OpenReport "data", acViewPreview, , x ElseIf ContRec >= 18 And ContRec <= 999999999 Then DoCmd.OpenReport "data", acViewPreview, , x End If End Sub
  14. لنفترض انه فيه ثلاثة شروط اذا لم يكن هناك بيانات يفتح التقرير 1 واذا كان فيه بيانات و اقل من 17 بيان ينتقل الى التقرير 2 واذا كان اكثر من 17 بيان ينتقل الى التقرير 3
  15. لنفترض انه فيه ثلاثة شروط اذا لم يكن هناك بيانات يفتح التقرير 1 واذا كان فيه بيانات و اقل من 17 بيان ينتقل الى التقرير 2 واذا كان اكثر من 17 بيان ينتقل الى التقرير 3
  16. احمد الفلاحجي مشكور على الحل بارك الله فيك
  17. التقرير الفارغ يعني ان ليس له ديون ةيظهر فيه عبارة لا شيئ
  18. هل من حل عندما لا يكون فيه ايه بيانات يفتح التقرير (1) فارغ وإذا كانت هناك بيانات فيتم نقلي الى التقرير رقم ( 2 ) الملف مرفق Database10.accdb
  19. هل من حل عندما لا يكون فيه ايه بيانات يفتح التقرير (1) فارغ وإذا كانت هناك بيانات فيتم نقلي الى التقرير رقم ( 2 )
  20. ارجو منك ان تساعدني في عمل فروم مثل الذي في الفيديو
  21. من يساعدني شاهدا الفيديو واعمل مثله
×
×
  • اضف...

Important Information