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

Eng.Qassim

الخبراء
 عرض الملف الشخصي  عرض المشاركات

  • Posts

    2383

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

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

  • Days Won

    22

 نوع المحتوي 

كل منشورات العضو Eng.Qassim

  1. Eng.Qassim
    اجابة د.كاف يار لانه خبير وانا مجرد طالب مبتدئ
  2. Eng.Qassim
    ضعه في حدث الحالي للنموذج وجربه
  3. Eng.Qassim
    اذا كنت تريد مسح الاثنين .. يعني الكمبو والتيكست استخدم الكود التالي Public Sub ClearControls(frm As Form) On Error Resume next Dim objControl as Control For Each objControl in Me.Controls With objControl if .ControlType = acComboBox or acTextbox then .Value = Null end if End With Next objControl End Sub
  4. Eng.Qassim
    DatabaseB.rar
  5. Eng.Qassim
    هل قصدك بدون كمبو بوكس.. يبقى نموذج صاحب المشاركة على حاله؟ شوف المرفقDatabaseB.accdb الكود يفبل الكمبوبوكس لكنه يمسح مابداخل التيكست بوك
  6. Eng.Qassim
    في النموذج لديك مربع نص مرتبط وفي تلك الحالة لن يعمل الكود فأما ان يتم تفريغ مربعات النص من داخل زر الحفظ واما تغيير مربع نص (مسلسل المعرف) الى كومبو بوكس لكن في هذه الحالة لن يظهر لك رقم المعرف وانت لاتحتاجه فهو رقم تلقائي ويمكن اخفاءه DatabaseB.accdb
  7. Eng.Qassim
    @bumbاعتقد سببه انه لديك مربع نص منظم
  8. Eng.Qassim
    احسنت اخي ..لكن لايحتاج الى استدعاء ان كان لديه نموذج واحد اما ان كان لديه عدة نماذج ويريد تنظيفها فيحتاج الى فنكشن واستدعاء
  9. Eng.Qassim
    اعمل زر خاص لها للتنظيف
  10. Eng.Qassim
    اعملها مع تحميل النموذج On load Form
  11. Eng.Qassim
    وعليكم السلام اخي الكريم لايوجد برنامج جاهز ..حاول عمل ملفك الخاص ثم اطرح ماتشاء من اسئلة
  12. Eng.Qassim
    انظر للمرفق عسى ان ينفعك Database - Copie_Q.accdb
  13. Eng.Qassim
    انظر للمرفق عملته على عجالة فقط لتصل الفكرة عملت نموذج على برنامج الاستاذ خليل..وحين ادخال سنة احتساب الاندثار حسب طلبك ستظهر لديك قيمة الاندثار لكل سنة ومجموعها لغاية السنة التي اخترتها اهلاك.accdb
  14. Eng.Qassim
    j = DateDiff("mm", rs1!FirstDate, rs1!LastDate) اذا كنت مطلعا على برنامج الاستاذ خليل فأستخدم الدالة ادناه بدل دالة الفرق في السنوات جربها على برنامجك علما ان بعض الاكواد سوف لن تكون ضرورية j = DateDiff("mm", rs1!FirstDate, rs1!LastDate)
  15. Eng.Qassim
    اعتقد هذا ماتبحث عنه .. وهو مهم جدا لكل مبرمج مهتم بالمحاسبة
  16. Eng.Qassim
    اتذكر هكذا موضوع للاستاذ @ابوخليلبعنوان اهلاك الاصول الثابتة
  17. Eng.Qassim
    قد اغفلتنا امور الدنيا مما لايمكن ان نغفل عنه .. تهنئه لكم احبتي مشرفي الموقع والاساتذه الخبراء واعضاء المنتدى كل عام وانتم بخير .. ويجعلكم جميعا على خطى رسول الله صلى الله عليه واله وسلم
  18. Eng.Qassim
    السلام عليكم استاذي @د.كاف يارمالذي سنستفيده من هذه الدالة فهي اعادت لنا التاريخ بين هاشتاك؟ هل ستعتبر لرقم في هذه الحالة
  19. Eng.Qassim
    عفارم عليك استاذ محمد أبو عبدالله.عمل جميل لكني اتساءل مالفائدة من هذا العمل؟ فاذا كان القصد هو اختيار الاصناف من مربع التحرير فكيف سنعمل قائمة جديدة ؟
  20. Eng.Qassim
    الظاهر انها كانت للاعلى ولم انسخها هههههه اعتذر جدا
  21. Eng.Qassim
    هل تقصد جمع الحقل بشرط التواريخ جرب المرفق Calc_Q.accdb
  22. Eng.Qassim
    السلام عليكم..استخدم هذا الكود في استعلام ليحول لك التاريخ الى رقم Format$([DateField];"yyyymmdd")
  23. Eng.Qassim
    شكرا استاذ محمد أبو عبدالله لكن هناك نقص Dim strFolderPath As String
  24. Eng.Qassim
    شكرا @د.كاف يارلكن هل يمكن مسح القديمة؟
  25. Eng.Qassim
    استاذ محمد اي نسخة لديك من اوفيس وفتحت عندك؟
×
×
  • اضف...

Important Information

  I accept