Barna

اعتقد ان الباس هو 1

علما انني لم افهم ما تقصده ولكن انظر المرفق ربما هو المطلوب !!! قاعدة.accdb

ممكن تزودنا بمرفق مصغر لما تريد ....

Between [ادخل تاريخ البداية] And [ادخل تاريخ النهاية]

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

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

تفضل .... النماذج.accdb

مشاركة مع اخي الاستاذ @ناقل تفضل -------->>>>>> can.accdb

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

تاكد اخي من ملف المعلمين لا يعمل ثم تابع وناقش هنا موضوع للاستاذ @أبو إبراهيم الغامدي

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

فكر في هذا !!!! لربط جداول المعلمين والطلاب ؟؟؟؟

هذا القالب تختلف عن القالب الاساسي الذي تم العمل عليه ..... انظر اذا كل ماهو عليك هو تعديل هذا السطر لديك لاحظ بارك الله فيك موقع لصق البيانات كان C5 objWorkbook.Sheets(SHEET%).range("c5").CopyFromRecordset RS_STUDENTS الاستبدال يكون بهذا الشكل ولاحظ موقع لصق البيانات اصبح حسب ملفك الجديد C8 objWorkbook.Sheets(SHEET%).range("c8").CopyFromRecordset RS_STUDENTS فقط هذا كل شيئ .... ملاحظة يجب ان تكون جميع ملفات الاكسل ( احياء - فيزياء - رياضيات وغيرها بنفس تصميم ملف الرياضيات الجديد اقصد بذلك موقع لصق البيانات اي C8 ارجو اكون وفقت في الشرح !!!

الحقيقة لا ادري ولكن الكود يعمل طبيعي لدي

ابحث عن هذا الكود لديك واستبدله بهذا ... ("SELECT STUDENT.STUACDID, STUDENT.STUNAME FROM STUDENT WHERE (((STUDENT.المادة)='" & text3 & "') AND ((STUDENT.الشعبة)='" & RS_SECTIONS![الشعبة] & "')) ORDER BY STUDENT.STUNAME;")