moho58

السلام عليكم الاخوة الأفاضل في هذا المنتدى الجميل في هذا المثال البسيط جدا أريد طريقة : لإظهار ما يتم اختياره من مربع القائمة lst_XX في النموذج form في مربع النص c1 في التقرير rap-1 مثال عندما أختار من النموذج : الاختيار1 الاختيار2 يظهر في التقرير وفي مربع النص c1 ما يلي: الاختيار1 - الاختيار2 أنا اريد هذه الطريقة فقط لجعله كعنوان فقط في التقرير لأني سبق لي وطرحت موضوعين لعمل الاحصائيات وآخره منذ أيام و الحمد لله بالتفاعل مع الموضوع تم التوصل للحل وتم اعتماد الكود الرائع للأخ: الشايب لذا أنا أريد فقط طريقة لجعله كعنوان في التقرير حاولت وبحت لكن لم أجد حل الرجاء المساعدة والتوجيه وبارك الله فيكم. base_1.accdb

أستاذنا الكبير @ابوخليل الأستاذ @kkhalifa1960 الأستاذ @شايب أشكركم جميعا على التفاعل والمشاركة والصبر معي ربي يجازيكم خير الجزاء وجعلها الله في ميزان حساناتكم مرة أخرى أجدد الشكر والتقدير للمشرفين على هذا المنتدى الجميل الذي تعلمنا فيه الكثيييرر والكثيييرررر الأخ والأستاذ @شايب روعة و إبداع و عمل ممتاز --- شغال بامتياز بامتياز--- جعله الله في ميزان حساناتك أخي شايب و ربي يبارك فيك ويجازيك خير الجزاء

ننتظر الأخ @شايب ان شاء الله يحرر الفتوى

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

أستاذنا الكبير لا تغضب مني أن أكثرث عليك بالأسئلة أنا لم أغير السؤال ربما لم أجد طريقة طرح السؤال و سامحني كثيرا كثيرا من أمس و أنت تتابع معي ربي يبارك فيك وفي أهلك ومالك وأولادك و ربي يرزقك من حيث لا تحتسب ما أقصده دمج الدرجات المتشابهه وغض النظر عن الفوج في التقرير فقط أما في النموذج ترك الدرجات والفوج أستاذنا الكبير الصورة المتحركة الأخيرة للأخ الأستاذ شايب تفي بالغرض ولكنه وضع مبدأ لا يفتى لم أفهم عليه أستاذنا الكبير إن لم تفهم عليا أو لم أستطع ايصال الفكرة أو لم بكن لديك الوقت فهذا يفي بالغرض . إن شاء الله مشكور كثيرا الأستاذ شايب على المتابعة والاهتمام. جزاء الله خير الجزاء ا وجعلها في ميزان حساناتك أخي

الأخ الشايب تحية طيبة لم أفهم مبدأ لا يفتى ...

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

أستاذنا أبو خليل أن شاء الله بقي استفسار بالنظر إلى الكود الأخير قبل اعتماده هل طلبي هذا منطقي مثلا اختيار: الدرجة أستاذ الفوج 1 الدرجة استاذ الفوج 2 الدرجة مساعد معلم الفوج 1 الدرجة مفتش الفوج 1 هناك تكرار في الدرجات عند عرض التقرير كما في الصورة من المفروض يطلع الدرجات في التقرير بدون تكرار الدرجة أستاذ تكون مذكورة مرة واحة في التقرير وبه مجموع الفوج 1 و 2 وهكذا.............

الأستاذ شايب معذرة على الـتأخر في الرد لقد اخترت حسب ما في الصورة الدرجة أستاذ الفوج1 الدرجة أستاذ الفوج 2 و ظهر في التقرير الدرجة معلم مذكورة مرتين ممكن تكون الدرجة معلم مذكورة مرة واحدة في التقرير وتكون مجموع فوج 1 + فوج وبارك الله فيك

أستاذنا بعد التجربة مثلا اختيار: الدرجة أستاذ الفوج 1 الدرجة استاذ الفوج 2 الدرجة مساعد معلم الفوج 1 الدرجة مفتش الفوج 1 هناك تكرار في الدرجات عند عرض التقرير كما في الصورة من المفروض يطلع الدرجات في التقرير بدون تكرار الدرجة أستاذ تكون مذكورة مرة واحة في التقرير وبه مجموع الفوج 1 و 2 وهكذا.............

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

لا توجد أستاذنا أختار السنة فقط من النموذج السنة تتغيير ممكن 2023 أو 2024 أو .. حسب سنة تسجيل الطالب عند اختيار السنة يظهر لي في مربع القائمة الدرجات وما يقابلها من أفواج وأنا أختار من مربع القائمة أختيار واحد أو اختيار متعدد لأحصل على الأحصاء كما هو في التقرير هذا ملخص أستاذنا وبارك الله فيك

تفضل أستاذنا

أن شاء الله سأوافيك بعد قليل بهذا الرسم أستاذنا ممكن طريقة لتحديد من مربع القائمة الدرجة والفوج معا ربما يكون الحل في التعديل على الكود لأن في الكود أسفله: نلاحظ تحديد الدرجة(grade) فقط من مربع القائمة وربما يكون الحل في تحديد الدرجة والفوج معا Private Sub cmd_Preview_Click() Dim varItem As Variant Dim myWhere As String myWhere = "" ' Loop through the selected items in the ListBox For Each varItem In Me.lst_XX.ItemsSelected ' Add each selected item to the string myWhere = myWhere & "'" & Me.lst_XX.ItemData(varItem) & "', " Next varItem ' Remove the trailing comma and space from the string myWhere = Left(myWhere, Len(myWhere) - 2) DoCmd.OpenReport "rap_stat_situat", acViewPreview, , "[grade] in (" & myWhere & ")" End Sub

أستاذنا مشكور كثيرا لقد ارفقت لك الصورة: أستاذنا عند اختيار الدرجة: أستاذ والفوج (groupe): 1 نلاحظ في التقرير يظهر الدرجة: أستاذ أستاذ يعني مكررة من المفروض تظهر الدرجة : استاذ مرة وخاصة بالفوج رقم: 01 أستاذنا ممكن طريقة لاضافة الفوج في التقرير ربما يكون فيها الحل وأنت أعلم مني وإن شاء الله تكون قد فهمت المشكل بالضبط وربي يجازيك أستاذنا

تفضل أستاذ خليفة الجدول به البيانات وسامحني على التأخر basey2023.accdb

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

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

مشكور أستاذنا على الرد والمتابعة عندما اختار مثلا الدرجة أستاذ والفوج 1 تظهر النتيجة في المجموع خطأ يعطيك دائما مجموع الدرجة ويتجاهل الفوج دائما يعطيك المجموع الخاص بالدرجة ويتجاهل الفوج سواء اختيار واحد او اختيار متعدد مثال عندما اقوم بتحديد الدرجة أستاذ و الفوج 1 يعطيك الاحصاء مجموع الطلاب الموجودين في الدرجة ويتجاهل الفوج وأنا اريد عدد الطلبة الموجودين في الدرجة والفوج أنا بعيد حاليا عن الكمبيوتر وعندما ارجع اعمل لك رسم وتوضيح أكثر وبارك الله فيك أستاذنا الكبير

نعم اخي الطيب سأدهب الى العمل واحضره وأرسله لك معذرة اخي بعد حوالي 4 ساعات اوافيك به ان شاءالله عندي ملاحظة اخي الطيب انا حاليا حوالي 500 موظف وهذا العدد ممكن يزيد في كل مرة يأتي موظف جديد نقوم بتسجيل بياناته في هذه السنة 2023 حتى انتهاء السنة الجارية لكن أخي في سنة 2024 نسجل موظفين جدد غير هذا الموظفين الموجودين حاليا يعني السنة غير ثابثة وتتغيير وكذا الموظفين في سنة 2023 نسجل موظفين جدد في سنة 2024 نسجل موظفين جدد في سنة 2025 نسجل موظفين جدد وهكذا اعذرني أخي الطيب انا مبتدأ وهي العملية معقدة سامحني ان شاءالله هذه هيا جميع المعطيات قد وافيتك بها ويكون حل

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

السلام عليكم الإخوة الأفاضل في هذا المنتدى الجميل في هذا المثال أريد عرض وطباعة تقرير إحصائي حسب إختيار واحد أو اختيارات متعدد في آن واحد من مربع قائمة في هذا المثال في الجدول يوجد 08طلاب و أنا عندي جدول به أكثر من 500 طالب يعني أحدد الدرجة والفوج سواء اختيار واحد أو عدة اختيارات من مربع القائمة وهو يعطيني الإحصاء والرجاء التعديل على الكود في زر عرض و زر طباعة وزر التحويل إلى صيغة pdf و ربي يجازيكم خير الجزاء basey.accdb

اكيد أخي الطيب وفيت وكفيت ولكن نقص خبرتي و كوني مبتدأ هي السبب

مشكور أخي الطيب بارك الله ربما لا تكفي الكلمات لشكرك سامحني في تعبك . فجزاء الله خير الجزاء وجعله في ميزان حساناتك أخي هذه الطريقة تكون فعالة مثلا عندما يكون عدد قليل جدا ومحدود من الطلبة أنا ارفقت المثال فيه 4 طلبة فقط أنا عندي جدول به حوالي 500 طالب صعب جدا أن أقوم بتحديد هؤلاء الطلبة حسب ما أريد حسب الدرجة والفوج لكي أحصل على الإحصاء لنفرض أنني أريد أعرض الاحصاء الخاص بالدرجة: أستاذ الفوج 1 فيه حوالي 150 طالب بعني يلزمني أن اقوم بتحديد كل هؤلاء الطلبة ليعطيني الإحصاء و لو أرضت أن أجمع معها (يعني اختيار متعدد) الدرجة: مفتش الفوج 2 فيه حوالي 50 طالب يعني يلزمني تحديد 200 لكي أحصل على الإحصاء -- كما أنه في التقرير يجب أن لا تتكرر الدرجة في التقرير لأنه بهذه الطريقة إذا اخترت 150 طالب الدرجة أستاذ يظهرلي في التقرير : استاذ مكرر 150 مرة ومن المفروض تظهر مرة واحدة . (كما في الصورة وهذا عن المثال الذي عملت عليه أخي نلاحظ الدرجة أستاذ : موجود مرتين ومن المفروض تكون موجودة مرة واحدة) ما أريده أخي الطيب : تحديد الدرجة والفوج فيعطيني الأحصاء للطلبة وفق ما هو محدد سواء اختيار واحد أو اختيارات متعددة وبارك الله فيك وسامحني ربما لا أجيد ايصال الفكرة كما يجب أن تكون

مشكور أخي الطيب على الرد والمتابعة تقريبا هذا هو ما أريد بقي أخي في حال أختيار متعدد يعطي النتيجة خطأ و معذرة ربما أنا لم أوضح من قبل يعني عندما أختار مثلا الدرجة : أستاذ فوج 1 و فوج 2 : اختيار متعدد تكون النتيجة خطأ وبارك الله فيك أخي ومرة أخرى بارك الله فيك