اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

ابوخليل

أوفيسنا
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    12840

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

  • Days Won

    239

 نوع المحتوي 

كل منشورات العضو ابوخليل

  1. ابوخليل
    جميل استاذ رمهان ولكن الاصفار لا يتم كتابتها آليا كما في التاريخ فلو كتبنا 1436/1/1 سوف تظهر كما هي 1436/1/1 والحاجة تدعو غالبا الى كتابة الرقم الثاني آليا اذا كان صفرا ليظهر هكذا 1436/01/01 بالضبط كما جرت العادة اذا كان نوع الحقل تاريخا
  2. ابوخليل
    وفيها تم معالجة كتابة التاريخ في حقل نصي من اليمين لليسار فقط قليلا من البحث
  3. ابوخليل
    تفضل وجدت لك مثالا كما تحب استيراد بيانات.rar
  4. ابوخليل
    السلام عليكم المشكلة هذه معروفة وقديمة وقد عولجت من سنين مع بدايات منتدانا المبارك على يد الاستاذ القدير ابي هادي ابحث في المنتدى عن التقويم الهجري وخاصة تقويم ام القرى
  5. ابوخليل
    اخي الكريم يجب اختيار عنوان مناسب يصف الموضوع ابشر تم تعديل العنوان
  6. ابوخليل
    اخي الكريم/اختي الكريمة يجب اختيار عنوان مناسب يصف الموضوع تم تعديل العنوان
  7. ابوخليل
    ما عملته جميل كاخذ الاحتياط خلال خمسة ايام فيما لو لم يستخدم البرنامج في اليوم المحدد وملاحظتي تدور حول خانة الاختيار(كضابط وشرط لتنفيذ الأمر ) ضع في اعتبارك لو حدث خلل ما لخانة الاختيار وارى ان الامور المالية لا بد من توثيقها ما المانع ان يوجد جدول يتم فيه رصد العلاوة وتاريخ منحها وبناء على هذا التاريخ يتم منح العلاوة القادمة اما الاجازات فقد بينت وجهة نظري في المشاركة رقم 2
  8. ابوخليل
    لو وضع الاخ السائل مثاله المرفق على صيغة mdb لرجوت له تفاعلا من اخوانه اكثر
  9. ابوخليل
    تفضل بناء حدث على الوحدات النمطية ادراج العلاوة السنوية والاجازة الشهرية.rar
  10. ابوخليل
    ؟؟؟
  11. ابوخليل
    ؟؟؟
  12. ابوخليل
    اجعل خصائص الربط كما في الصورة
  13. ابوخليل
    حول المثال الى صيغة mdb
  14. ابوخليل
    استبدل الكود بهذا On Error GoTo Errr Dim strFldr As String strFldr = CurrentProject.Path & "\photo\" & Me.id & ".jpg" Kill strFldr Me.Requery Errr: MsgBox "تم حذف الصورة"
  15. ابوخليل
    المرفق يعمل فقط غير التاريخ 15/02/2015 الى تاريخ اليوم وستظهر لك النتيجة
  16. ابوخليل
    اولا اجعل خصائص الحقلين في التنسيق مرئي=لا ثانيا الصق هذا الكود في حدث بعد التحديث لحقل المنسدلة if comb =1 then m1.Visible=true m2.Visible=false elseif comb =2 then m2.Visible=true m1.Visible=false elseif comb =3 then m2.Visible=true m1.Visible=true end if باعتبار comb هو اسم المنسدلة
  17. ابوخليل
    يمكنك استبدالها بأي شيء واذا اردت ان تنزعها من جذورها الصق هذا الكود في حدث زر Dim strFldr As String strFldr = CurrentProject.Path & "\photo\" & Me.id & ".jpg" Kill strFldr Me.Picture1 = "" Me.Requery
  18. ابوخليل
    تفضل عرض الصورة حسب المعرف وصورة رمزية لمن لا يملك صورة Downloads.rar
  19. ابوخليل
    تم التعديل في المرفق حسب رغبتك معذرة هذه الجزئية غير واضحة عندي برنامج3.rar
  20. ابوخليل
    تفضل آمل ان يلبي حاجتك برنامج2.rar
  21. ابوخليل
    تفضل Downloads.rar
  22. ابوخليل
    الطريقة اننا نستخرج بداية السنة القادمة او بداية الشهر القادم وذلك باستخدام متغير او باستخدام حقل داخل النموذج في المثال المرفق اظهرنا ذلك داخل حقلين في النموذج يمكنك اخفاؤهما و بناء الشرط عليهما في حدث فتح او تحميل النموذج آمل ان تكون المسألة اتضحت لك y_m_start.rar
  23. ابوخليل
    شكرا لك على الشرح والايضاح وعلى ما بذلته من جهد اذا الخاصية متوفرة في الاصدار 2013 زادك الله علما ووفقك
  24. ابوخليل
    فتحت المرفق على الاصدار 2010 والنتيجة واحدة : لا يمكن عرض التقرير من خلال النموذج اخي محمد : اذا كانت النتيجة غير ما ذكرت ارجو ان ترفق صورة يظهر فيها التقرير من خلال النموذج
  25. ابوخليل
    تفضل وحدتين نمطيتين واحدة لاول كل شهر والاخرى لبداية سنة جديدة Public Function YearStart(i As Date) As Date YearStart = DateSerial(Year(i), 1, 1) - 1 End Function Public Function MonthStart(i As Date) As Date MonthStart = DateSerial(Year(i), Month(i) + 1, 1) - 1 End Function
×
×
  • اضف...

Important Information

  I accept