اذهب الي المحتوي
أوفيسنا

Hamtoooo

03 عضو مميز
  • Posts

    112
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو Hamtoooo

  1. مدري اذا هذا مطلوبك او لا افتح مصدر السجلات حق التقرير واضف معيار بحقل NO : >=[Forms]![Head]![Text18] 2.accdb
  2. تفضل حساب الصيدلية1.accdb
  3. مرحبا فيك اخي اشكرك على مشاركتك لكن لا يفي بالغرض حيث انني قمت باضافة دورة ولم ينبهني بان الموظف في دورة الان وقبل الاضافة كما انني اريد ان لا يقبل نهائيا اذا كان الموظف في دوره الان اي ان الموظف دورته بدأت من تاريخ 1 وتنتهي في 10 عندما اريد تسجيل دوره اخرى للموظف نفسه تبدأ بتاريخ 7 لا يقبل لانه مرتبط بدوره حاليا القصد هو ان لا يقبل الاضافه اذا كانت بدايه تاريخ الدوره ونهايتها يقع في حرم دورة اخرى واريد كذلك الاستغناء عن الاستعلام الذي وضعته حيث اعتقد يمكنك الاستفاده من الجدول مباشره لجلب ما اذا كان تاريخ الدورة يكون بين تاريخين او لا
  4. السلام عليكم اسعد الله اوقاتكم بكل خير الفكرة : ----------------------- لدي جدول اقوم فيه بتسجيل الدورات للموظفين لدي بالحقول التالية namee اسم الموظف num رقم الموظف Cname اسم الدورة Cstart بداية تاريخ الدورة Cend نهاية تاريخ الدورة المطلوب : ----------------------- لنفترض ان لدي موظف اسمه احمد ورقمه 1020 مسجل مسبقا بدوره تبدا من تاريخ 1-10-2023 حتى تاريخ 15-10-2023 الان اريد عندما اسجل الموظف احمد بدورة اخرى والتي ستبدأ بتاريخ 5-10-2023 يرفض التسجيل ويتم تنبيهي بأن الموظف المسجل هو بالفعل في دورة الان. المرفق لتجاربكم : ----------------------- دورات.accdb
  5. السلام عليكم عندما اريد تغيير اعدادات المايكرو يظهر بشكل غير مفعل ولا يمكن التحكم به كما في الصورة
  6. انا استخدمها عند الحاجه الماسه واكثر استخدامي لها هو عندما اقوم بالغاء امر الطباعه حتى لا تظهر رسالة الخطأ وهو ليس خطأ بل الغاء لكن كثيرا استخدم كود اخونا دروب مبرمج
  7. ك أبسط مثال Private Sub done_AfterUpdate() If Me.done = True Then Me.date_done = Date() Else Me.date_done = "" End If End Sub المرفق ch.accdb
  8. تفضل المهن التربوية.accdb
  9. ارفق لنا مثالك للعمل عليه
  10. الفكرة هي انه النموذج الاول لا بد يكون غير مرتبط بالجداول اذا سويت تسجيل دخول وكان المصدر متغير مكانه بيطلب منك اعادة الربط شوف المرفق جرب تغير مكان الجداول وحاول تفهم الفكره ان شاءالله تناسبك 111.rar
  11. تفضل .. تضع هذا الكود بعد تحديث حقل الرمز و في الحالي If Me.الرمز = "A" Then Me.NOTE.Enabled = True Me.TIME_WORK.Enabled = True Else Me.NOTE.Enabled = False Me.TIME_WORK.Enabled = False End If BASEF1.accdb
  12. تمت التجربة وشغال حدث تطبيق واتساب عندك ومتى لا يعمل عند ارسال حسب الدوله او للكل ؟
  13. احسن الله إليك ابو خليل اجابه كافيه ووافيه ماذا لو اردت ان اجعل المرفق يقبل تنسيق الصور وال PDF معا الكود يعمل على الصور فقط
  14. السلام عليكم لدي نموذج فيه التالي : اريد عند ارفاق مسار الصورة يتم نسخ الصورة وحفظها في مجلد IMAGE الموجود بجانب القاعدة .. إليكم المرفق .. 123456.rar شكرا لكم
  15. توزيع سريع لإحدى الصفحات الجمعية 9.rar
  16. لا أعلم لماذا يتم اختيار الطرق الصعبه دائما من قبل خبرائنا الكرام .. الطريقه سهله جدا .. افتح اي نموذج بوضع التصميم اختر تنسيق جميع الصور تحفظ كما هو موضح بالصورة كل ماعليك اضغط يمين الماوس وحذف
  17. انا استخدم هذه الطريقه وهي فعاله وخفيفه لكن لا تنسى ان تغلق الاكواد برقم سري توضع عند حدث فتح النموذج الأول
  18. شوية تنسيقات وترتيبات لعمل القاعدة بشكل ارتب وانظم تقدر تتجاهل اذا ماناسبك السجل الاشرافي.rar
  19. جرب توقف الكود اللي في اللون الاخضر نفس اللي سويت وجرب لتعطيله ضع فاصله قبل الكود ' وشوف يشتغل او لا
  20. جرب هذا الكود ضعه بعد تحديث حقل اختيار المنتج Me.Text406.Value = DLookup("[الكمية المباعة]", "[Totall]", "[اسم الصنف]= [kk]")
  21. استخدم دالة المتغير المؤقت ( teampvar ) الافضل تنزل لنا القاعده عشان يخدمونك الشباب
  22. شوف هذا الموضوع اعتقد بيفيدك تبني فكرة القاعدة عليه
  23. احسن الله إليك تمت التجربه وتعمل كما ينبغي شكرا لك
×
×
  • اضف...

Important Information