ناصر المصلح

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

استفسار ياخوان هل يوجد اصدار يقبل نوع (.accdb) حيث ان البرنامج لايقبل الى من نوع Mdb أو Mda أو Adb

صراحة نفتخر بوجود مبرمجين امثالكم الله يبعد عنكم كل مكروه

الجميل امير والجميلة زهرة مجهود رائع يستحق الشكر هل من الممكن التعديل على الكود ليقبل قاعدة البيانات من نوع (.accdb) حيث انه يعمل بشكل جيد على قاعدة البيانات التي لدي 2010 ولكن لايتم فتح الملف بعد الحفظ مثال

كل الشكر اخي الفاضل على البرنامج ولكن نسخة التفعيل لاتعمل انا استخدم اكسس 2010

بارك الله فيك ام عهود بس لايفتح معي تضهر هذه المشكلة انا استخدم اوفيس 2010

المرفق يعمل بشكل جيد وهوا المطلوب تماماً الله يجزاك بالخير والعافية ويعطيك طيلة العمر ياااااارب مشكور اخوي امير

الاخ امير شكرا لتواجدك اخي الفاضل قمت بوضع الكود في حدث بعد التحديث للحقل الاجراء ويعمل فقط في حال اختيار انهاء الخدمات في حال الاستقاله لايعطي نتائج تم تحديث الكود المرسل منك بالرنامج وهو بالمرفق امل المساعدة mokafa.rar

ارجو المساعدة ياخوان بارك الله فيكم

بما ان طريقة اخاء الحقول بالتقرير غير مجدية قمت بعمل حقل جديد غير منظم بالنموذج عند اختيار نوع الاجراء ( استقالة او انهاء خدمات ) يقوم بنقل الرقم المطلوب للحقل ولكن لم اعرف التعديل على الكود لكي افهمه انه في حال الاستقالة وعدد ايام الخدمة اقل عن 1800 اختار حقل…

للمساعدة ياخوان بارك الله فيكم

شكرا اخت زهره على مثالك المرفق افادني كثيرا وسهل وخفيف وسلس رغم البحث ببيانات 2400 موظف فتحية لك من الاعماق

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

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

للرفع جزيتم خيرا

شكرا للجميع تمت حل المشكلة بحدث في الحالي Select Case Me.Food Case Is = "200" Me.tex11 = (Me.Basic) / 6 Case Else Me.tex11 = (Me.Basic) = 0 End Select :) :)

ياليت البرنامج يكون مفتوح حتى نستفيد منه بشكل اكبر

العزيز omel لم تنجع الطريقة IF ME!A1>200 THEN ME!A2 = A1

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

للرفع