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

كل الانشطه

هذه الصفحة تحدث تلقائياً

  1. الساعة الأخيرة
  2. وعليكم السلام في اعدادات النموذج ، بدل استعمال جميع السجلات (All Records) ، استعمل السجل الحالي (Current Record)
  3. Today
  4. سلمت يمناك عمي أبو خليل 🙂🌹
  5. تفضل د/ @jo_2010 التعديل توصلت للحل النهائي . ووافني بالرد . JO-2.rar
  6. Yesterday
  7. بوركت جهودك اخينا موسى ,,, عمل جبار تشكر عليه ,,,,
  8. تفضل د/ @jo_2010 التعديل حسب طلبك . ووافني بالرد . JO-1.rar
  9. سؤال حتى تتوضح الفكرة عندي بشكل أكبر .. من هاتين العبارتين فهمت أن العجلة تعمل على التنقل بين السجلات بشكل تلقائي في اوفيس 2007 وما فوق ، هل هذا صحيح فعلاً ؟؟ أنا عندي اوفيس 2019 ولم تنجح الفكرة دون أي تدخل برمجي.
  10. ما شاء الله ، تبارك الرحمن .. عمل جميل وخفيف ويقوم بمهام خدمية لهذه الفئة التي فعلاً قد تحتاج إليه .. والتطويرات القادمة يبدو أنها جميلة ومفيدة .. ننتظرها بفارغ الصبر
  11. شكراً لك مرورك العطر هذا بعض ما عندكم 😇 من إنجازات وأعمال قيمة .. موضوع الترميش هو نفس الدالة التي طرحتها سابقاً في هذا الموضوع هنا .. والحركة تم بنائها لتتوافق مع دالة الترميش والحمد لله ..
  12. يبدو أنك مازلت تستخدم أوفيس 2003 أو نسخة أقدم لأن هذه المشكلة لم تعد موجودة منذ أوفيس 2007 يوجد حل بسيط وهو تشغيل التطبيق في أكسس 2007 أو إصدار أحدث أما لو كنت مضطراً للعمل مع أوفيس 2003 فيمكنك تجربة الحل الموجود في المرفقات وسيكون المطلوب منك مايلي 1- نسخ الملف MouseHook.dll إلى نفس المجلد الخاص بتطبيقك 2- إستيراد الوحدة النمطية mdlMouseHook إلى التطبيق الخاص بك 3- في حدث عند التحميل (OnLoad) للنموذج الذي تريد توقيف عجلة الماوس فيه إنسخ السطرين التاليين Dim blRet As Boolean blRet = MouseWheelOFF(True) وفي حدث الإغلاق (OnClose) إنسخ السطرين التاليين Dim blRet As Boolean blRet = MouseWheelON() تلميح : إذا أردت إيقاف عمل عجلة الماوس في جميع نماذج التطبيق الخاص بك يمكنك تشغيل الكود الأول عند فتح أول نموذج في التطبيق والكود الثاني عند إغلاق آخر نموذج ستجد في الملف المرفق مثال يحتوي نموذجين واحد يتم التنقل خلال سجلاته بالعجلة والاخر تم توقيف عملها أرجو منك التأكد من عمل الكود أولاً تحياتي إيقاف عجلة الماوس.rar
  13. معذرة نسيت ان افعل خاصية تغيير كلمة المرور .. هي موجودة فعلا .. بحاجة الى زر فقط ايضا يوجد فنكشن التفقيط .. حاليا هو زائد .. ولكن لا بأس قد يحتاج اليه عند عمل تقارير الدخل العام جاء على بالي الآن التطوير القادم سيكون على النحو التالي : 1- ادخال مبلغ شراء المعدات 2- عند الجرد السنوي يتم حساب الميزانية ( مبالغ المعدات / المصاريف / مبالغ الايجارات / نسبة الاهلاك لكل معدة ) 3- ايضا الاخذ بالاعتبار لوضع وحالة كل معدة على حدة .. وأي من هذه المعدات الناجحة .. وجدول للمقارنة بين المعدات
  14. ماشاء الله عليك أخي فادي 😃👏 جميلة جدا .. 👌 وأجمل ما فيها ... لا ترميش .. مؤثرات الحركة واللعب تعطي داينميكية وتجربة بصرية رااااائعة ما شاء الله 😎 سلمت يمناك يا عجييييييييب 😇🌼
  15. برنامج صغير خفيف .. يخدم الايجار اليومي وغيره ويصلح لأي خدمة ايجارات قابل للتطوير بمجرد تنفيذ اجراء الايجار يطبع فاتورة استلام .. وعند تنفيذ اجراء الارجاع يطبع فاتورة بالمبالغ المستحقة حاليا هذه الفواتير تفتح كتقارير يتم عرضها .. وهي مصممة للعمل على الطابعة الحرارية امل ان تجدوا المتعة والفائدة كلمة المرور = 1 Equps.rar
  16. استاذنا الفاضل Barna لا يوجد 90 مرة ولا 90 مادة لا يوجد الا 15 مادة فقط في جدول الاكسل الرئيسي ولكن 90 مادة مقسمه على 6 جداول رئيسية والغرض من الكمبوبوكس هو ليس طباعة كل المواد بل مواد معينة حسب الحاجة فقط قاعدة البيانات هذه تغلبت عل معضلة طباعة مادة رسوب واحدة لمجموعة طلاب مدرسة معينة مشتركين في مادة الرسوب وقد يشتركون في مواد اخرى حسب اختيار المادة من الكمبوبوكس وبمجرد اختيار طباعة التقرير يتم طباعة كل المدارس دفعة واحدة بجميع طلابها . وشكرا لسؤالك
  17. وعليكم السلام ورحمة الله وبركاته .. يمكن تحقيق ذلك باستخدام حدث MouseWheel في النموذج ، كمثال :- If Not Me.Dirty Then If (count < 0) And (Me.CurrentRecord > 1) Then DoCmd.GoToRecord , , acPrevious ElseIf (count > 0) And (Me.CurrentRecord <= Me.Recordset.RecordCount) Then DoCmd.GoToRecord , , acNext End If End If جربه وأخبرنا بالنتيجة ..
  18. السلام عليكم ورحمة / الاساتذة الكرام سؤال كيف يمكن عدم تغيير سجل البيانات في نموذج عندما اقوم بتحريك بكرة الماوس فلا تتغير الى السجل التالي وجزاكم الله خيرا
  19. فكرتي البسيطة .. Report.zip
  20. وعليكم السلام ورحمة الله وبركاته هذه الدالة تقوم بالمهمة ان شاء الله صعها في f3 ثم اسحب لاسفل تحياتي =IF(B3="فروج مسحب"; D3*E3*2.55; D3*E3*1.85)
  21. السلام عليكم برجاء من اخوانى العباقرة المساعدة فى ايجاد دالة كما هو مطلوب بالملف المرفق بارك الله فيكم Chicken Menu Engineering.xlsx
  22. سؤال .. للاستاذ @ahmed helmy draz هل عند الطباعة تختار مادة مادة ثم تضغط طباعة يعني تكرر الفعل 90 مرة ام لديك طريقة اخرى مريحة لمستخدم البرنامج
  23. لو حضرتك ممكن تساعدنى بالتعديل على التقرير او الجداول او الاستعلامات بما يناسب رؤية حضرتك للحصول على افضل النتائج لان اكيد امكانياتى المتواضعة لاتقارن بخبرة حضرتك
  24. اهلا بك اخي احمد لا عليك ... مرحبابك المهم انك وجدت مطلوبك اخي الكريم
  25. تقريرك مصمم بطريقة لا تسمح بذلك انا حاولت من غير ماتسأل لكن !!!!
  26. الخبير الافاضل الذى ابهرنى كثيرا فى مساعدتى شكرا لك برجاء ملاحظة شكل التقرير اريد تقريب الحقول من بعضهم وازالة الفرغات
  27. اريد ان يظهر فى التقرير اسم التحليل والنتيجة وnormal فقط والناقى يختفى
  28. اخفاء الحقول الفارغة من التقرير تفضل د/ @jo_2010 حسب طلبك . ووافني بالرد . Report-1.accdb
  1. أظهر المزيد
×
×
  • اضف...

Important Information