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

ابوخليل

أوفيسنا
  • Posts

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

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

  • Days Won

    294

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

  1. وفيها تم معالجة كتابة التاريخ في حقل نصي من اليمين لليسار فقط قليلا من البحث
  2. تفضل وجدت لك مثالا كما تحب استيراد بيانات.rar
  3. السلام عليكم المشكلة هذه معروفة وقديمة وقد عولجت من سنين مع بدايات منتدانا المبارك على يد الاستاذ القدير ابي هادي ابحث في المنتدى عن التقويم الهجري وخاصة تقويم ام القرى
  4. اخي الكريم يجب اختيار عنوان مناسب يصف الموضوع ابشر تم تعديل العنوان
  5. اخي الكريم/اختي الكريمة يجب اختيار عنوان مناسب يصف الموضوع تم تعديل العنوان
  6. ما عملته جميل كاخذ الاحتياط خلال خمسة ايام فيما لو لم يستخدم البرنامج في اليوم المحدد وملاحظتي تدور حول خانة الاختيار(كضابط وشرط لتنفيذ الأمر ) ضع في اعتبارك لو حدث خلل ما لخانة الاختيار وارى ان الامور المالية لا بد من توثيقها ما المانع ان يوجد جدول يتم فيه رصد العلاوة وتاريخ منحها وبناء على هذا التاريخ يتم منح العلاوة القادمة اما الاجازات فقد بينت وجهة نظري في المشاركة رقم 2
  7. لو وضع الاخ السائل مثاله المرفق على صيغة mdb لرجوت له تفاعلا من اخوانه اكثر
  8. تفضل بناء حدث على الوحدات النمطية ادراج العلاوة السنوية والاجازة الشهرية.rar
  9. اجعل خصائص الربط كما في الصورة
  10. استبدل الكود بهذا On Error GoTo Errr Dim strFldr As String strFldr = CurrentProject.Path & "\photo\" & Me.id & ".jpg" Kill strFldr Me.Requery Errr: MsgBox "تم حذف الصورة"
  11. المرفق يعمل فقط غير التاريخ 15/02/2015 الى تاريخ اليوم وستظهر لك النتيجة
  12. اولا اجعل خصائص الحقلين في التنسيق مرئي=لا ثانيا الصق هذا الكود في حدث بعد التحديث لحقل المنسدلة 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 هو اسم المنسدلة
  13. يمكنك استبدالها بأي شيء واذا اردت ان تنزعها من جذورها الصق هذا الكود في حدث زر Dim strFldr As String strFldr = CurrentProject.Path & "\photo\" & Me.id & ".jpg" Kill strFldr Me.Picture1 = "" Me.Requery
  14. تفضل عرض الصورة حسب المعرف وصورة رمزية لمن لا يملك صورة Downloads.rar
  15. تم التعديل في المرفق حسب رغبتك معذرة هذه الجزئية غير واضحة عندي برنامج3.rar
  16. تفضل آمل ان يلبي حاجتك برنامج2.rar
  17. الطريقة اننا نستخرج بداية السنة القادمة او بداية الشهر القادم وذلك باستخدام متغير او باستخدام حقل داخل النموذج في المثال المرفق اظهرنا ذلك داخل حقلين في النموذج يمكنك اخفاؤهما و بناء الشرط عليهما في حدث فتح او تحميل النموذج آمل ان تكون المسألة اتضحت لك y_m_start.rar
  18. شكرا لك على الشرح والايضاح وعلى ما بذلته من جهد اذا الخاصية متوفرة في الاصدار 2013 زادك الله علما ووفقك
  19. فتحت المرفق على الاصدار 2010 والنتيجة واحدة : لا يمكن عرض التقرير من خلال النموذج اخي محمد : اذا كانت النتيجة غير ما ذكرت ارجو ان ترفق صورة يظهر فيها التقرير من خلال النموذج
  20. تفضل وحدتين نمطيتين واحدة لاول كل شهر والاخرى لبداية سنة جديدة 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
  21. اخي محمد اغبطك على ذوقك الرفيع في التصميم وسوف استعرض المرفق لاحقا على اصدار اوفيس أحدث في الاصدار 2003 يمتنع عرض التقرير من خلال النموذج اقصد بـ من خلال اي : عرض التقرير داخل النموذج مثل النموذج الفرعي
×
×
  • اضف...

Important Information