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

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

  1. ابو جودي

    ابو جودي

    أوفيسنا


    • نقاط

      7

    • Posts

      6,818


  2. ابوخليل

    ابوخليل

    أوفيسنا


    • نقاط

      3

    • Posts

      12,185


  3. أ / محمد صالح

    أ / محمد صالح

    أوفيسنا


    • نقاط

      3

    • Posts

      4,431


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

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

    06 عضو ماسي


    • نقاط

      3

    • Posts

      1,948


Popular Content

Showing content with the highest reputation on 20 يول, 2022 in all areas

  1. السلام عليكم ورحمة الله تعالى وبركاته انا افتقد الاستاذ جعفر كثيــــــــــرا... كل يوم اترقب دخوله الى المنتدى ارجوكم من يستطيع التواصل مع استاذى الجليل ومعلمى القدير الاستاذ @jjafferr لا يتردد عن ارسال السلام والتحية اليه واسال الله تعالى ان يعود الينا سالما غانما فى اقرب وقت
    4 points
  2. السلام عليكم نزولا عند رغبة الزملاء والزميلات فقد قمت بتصميم هذه البرنامج الصغير والذي يتعلق بالقروض البنكية والسداد الشهري وهو مقدم هدية مجانية للجميع نزلت فيديو على اليوتيوب يشرح طريقة استعمال البرنامج هدية مجانية - قروض بنكية.accdb
    3 points
  3. عليكم السلام ورحمة الله وبركاته شكرا ابا جودي على مشاعرك الطيبة وعلى السؤال كلنا ننتظر عودة استاذنا جعفر وابشركم الأستاذ جعفر بخير ولله الحمد ، فقط لديه بعض المهام هي التي منعته من التواجد
    3 points
  4. عليكم السلام ورحمة الله وبركاته إذا كان الهدف هو مجرد ترتيب بالمعادلات قيمكنك استعمال هذه المعادلة في الخلية F4 للحصول على نفس المجموعة مرتبة =INDEX($A$4:$C$11,MATCH(ROW()-3,$A$4:$A$11,0),COLUMN()-5) مع ملاحظة بداية ونهاية نطاق البحث A4:C11 وعدد الصفوف الفارغة قبل مكان أول نتيجة (F4) == 3 وخلايا الفهرس غير المرتب الذي يتم التريب عليه A4:A11 وعدد الأعمدة الفارغة قبل مكان أول نتيجة == 5 مع سجب المعادلة لأسفل ولليمين بالتوفيق
    3 points
  5. 2 points
  6. السلام عليكم ورحمة الله وبركاته... قمت ببرمجة هذه الاداة تلبية لطلب اخونا @ابوخليل في هذا الموضوع هنا: الاداة مبرمجة 100% بلغة NET. وهي تستعمل مكتبات Google.Apis.Drive وهي تحتاج منصة الفريم ورك 4.5 ملاحظة: انا طبقت الشرح على نسخة احتياطية حيث وضعت الـ Path عبارة عن CurrentProject.FullName يمكنك استبداله بأي مسار صورة او فيديو او ملف او اي شي الشرح بصوتي الجميل😂: https://youtu.be/Uzj68nCaEbo الرابط الذي استعملته في التسجيل: https://console.developers.google.com/apis/credentials/oauthclient/ لا تنسوني ووالدي من صالح دعائكم. تم بحمد الله. GoogleDriveUploader.rar
    1 point
  7. شرح خطوة خطوة كيفية عمل جدول بالاكسل وفورم وطريقة الحفظ واظهار الزيرو الفيديو
    1 point
  8. المثال من اعداد الاخت زهرة مشرفة المنتدى العربي للبرمجة zaMenu2006.rar
    1 point
  9. اتفضل يا سيدى SetMultiPrinter.accdb
    1 point
  10. كتاب جيد و ممتاز يستحق الاطلاع عليه منقول : اسم الكاتب غير موجود الإستعلامات في قواعد البيانات.pdf
    1 point
  11. @الخطاب اخى ما هى مشكله الاداه يوم ١١ / ٧ موافق الاثنين والتاريخ الموجود بالاسفل هو تاريخ ووقت جهازك وغير كده كمان الاداه مفتوحه المصدر samradapps_datepicker_220710.zip
    1 point
  12. خااالص الشكر والتقدير استاذ العزيز بارك الله فيك وجعله الله فى ميزان حسناتك
    1 point
  13. السلام عليكم ورحمة الله وبركاته 🙂 اليوم بفضل الله تعلمت شي جديد وحبيت أحطه في تطبيق عملي مباشرة ً .. 😎 وفي نفس الوقت حبيت أشارككم الفائدة 😄 معلومة اليوم تتحدث عن الحدث : Form.Repaint للنموذج ويمكن كتابته هكذا Me.Repaint ووضيفته مشابهة للـ DoEvents تقريبا إلا أنه مع التجربة والمقارنة وجدته أسرع في التنفيذ . معناه الحرفي ( إعادة الرسم ) ووضيفته بشكل عام هو إظهار أي تحديثات معلقة للنموذج في أثناء تنفيذ أي حدث 😁 .. وللمزيد من المعلومات هنا ستجدون رابط الشرح من مايكروسوفت : <<< اضغط هنا >>>> المهم .. هذا تطبيقي على الحدث وتكمن في تحريك الأزرار عند الضغط عليها بشكل يضفي طابع جمالي وجديد للنماذج 🙂 ( قد لا تبين حركة الأزرار العلوية في الصورة التوضيحية .. لذلك سترونها بوضوح من خلال الملف المرفق 😁 ) وهذا شكلها في الأكواد المستخدمة : Function AnimateBtns1() Dim x As Integer Dim y As Integer For x = 1 To 6 Me("b" & x).Visible = True For y = 1 To 35 Me("b" & x).Top = Me("b" & x).Top + y Me.repaint Next y For y = 1 To 35 Me("b" & x).Top = Me("b" & x).Top - y Me.repaint Next y Me.repaint Next x End Function Function AnimateBtns2() Dim x As Integer Dim y As Integer For x = 1 To 6 For y = 1 To 35 Me("c" & x).Top = Me("c" & x).Top + y Me.repaint Next y Me.repaint Next x For x = 1 To 6 For y = 1 To 35 Me("c" & x).Top = Me("c" & x).Top - y Me.repaint Next y Next x End Function تحياتي 🙂 ✌️🌷🌹 حركة الأزرار.accdb
    1 point
  14. 1 point
  15. انظر للصورة اخر رقم لديك كان 999 ثم اضفت سجل اصبح 1000 في السجل قمت بتغيير الرقم الى 2 واصبح السجل التالي 3 ثم غيرت الى 50 واصبح التالي 51 اي انا سجلت 5 سجلات وكل شي تمام
    1 point
×
×
  • اضف...

Important Information