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

نجوم المشاركات

  1. عبد اللطيف سلوم

    عبد اللطيف سلوم

    06 عضو ماسي


    • نقاط

      4

    • Posts

      1,861


  2. ازهر عبد العزيز

    ازهر عبد العزيز

    04 عضو فضي


    • نقاط

      2

    • Posts

      1,240


  3. Barna

    Barna

    الخبراء


    • نقاط

      2

    • Posts

      959


  4. مسفر

    مسفر

    الخبراء


    • نقاط

      2

    • Posts

      365


Popular Content

Showing content with the highest reputation on 11 ماي, 2019 in all areas

  1. السلام عليكم رمضان كريم عليكم ان شاء الله محتاج مساعدة في اخفاء واظهار العناصر في حال كان مربع تحرير وسرد فارغ اريد اخفلء العنصر الذي تحته وعند اختيار اي شي في مربع تحرير وسرد يظهر العنصر الذي تحته test.accdb
    1 point
  2. السلام عليكم معلومة جديدة في اكسيل طريقة كتابة الايام بجانب التاريخ بشكل الي اتمنى لكم الفائدة التاريخ واليوم.xlsx
    1 point
  3. شكرا اخي العزيز عبد اللطيف سلوم هذا المطلوب😘 اخي العزيز kaser906 تسلم وجزاك الله خيرا😘
    1 point
  4. تدخل على الايقونة تم اللازم المراد ازالة التاريخ من جانبها وتكتب الكود بعد التحديث me.xxx="" الاكس تعني اسم حقل التاريخ المراد تفريغه من البيانات
    1 point
  5. السلام عليكم .....اخوان لدي قاعدة بيانات تحوي جدولان عبارة عن مصروفات وارباح اريد استخراج صافي الارباح او الخسارة لتاريخ احددة في نموذج منفصل هل هناك طريق لهذا .... المثال في المرفقات New Microsoft Access قاعدة بيانات (5).accdb
    1 point
  6. السلام عليكم ورحمه الله وبركاته بسم الله الرحمن الرحيم وبه نستعين على كل شىء وقبل كل شىء اللهم صلى على سيدنا محمد صلى الله عليه وسلم الحمد لله الذى تتم به الصالحات ,,,, برنامج تحليل المصروفات ( اداريه - بيع وتوزيع - تشغيل ) صدقه جاريه على روح والدتى رحمها الله وهديه للمنتدى !! اليوم اقدم لكم برنامج تحليل المصروفات الذى يغى كل محاسب وخاصه من الجيل القديم عن الدفتر الـ 70000 خانه هههههههههههه الـ 36 خانه عمل ممل ان تكتب بالدفتر فكان من وجه نظرى هذا العمل واعلم انه لم يعد يعمل احد بالدفاتر منذ فتره فقد انقرضت مع ظهور الانظمه المحاسبيه التى لا حصر لها واسألكم الفاتحه لوالدتى وولدى رحمهما الله اللذان ستظل روحى معلقه بهما دائما حتى يلحقنى بهما الله فى الجنه وجميع اخواننا المسلمين وانتظر ارائكم واستفساراتكم تلميذكم واخيكم // محمود الاسيوطى ( ابو اياد ) برنامج تحليل المصروفات اوفيسنا.XLSB
    1 point
  7. 1 point
  8. السلام عليكم الحقل الالزامي في الاكسس بواسطة اكواد فيجوال بيسك VBA يعني اجبر المستخدم على تعبئة الحقل قبل الحفظ اتمنى لكم الفائدة في مثالنا هذا الاسم ورقم الهاتف حقول الزامية نموذج اكسس نموذجي.accdb
    1 point
  9. شكرا على المعلومة بالفعل كود مميز جدا جزاك الله خيرا
    1 point
  10. فكره جيدة. انا الان انتهيت من البرنامج وقد اخبرني العميل هذه المعلومة متاخر. هل يؤثر تغيير نوع النص على ماعملته من اكواد وعلاقات واستعلامات وتقارير على تشغيل البرنامج؟؟ فكرة جيده اشكرك اشكرك
    1 point
  11. السلام عليكم في تنسيق مربع النص ضع اصفار بعدد الخانات المطلوبة
    1 point
  12. بالعكس اخي الكريم @essam rabea تعدد الاجابات مطلب لكي نستفيد ايضا ..... لأن الموقع تعليمي في اساسه
    1 point
  13. هناك حل أن تجعل كود الصنف نص وليس رقم وإن كان لابد ان يكون حقل كود الصنف رقم فإجعل خاصية Formate لهذا الحق (00000000) بحسب كم رقما تريد لهذا الكود كحد أقصى. أرجو أن أكون أوضحت الفكرة أخى Barna إقبل إعتذارى فلم أنتبه أنك شاركت
    1 point
  14. حصلت معي نفس المشكلة. قمت بفرمتة الجهاز وتنصيب اوفيس 2013 وظهرت لي نفس الرسالة التي ظهرت لك. وبعد بحث وجدت ان الاكسس الجديد لا يقبل اكواد الفيجوال لقاعدة البيانات وبعد عدة محاولات اظهر لي رسالة تقول : ان اي اكواد فيجوال غير معمولة على نفس الجهاز لن يتم تشغيلها. وحاولت ان انشئ قاعدة بيانات جديدة وكتبت اكواد فيجول على نفس الجهاز الجديد فقبلت ولكن باحرف غريبة. اخبر صديقك بان يبحث في اكواد فيجول فحتما سيرى انها ممسوحة
    1 point
  15. أيضا أرفق لك كود من الأخت زهرة جزاها الله عنا وعنكم خيرا كثيرا إخفاء وإظهار الكائنات.rar
    1 point
  16. بارك الله فيك بارك الله فيك
    1 point
  17. هذا الكود من الأخ محمد طاهر على ما أذكر لإخفاء الجداول Dim db As Database Dim obj As AccessObject, dbs As Object Dim tdf As TableDef Set dbs = Application.CurrentData Set db = CurrentDb For Each obj In dbs.AllTables Set tdf = db.TableDefs(obj.Name) If Left(tdf.Name, 4) <> "msys" And tdf.Attributes <> 1073741824 Then tdf.Attributes = tdf.Attributes + dbHiddenObject End If Next Set tbl = Nothing db.Close Set db = Nothing أما لإظهارها هذا الكود وأيضا من الأخ محمد طاهر Dim dbs As Database, tdf As TableDef Set dbs = CurrentDb For Each tdf In dbs.TableDefs If Left(tdf.NAME, 4) <> "msys" And tdf.Attributes <> 1073741824 _ And tdf.Attributes = 1 Then tdf.Attributes = tdf.Attributes - dbHiddenObject End If Next tdf Set dbs = Nothing
    1 point
  18. الأخ الكريم عبد اللطيف سلوم .. كلنا هنا للإفادة وبارك الله فيك ولم الاحظ مشاركتك قبل إضافة الصورة .. عذرا.
    1 point
  19. رابط شرح الجزء الأول http://www.kutub.info/library/book/17141 ربط شرح الجزء الثاني http://www.kutub.info/library/book/17142
    1 point
  20. فى مشاركة لأحد الأعضاء قام بطلب لفت نظرى وهو عمل شهادة فقط بدون ( شيت كنترول ) وفعلا قد يحتاج القائميين على العملية التعليمية بحاجتهم إلى عمل شهادة دون الحاجة إلى تفاصيل الشيت الكثيرة فكانت الفكرة لعمل شهادة تصلح لجميع المراحل دون التقيد بالشيت لذلك قمت بعمل هذه الفكرة وهى في طور الإختبار لتجرتها من قبل أصحاب الحاجة لها فإذا أصبت أحمد الله على توفيقة لى وإذا أخطأت فعذرا من إخوتى فقد كان كل همى هو المساعدة وعمل الخير عفوا تم تعديل الرابط لخطأ فى ( عنوان موقع أوفيسنا ) وتم تصحيحة عمل الشهادات لأى مرحلة.rar
    1 point
  21. تفضل اظهار الوقت سالب.xlsx
    1 point
  22. السلام عليكم هذه دالة بالإكسيل صممها أخونا "خبور" حفظه الله تعالى قمت بنقلها للأكسيس وبما أن الرجل عمله متقن جدا - كما عهدناه- فلم أجد أية صعوبة فى نقل الدالة للأكسيس و هنا استخرجت تاريخ الميلاد من الرقم القومى فى الاستعلام Q1 و الله الموفق kemas.rar
    1 point
×
×
  • اضف...

Important Information