أولا لا يوجد لديك فورم لاضافة الاسماء جديدة
لاضافة اسماء جديدة حتى تظهر في القائمة المنسدلة ثم يمكن اضافة المكان وغير ذلك
تم عمل فورم جديد باسم MyNameKhetab يمكنك اضافة الاسماء عن طريقها أولا
333_2.rar
الاستاذ الفاضل ابو خليل
تم اضافة الصف والشعبة واسم الطالب بنجاح والحمد لله
ولكن واجهتني مشكلة في التقارير
عند الضغط على أي تقرير في الفورم تظهر الرسالة التالية
ما عاد واحد منهم يعمل جيدا
علما بأنن تم تغيير اسم ComboBox1 إلى SName
فما سبب هذه الرسالة
Wak.rar
السلام عليكم ورحمة الله وبركاته
قمت بتجربة الملف
فوجدته كما قال الاستاذ أبو خليل
الملف يعمل جيدا
حيث قمت بادخال بيانات اكثر من موظف جديد
ووجدت البيانات كلها يتم تسجيلها
الاستاذ الفاضل أبو عبدالله
استخدم هذا الكود منذ 2012 وعملت به على اكسيس 2010 و2013 واعطى نفس النتيجة
الاستاذ الفاضل أزهر
جزاك الله خير وشكرا على البرنامج
لدي نموذج به قائمة منسدلة تحتوي على الصفوف الدراسية من الصف الأول إلى الثاني عشر
عندما اختار صف دراسي واضغط على زر طباعة يقوم بطباعة تقرير يعتمد على استعلام ( يعطي فقط اسماء الطلاب الموجودة بالصف الذي تم اختياره من القائمة المنسدلة وهي تعمل بكفاءة والحمد الله )
ولكن في بعض الأحيان أريد ان اطبع كل الصفوف الدراسية دفعة واحدة أو عدد من الصفوف
فحاولت ان استخدم قاعدة iif مع like ولكن لم تفلح
فكيف يمكن عمل ذلك
شكرا
للخروج من البرنامج
ضع الكود التالي مع تغير ما يلزمك في حدث الضغط عند الزر الخاص بالخروج
If MsgBox("هل تريد الخروج من البرنامج ؟", vbInformation + vbYesNo + vbMsgBoxRight, "تنبيه - على المصري") = vbYes Then
DoCmd.SetWarnings Off
DoCmd.Quit
DoCmd.SetWarnings True
Else
Cancel = True
End If
هل تريد حفظ التقرير على شكل اكسيل
إذا كان المطلوب هكذا جرب التالي
DoCmd.OutputTo acOutputReport, "adding_date", "ExcelWorkbook(*.xlsx)", "", True, "", , acExportQualityPrint