ابوابراهيم

السلام عليكم ورحمة الله وبركاته احبتي اعضاء هذا المنتدى الجميل والرائع بمعنا الكلمة أود ان أسأل عن ما هو افصل إصدار للأكسس من أجل عمل برامج تعمل على جميع الإصدارات وخاصة عند التقفيل بـ MDE أو بـ accde ولكم مني الشكر والتقدير

بارك الله بجهود اخي احمد شوقي ونفع بك

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

أما بالنسبة للنسبة المئويه بصراحه مدري كيف جات معك 1% اللي اعرفه أن النسبه حتكون 58 % وذلك حسب المعادلة التالية مجموع ماحصل عليه الموظف من نقاط / محموع النقاط * 100 = 7/12*100 =58%

اخي الكريم بالنسبة للمجموع تضع في مصدر البيانات =[التوجيه والارشاد]+[اللباقة وفن التخاطب]+[نشر المعلومه للمراجعين]

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

عزيزي هذا ليس تأثير على زر امر بل هو من قائمة الادوات تجد زر تبديل هو المستخدم في المثال

اخي أنا نزلت الملف مافيه مشكلة يمكن المشكلة بجهازك على العموم بعكس الفارة وفتح بستخدام برنامج الضغط عندك ( ون رار أو ون زب )

اخي الحبيب تفضل هذا المثال قد تجد فيه ظالتك للمعلوميه عند طلب رقم سري للعمليات فهو 500 many.rar

اخي Dream_Works بارك الله فيك ورحم والديك بودي شرح للكود وسامحنا على ثقالتنا

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

اخوي بارك الله فيك ونفع بعلمك السجلات متغيره وغير ثابته لذا يجب الكود إعادة التحجيم لا يفيد أسأل الله العظيم أن يدخلك ابواب الجنان بلا حساب إريد كود بارك الله فيك

أرجو الاجابة إذا ماحد يعرف يقول ما اعرف لا يقراء وجري

كود a = DLookup("[حقل الاسم]", " Table_name", "[حقل الاسم]='" &TextBox_on_form& "'") If Not (IsNull(a)) Then MsgBox "هذا الاسم موجود", vbCritical, "رساله تحذيرية" Cancel = True End If

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