اذهب الي المحتوي
أوفيسنا

إختيار واحد أو اختيار متعدد من مربع قائمة لعرض تقرير


moho58
إذهب إلى أفضل إجابة Solved by شايب,

الردود الموصى بها

منذ ساعه, ابوخليل said:

نعم هو ما تفضلت به

عملت لك كودا آخر يحدد الفوج ايضا  هكذا

وانظر الى المعيار في سطر فتح التقرير

Dim myWhere As String
Dim intNumColumns As String
Private Sub funGrop()
Dim varItem As Variant
     myWhere = ""
    For Each varItem In Me.lst_XX.ItemsSelected
      myWhere = myWhere & "'" & Me.lst_XX.ItemData(varItem) & "', "
    Next varItem
    myWhere = Left(myWhere, Len(myWhere) - 2)
End Sub

Private Sub fungrid()
 On Error Resume Next
 Dim varItem As Variant
 intNumColumns = ""
 If Me.lst_XX.ItemsSelected.Count > 0 Then
 For Each varItem In Me.lst_XX.ItemsSelected
 intNumColumns = intNumColumns & "'" & Me.lst_XX.Column(1, varItem) & "', "
 Next varItem
 intNumColumns = Left(intNumColumns, Len(intNumColumns) - 2)
 End If
End Sub

Private Sub cmd_Preview_Click()
  Call funGrop
  Call fungrid
    DoCmd.OpenReport "rap_stat_situat", acViewPreview, , "[groupe] in (" & intNumColumns & ")" & "And [grade] in (" & myWhere & ")"
End Sub

 

 

basey_2023.rar 34.69 kB · 2 downloads

أستاذنا بعد التجربة 

مثلا اختيار:

الدرجة أستاذ الفوج 1

الدرجة استاذ الفوج 2

الدرجة مساعد معلم الفوج 1

الدرجة مفتش الفوج 1

هناك تكرار في الدرجات عند عرض التقرير كما في الصورة

من المفروض يطلع الدرجات  في التقرير بدون تكرار

الدرجة أستاذ تكون مذكورة مرة واحة في التقرير  وبه مجموع الفوج 1 و 2  وهكذا.............

 

1.jpg

رابط هذا التعليق
شارك

31 دقائق مضت, شايب said:

وبعد التطبيق انتهت المشكلة والنتيجة صحيحة

 

فلتره.png

قد وضح لك استاذنا الشايب من اين مكمن الخطأ

انظر محاولته الاخيرة اعلاه لحل المشكلة

  • Like 1
رابط هذا التعليق
شارك

14 دقائق مضت, moho58 said:

هناك تكرار في الدرجات عند عرض التقرير كما في الصورة

سبق ان اشرت اليها

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

لذا جرب المرفق

نفس كود اخي جعفر ولكن يفلتر الحقل المجمع في Column(3)

الاخ شايب يفضل النظر في الملاحظات التي اشار اليها ولكن النفس وما تريد

الشايب

 

 

 

 

basey(1).accdb

  • Like 1
رابط هذا التعليق
شارك

منذ ساعه, شايب said:

سبق ان اشرت اليها

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

لذا جرب المرفق

نفس كود اخي جعفر ولكن يفلتر الحقل المجمع في Column(3)

الاخ شايب يفضل النظر في الملاحظات التي اشار اليها ولكن النفس وما تريد

الشايب

 

 

 

 

basey(1).accdb 672 kB · 6 downloads

الأستاذ شايب معذرة على الـتأخر في الرد

لقد اخترت حسب ما في الصورة

الدرجة أستاذ الفوج1

الدرجة أستاذ الفوج 2

و ظهر في التقرير

الدرجة معلم  مذكورة مرتين

ممكن تكون الدرجة معلم مذكورة مرة واحدة في التقرير  وتكون مجموع فوج 1 + فوج

وبارك الله فيك

5.jpg

رابط هذا التعليق
شارك

1 ساعه مضت, ابوخليل said:
myWhere = myWhere & "'" & Me.lst_XX.Column(3, varItem) & "', "

انا احرص على كتابة الاكواد النادرة هنا من اجل الرجوع اليها وقت الحاجة

أستاذنا أبو خليل  أن شاء الله بقي استفسار

بالنظر إلى الكود الأخير  قبل اعتماده

هل طلبي هذا منطقي

مثلا اختيار:

الدرجة أستاذ الفوج 1

الدرجة استاذ الفوج 2

الدرجة مساعد معلم الفوج 1

الدرجة مفتش الفوج 1

هناك تكرار في الدرجات عند عرض التقرير كما في الصورة

من المفروض يطلع الدرجات  في التقرير بدون تكرار

الدرجة أستاذ تكون مذكورة مرة واحة في التقرير  وبه مجموع الفوج 1 و 2  وهكذا.............

5.jpg

رابط هذا التعليق
شارك

تفضل 

تم الضبط والاستفادة من  فكرة الأخ الشايب في الدمج وبتعديل طفيف على كود الاستاذ جعفر

اتمنى ان تكون النتيجة 100%

تم ارفاق ملف خطأ

تمت الازالة ورفع المرفق الصحيح

bzy.rar

رابط هذا التعليق
شارك

1 ساعه مضت, moho58 said:

الدرجة أستاذ تكون مذكورة مرة واحة في التقرير  وبه مجموع الفوج 1 و 2  وهكذا.............

 

منذ ساعه, ابوخليل said:

اتمنى ان تكون النتيجة 100%

جربت الملف ولكن لا يتم دمج الدرجات المتشابه ربما لم ترفق الملف المعدل وربما المشكلة من جهازي

على كل حال انا اجريت تعديل وفقا لفهمي للطلب والنتيجة في الصورة المرفقة

ولكني ساتريث لحين مشاهدة طريقتك او اي من مداخلات الاساتذة

 

الشايب39.gif

رابط هذا التعليق
شارك

منذ ساعه, ابوخليل said:

تفضل 

تم الضبط والاستفادة من  فكرة الأخ الشايب في الدمج وبتعديل طفيف على كود الاستاذ جعفر

اتمنى ان تكون النتيجة 100%

تم ارفاق ملف خطأ

تمت الازالة ورفع المرفق الصحيح

bzy.rar 47.35 kB · 3 downloads

أستاذنا الكبير لم يتم دمج الدرجات المتشابهة أم الحساب شغال بامتياز

أرفقت لك صورتين لعملية الدمج . وربي يجازيك بغير حساب على الصبر والمتابعة وان شاء الله تجدها في ميزان حساناتك

2.jpg

1.jpg

5 دقائق مضت, شايب said:

 

جربت الملف ولكن لا يتم دمج الدرجات المتشابه ربما لم ترفق الملف المعدل وربما المشكلة من جهازي

على كل حال انا اجريت تعديل وفقا لفهمي للطلب والنتيجة في الصورة المرفقة

ولكني ساتريث لحين مشاهدة طريقتك او اي من مداخلات الاساتذة

 

الشايب39.gif

تحية طيبة الأخ شايب

معك حق لم يتم دمج الدرجات

ربما أستاذنا أبو خليل لم يرفق الملف المعدل الجديد

 

رابط هذا التعليق
شارك

13 دقائق مضت, moho58 said:

تحية طيبة الأخ شايب

اعتقد الصورة المتحركة في ردي السابق تحقق المطلوب

وتعطي نفس العدد المطلوب مثلا استاذ1 واستاذ2 ومساعد معلم 2 تعطي نفس النتيجة في صورتك اعلاه 89 ومثلها للاحتمالات الاخرى

ولكن اذا اعتمدنا مبدأ لا يفتى ومالك في المدينة فقد آن للشايب ان يتوقف

تحياتي

 

لقطة شاشة 2023-11-26 145625.png

رابط هذا التعليق
شارك

هذه نتيجة الفلترة .. كما هو موجود في الاستعلام ,, اين التكرار هنا ... كل درجة وما يقابلها من الفوج .. والعدد تمام كما في الجدول

اما الدمج الذي اتكلم عنه فهو دمج المعيار

الآن انت تطلب شيئا جديدا آخر

تريد دمج الدرجات المتشابهه  وغض النظر عن الفوج

 

image.png.b973853dda3b153756f442226c2d17f3.png

bzy.rar

رابط هذا التعليق
شارك

2 ساعات مضت, شايب said:

اعتقد الصورة المتحركة في ردي السابق تحقق المطلوب

وتعطي نفس العدد المطلوب مثلا استاذ1 واستاذ2 ومساعد معلم 2 تعطي نفس النتيجة في صورتك اعلاه 89 ومثلها للاحتمالات الاخرى

ولكن اذا اعتمدنا مبدأ لا يفتى ومالك في المدينة فقد آن للشايب ان يتوقف

تحياتي

 

لقطة شاشة 2023-11-26 145625.png

الأخ الشايب تحية طيبة

لم أفهم مبدأ لا يفتى ...

رابط هذا التعليق
شارك

16 دقائق مضت, moho58 said:

الأخ الشايب تحية طيبة

ولك مثلها واطيب

16 دقائق مضت, moho58 said:

لم أفهم مبدأ لا يفتى ...

هو مثل دارج

ابحث عنه ان اردت وستجد بعون الله تفسير مالم تحط به خبرا

تحياتي

رابط هذا التعليق
شارك

1 ساعه مضت, ابوخليل said:

هذه نتيجة الفلترة .. كما هو موجود في الاستعلام ,, اين التكرار هنا ... كل درجة وما يقابلها من الفوج .. والعدد تمام كما في الجدول

اما الدمج الذي اتكلم عنه فهو دمج المعيار

الآن انت تطلب شيئا جديدا آخر

تريد دمج الدرجات المتشابهه  وغض النظر عن الفوج

 

image.png.b973853dda3b153756f442226c2d17f3.png

bzy.rar 47.35 kB · 0 downloads

أستاذنا الكبير لا تغضب مني أن أكثرث عليك بالأسئلة أنا لم أغير السؤال ربما لم أجد طريقة طرح السؤال و سامحني كثيرا كثيرا من أمس و أنت تتابع معي

ربي يبارك فيك وفي أهلك ومالك وأولادك و ربي يرزقك من حيث لا تحتسب

ما أقصده  دمج الدرجات المتشابهه  وغض النظر عن الفوج في التقرير فقط أما في النموذج ترك الدرجات والفوج

 

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

 

أستاذنا الكبير إن لم تفهم عليا أو لم أستطع ايصال الفكرة  أو لم بكن لديك الوقت فهذا يفي بالغرض .

 

3 دقائق مضت, شايب said:

ولك مثلها واطيب

هو مثل دارج

ابحث عنه ان اردت وستجد بعون الله تفسير مالم تحط به خبرا

تحياتي

إن شاء الله

مشكور كثيرا الأستاذ شايب  على المتابعة والاهتمام.  جزاء الله خير الجزاء ا وجعلها في ميزان حساناتك أخي

رابط هذا التعليق
شارك

منذ ساعه, moho58 said:

أستاذنا الكبير لا تغضب مني أن أكثرث عليك بالأسئلة أنا لم أغير السؤال ربما لم أجد طريقة طرح السؤال

بارك الله فيك ولماذا اغضب ؟ غفر الله لي ولكم

انا اعطيتك اجابات حسب فهمي للسؤال

الآن اتضح جيدا ما تريد

برمجيا يمكن تنفيذ الفكرة ولكن بطريقة تحتاج الى وقت وصبر ويتم تنفيذها على النحو التالي:

1- تصبح السجلات في التقرير  ثلاثة فقط ثابتة ( يمكن نضعها في رأس الصفحة بدلا من مقطع التفصيل )

2- تكون الحقول غير منضمة .. ( مصدر بياناتها متغيرات )

3- المسميات ثابتة للدرجات ( الاستاذ والمعلم والمفتش) كل واحد عبارة عن ليبل

4- عمل كود خاص يأخذ جميع البيانات من الاستعلام  ( الأعداد حسب النوع والفوج ) على هيئة متغيرات .. حسب الاختيار من القائمة .

عند نقر زر فتح التقرير تكون المتغيرات تحمل القيم المختارة

هذا تصور لطريقة التنفيذ .. ولا اعدك بالعمل عليه لانشغالي الوقت الحالي.. ولعل عند احد اخوانك طريقة ايسر  منها .. يتم تنفيذها من خلال الاستعلامات فقط

 

رابط هذا التعليق
شارك

2 ساعات مضت, ابوخليل said:

بارك الله فيك ولماذا اغضب ؟ غفر الله لي ولكم

انا اعطيتك اجابات حسب فهمي للسؤال

الآن اتضح جيدا ما تريد

برمجيا يمكن تنفيذ الفكرة ولكن بطريقة تحتاج الى وقت وصبر ويتم تنفيذها على النحو التالي:

1- تصبح السجلات في التقرير  ثلاثة فقط ثابتة ( يمكن نضعها في رأس الصفحة بدلا من مقطع التفصيل )

2- تكون الحقول غير منضمة .. ( مصدر بياناتها متغيرات )

3- المسميات ثابتة للدرجات ( الاستاذ والمعلم والمفتش) كل واحد عبارة عن ليبل

4- عمل كود خاص يأخذ جميع البيانات من الاستعلام  ( الأعداد حسب النوع والفوج ) على هيئة متغيرات .. حسب الاختيار من القائمة .

عند نقر زر فتح التقرير تكون المتغيرات تحمل القيم المختارة

هذا تصور لطريقة التنفيذ .. ولا اعدك بالعمل عليه لانشغالي الوقت الحالي.. ولعل عند احد اخوانك طريقة ايسر  منها .. يتم تنفيذها من خلال الاستعلامات فقط

 

بارك الله فيك استاذنا وربي يجازيك خير الجزاء

 

ربما الأخ شايب عنده فتوى...

تم تعديل بواسطه moho58
رابط هذا التعليق
شارك

  • أفضل إجابة
21 دقائق مضت, moho58 said:

ربما الأخ شايب عنده فتوى...

ههههه

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

اما مصدر التقرير فيكون استعلام جديد مبني على الجدول المؤقت

جرب المرفق لعله يكون المطلوب ولي عود غدا ان اراد الله

الشايب

 

basey(٢).accdb

  • Like 2
  • Thanks 1
رابط هذا التعليق
شارك

 

أستاذنا الكبير @ابوخليل

الأستاذ @kkhalifa1960

الأستاذ @شايب      

أشكركم جميعا  على التفاعل والمشاركة والصبر معي

ربي يجازيكم خير الجزاء وجعلها الله في ميزان حساناتكم

مرة أخرى أجدد الشكر والتقدير للمشرفين على هذا المنتدى الجميل الذي تعلمنا فيه الكثيييرر  والكثيييرررر

 

منذ ساعه, شايب said:

ههههه

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

اما مصدر التقرير فيكون استعلام جديد مبني على الجدول المؤقت

جرب المرفق لعله يكون المطلوب ولي عود غدا ان اراد الله

الشايب

 

basey(٢).accdb 584 kB · 4 downloads

الأخ والأستاذ  @شايب  

روعة و إبداع و عمل ممتاز --- شغال بامتياز بامتياز---

جعله الله في ميزان حساناتك أخي شايب

و ربي يبارك فيك ويجازيك خير الجزاء

رابط هذا التعليق
شارك

الحمد لله على انقضاء حاجتك

وكما ذكر استاذنا انها اسهل طريقة

3 ساعات مضت, شايب said:

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

 

تم استخدام جدول مؤقت واستعلامين ( الحاق وتحديد ) كل هذا من اجل جزء صغير في الفلترة

يتبين لنا _ وهي دروس لمن يمر من طلاب العلم  _ اهمية الاعتناء بتصميم الجداول ابتداء على الطرق العلمية الصحيحة

  • Like 2
رابط هذا التعليق
شارك

12 ساعات مضت, شايب said:

ولي عود غدا ان اراد الله

الطريقة الثانية وهي لا تحتاج الى جدول مؤقت ولا استعلام الحاق فقط امر انشاء استعلام برمجيا بالكود والطريقة تعمل بشكل صحيح

11 ساعات مضت, moho58 said:

و ربي يبارك فيك ويجازيك خير الجزاء

جزاك الله وامين لنا ولكم

8 ساعات مضت, ابوخليل said:

تم استخدام جدول مؤقت واستعلامين ( الحاق وتحديد ) كل هذا من اجل جزء صغير في الفلترة

يتبين لنا _ وهي دروس لمن يمر من طلاب العلم  _ اهمية الاعتناء بتصميم الجداول ابتداء على الطرق العلمية الصحيحة

اتفق معكم استاذنا

اخونا الشايب

  • Like 1
رابط هذا التعليق
شارك

في 27‏/11‏/2023 at 10:08, شايب said:

طريقة الثانية وهي لا تحتاج الى جدول مؤقت ولا استعلام الحاق فقط امر انشاء استعلام برمجيا بالكود والطريقة تعمل بشكل صحيح

بارك الله فيك اخونا الشباب في فكرك والكبير قدرا .... ممكن الكود الذي اشرت اليه ( الطريقة الثانية ) للعلم والاستفادة ... جزاك الله خيرأ .....

لانه لدي كود واريد ان استفيد من تعدد الطرق ...

  • Like 1
رابط هذا التعليق
شارك

18 دقائق مضت, ابو البشر said:

ممكن الكود الذي اشرت اليه ( الطريقة الثانية ) للعلم والاستفادة

تفضل يا ابا البشر

وانا كان فيها لزوم مالا يلزم

حيث يمكن ان نصل للنتيجة بدون جداول مؤقتة واستعلام الحاق واستعلام تحديد

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

على كل حال مرفق الملف حسب الطريقة الثانية

وسوف اشير الى الطريقة الثالثة في رد اخر

مع التأكيد ان اخونا شايب مجرد هاوي ويترك التجويد للاساتذة

 

basey(٢)(1).accdb

  • Like 1
  • Thanks 1
رابط هذا التعليق
شارك

من فضلك سجل دخول لتتمكن من التعليق

ستتمكن من اضافه تعليقات بعد التسجيل



سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information