عبد الفتاح كيرة

وفقك الله و جزاك خيرا

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

السلام عليكم لأخذ كود المحافظة من الرقم القومى نستخدم هذا التعبير Moh1: (Mid([الرقم القومى];8;2)) أى نأخذ رقمين بدءا من الرقم الثامن من اليسار و بطول رقمين ثم نبحث داخل جدول أكواد المحافظات عن هذين الرقمين باستخدام dlookup MyMoh: DLookUp("[MohaName]";"tblmohafzat";"[Mohid]=" & [moh1]) أرجو إكمال جدول المحافظات saeyd5.rar

السلام عليكم فعلا أستاذ على المصرى الكود معكوس لأن الرقم الفردى = ذكر و الزوجى = أنثى فيكون الكود هكذا tt: IIf([ee]="1" Or [ee]="3" Or [ee]="5" Or [ee]="7" Or [ee]="9";"ذكر";"أنثى") tt: IIf([ee]="1" Or [ee]="3" Or [ee]="5" Or [ee]="7" Or [ee]="9";"ذكر";"أنثى") و بالنسبة للمحافظات عددها 27 الآن فخطة العمل هى إنشاء جدول يحتوى على عمودين كود المحافظة و اسم المحافظة و يتم البحث فيه عن طريق دالة dlookup إن شاء الله إن لم يسبقنى أحد نفذته لك و آسف للتأخر عليكم علما بأننى لم أتذمر لمساعدتكم أبدا فأنتم إخوة أعزة بارك الله فيكم مرفق الملف بعد التصحيح saeyd4.rar

المعذرة يعلم الله أننى فى حالة لا يناسبها كتابة الأكواد و الله المستعان تم التصحيح saeyd4.rar

saeyd3.rarتفضل ملفك بعد التعديل واستخدام الكود فى استخراج تاريخ الميلاد و النوع أيضا أنصحك بتغيير أسماء الحقول إلى حروف أجنبية

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

السلام عليكم هذه دالة بالإكسيل صممها أخونا "خبور" حفظه الله تعالى قمت بنقلها للأكسيس وبما أن الرجل عمله متقن جدا - كما عهدناه- فلم أجد أية صعوبة فى نقل الدالة للأكسيس و هنا استخرجت تاريخ الميلاد من الرقم القومى فى الاستعلام Q1 و الله الموفق kemas.rar

جزاكم الله خيرا على إبداعاتكم

جزاكم الله خيرا

شكرا جزاك الله خيرا

جزاك الله خيرا

شكرا ملف جميل

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

يمكن ذلك عن طريق استعلام " إنشاء جدول" بدلالة كود المدرسة انظر الاستعلام - - New Microsoft Office Access Application.rar

شكرا جزاك الله خيرا

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

افتح النموذج اضغط على العبارة التى كتبتها أنت سيتم تشغيل استعلام حذ حسب ما طلبت Some.rar

أرفق ملفك عسى أن تجد المساعدة إن شاء الله

عليكم السلام و رحمة الله و بركاته أستاذ هشام ضع مربع نص غير منضم تحت العربى مثلا و اجعل مصدر بياناته الصيغة التالية =IIf([c]>=25;"ممتاز";IIf([c]>=20;"جيد جدا";IIf([c]>=15;"جيد";IIf([c]<15;"ضعيف")))) المرفقات db5.rar

شهادة أعتز بها أستاذ حمادة شكرا لك

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

فى حدث " قبل التحديث " لمربع النص الذى تكتب فيه التاريخ اكتب الكود التالى Private Sub s2_BeforeUpdate(Cancel As Integer) Me.s1 = Format(Me.s2, "dddd") End Sub tariq_lab.rar

شكرا الملف محمى بكلمة سر

LastName: IIf([FourthName]<>'';[FourthName];[ThirdName])