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

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

  1. Ali Mohamed Ali

    Ali Mohamed Ali

    المشرفين السابقين


    • نقاط

      25

    • Posts

      11643


  2. سليم حاصبيا

    سليم حاصبيا

    أوفيسنا


    • نقاط

      5

    • Posts

      8723


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

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

    06 عضو ماسي


    • نقاط

      5

    • Posts

      2025


  4. أحمد  يوسف

    أحمد يوسف

    عضوية شرفية


    • نقاط

      4

    • Posts

      2794


Popular Content

Showing content with the highest reputation on 08/12/19 in all areas

  1. طريقة جديدة للبحث عن الاسم اتمنى لكم الفائدة search.accdb
    3 points
  2. وعليكم السلام وكل عام وانتم بخير هذه الرسالة تدل على انه ينقصك أشياء في ملف الأكواد بنسخة الإكسيل لديك او عليك برفع الملف للعمل على اصلاح هذه المشكلة من قبل الأساتذة
    2 points
  3. بارك الله فيك ورحم الله والديك استاذنا الكريم
    2 points
  4. ابو اشرف كود بسيط ولكنه كبير في فائدته جزاكم الله خير وزادكم من علمه
    2 points
  5. السلام عليكم ورحمه الله وبركاته اخي الكريم@ازهر عبد العزيز اقترح عليك ان يكون عندك فاتوره اجل بدون ما تحط حقل الواصل ويكون عندك نموذج سند قبض فعندما تستلم نص المبلغ مثلا تكتبه في سند القبض وبعد ذالك يون عندك نموذج كشف حساب للعملاء وتنقص مبلغ القبض من الاجل ويبقي لك الناتج مجرد فكرتي الا استخدمها ولك تحياتي
    2 points
  6. السلام عليكم كل عام وانت بخير واجهتنى مشكلة عند عمل شريط القوائم على اكسيس 2003 وهى عدم ظهور القوائم وحاولت مرارا ولكن يوجد اكيد شءى ناقص في الملف لكى تظهر القوائم ارجوا من الجميع مساعدتى ومعرفتى ماهو الشءى الناقص حتى تظهر القوائم مرفق ملف db1.rar
    1 point
  7. وعليكم السلام هذه ليست مشكلة الملف الذي تحاول التعديل عليه تم حمايته ضد التعديل ::بالتوفيق::
    1 point
  8. السبب في عدم اختفاء الرسائل انك عند انشاء الجدول اخترت في خصائص حقلي الاسم والوظيفة مطلوب = نعم تم تعديلها الى مطلوب = لا ثم في خصائص الحقل للنموذج في حدث عند الخروج وضعنا الكود التالي If IsNull([نص2]) Then MsgBox "حقل الاسم فارغ", vbInformation, "تنبية" DoCmd.CancelEvent End If وبالتالي لا داعي لايقاف رسائل النظام
    1 point
  9. تجربه وارجو تطويرها من الخبراء دوام الموظف.rar
    1 point
  10. أخى الكريم -اهلا بك في المنتدى لا تنتظر المساعدة من احد بدون رفع الملف وشرح كل المطلوب عليه بكل دقة فالمنتدى تعليمكى من المقام الأول وليس لتقديم البرامج الجاهزة بارك الله فيك وكل عام وانتم بخير
    1 point
  11. Search By two ways اعرض الملف يمكن عمل بحث في جدول بطريقة الاسم او الرقم صاحب الملف سليم حاصبيا تمت الاضافه 13 يول, 2019 الاقسام معلومات مفيدة
    1 point
  12. سلمت.. فكرة رائعة .. وهذا يعني عدم إمكانية تطبيقة بالصفة التي ذكرتُها على النماذج المستمرة وبذا تكون هذه الفكرة مخرج رائع .. شكرا لك .. وفقك الله ورعاك..
    1 point
  13. في النموذج المستمر يا نتظهر جميعا او تختفي جميعا لذا يتم استخدام التنسيق الشرطي في هذه الحالة تغيير لون او عدم تمكين للحقل جرب المرفق لإظهار أو إخفاء الخلية.accdb
    1 point
  14. تستخدم في برنامج أكواد إضافية يلزم إضافة مرجعها من مكتبة الفجوال بيسك .
    1 point
  15. الملف عندك كبير جداَ حوالي 14 ميغا مع انه فارغ لماذا يا ترى امسح الملف نهائياً وقم بتصميم ملف بديل عنه بدون تنسيقات ملونة ( اللون الاصفر على كامل الصفحة لا ضرورة له) ثم جرب هذا الماكرو Option Explicit Sub ADD_SHE() Dim I%, T%: T = 2 For I = 1 To 14 Sheets(1).Copy AFTER:=Sheets(Sheets.Count) ActiveSheet.Name = T T = T + 1 Next End Sub
    1 point
  16. جميل جدا وبسيط الله يعطيك العافية استاذنا ابو اشرف
    1 point
  17. أخى الكريم seddiki_adz أعتقد ان الموضوع اخذ اكبر من حجمه فحضرتك لا تقوم بطلباتك كلها مرة واحدة وأتعبت الأستاذ أحمد كامل فليس وحدك من يسأل هنا وانت لا تعرف أوقات الأساتذة فهناك العديد من الأعضاء الذين يقومون بالسؤال ويريدون أيضا من يجيبهم فاجعل بعض الوقت لإخوانك من الأعضاء الأخرين الذين يحتاجون مساعدة الأساتذة بارك الله فيك وكل عام وانتم بخير
    1 point
  18. بارك الله فيك أستاذ علي وكل عام أنت بخير
    1 point
  19. تفضل يمكنك استخدام هذا الكود Private Sub CommandButton2_Click() Dim str As String Dim i As Long For i = 0 To ListBox1.ListCount - 1 If ListBox1.Selected(i) Then If str <> vbNullString Then str = str & ", " str = str & ListBox1.List(i) End If Next TextBox2.Text = TextBox2.Text & " " & str End Sub ليست بوكس.xlsm
    1 point
  20. أحسنت أستاذ عبد اللطيف بارك الله فيك وزادك الله من فضله وكل عام وانتم بخير
    1 point
  21. تعمل بشكل جيد غيرنا كود البحث وهي محاولة لعلها تنجح 579.1.test1900.accdb
    1 point
  22. بارك الله فيك أستاذ أحمد وكل عام والأمة الإسلامية بخير وعيد أضحى سعيد أعاده الله علينا جميعا بالخير واليمن والبركات
    1 point
  23. بعد اذن اخي علي معادلة بشكل ثاني =CHOOSE(AND(C1=D1,C1<>"",D1<>"")+1,"غير متزن","متزن")
    1 point
  24. وعليكم السلام-تفضل يمكنك استخدام هذه المعادلة =IF(AND(C1="",D1=""),"",IF(C1=D1,"متزن","غير متزن")) دالة if بأربع شروط.xlsm
    1 point
  25. Version 1.0.0

    31 تنزيل

    يمكن عمل بحث في جدول بطريقة الاسم او الرقم
    1 point
  26. السلام عليكم راجع الملف المرفق لعل فيه ما تريد... تحويل ثلاث ارقام من اليمين الى اصفار.xlsx
    1 point
  27. السلام عليكم في هذا المطلوب يكفي نقل صيغة المعادلة التي اقترحها أخي الكريم "عبد السلام ابو العوافي" إلى معادلة "الاجمالي" (الاجمالي المتبقي)... تم عمل ذلك في المرفق... بن علية حاجي 2.xlsx
    1 point
  28. بارك الله فيك وجزاك الله كل خير
    1 point
  29. أحسنت أستاذ مجدى عمل ممتاز ونشاط ملحوظ جعله الله في ميزان حسناتك وغفر الله لك
    1 point
  30. أحسنت بارك الله فيك وجعله الله فى ميزان حسناتك
    1 point
  31. بارك الله فيك وجزاك الله كل خير
    1 point
  32. وعليكم السلام اهلا بك اخى الكريم فى المنتدى تفضل العمال.xlsm
    1 point
  33. عمل رائع بارك الله فيك أستاذ سليم
    1 point
  34. أحسنت استاذ سليم عمل ممتاز بارك الله فيك
    1 point
  35. جرب هذا الملف قروش وجنيهات Salim.xlsx
    1 point
  36. ممتاز استاذى الكريم بارك الله فيك وجعله الله في ميزان حسناتك
    1 point
  37. تفضل اخى الكريم بعد اذن الأستاذ مصطفى-فلابد ان تعلم اخى الكريم ابو العلاء ان هذه معادلات صفيف وليس معادلات عادية فلابد من الضغط على Ctrl+Shift+Enter وليس Enter فقط كباقى المعادلات Book1 TEST.xls
    1 point
  38. اين الملف ؟ او يمكنك بتحميل هذا البرنامج وفك الملف به Passware Kit Forensic 13.5
    1 point
  39. 1 point
  40. اخي الحبيب الاستاذ // عباس السماوي ووفقنا واياك للخيرات
    1 point
  41. الاستاذ والاخ الحبيب ابو عمرو المبدع دائما يعطيك العافية وفقك الله وادام عليك نعمة العلم والمعرفة وزادك من فضله عمل رائع وابداع متواصل تقبل فائق احترامي وتقديري
    1 point
  42. أخي الحبيب الأستاذ// عباس السماوي بارك الله فيك وجزاك خيرا علي دعائك وادعو الله ان اكون عند حسن ظنكم في الملف بعد التعديل كالتالي مع الاحتفاظ بخيارات الطباعة ( طباعة التاييد - طباعة الدرجات ) راجع الملف واعلمني بالنتيجة وان كانت هناك اي تعديلات لا تتردد في طلبها تقبل تحياتي واحترامي قاعدة بيانات الثانوية العامةDD.rar
    1 point
×
×
  • اضف...

Important Information