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

محمد يحياوي

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

  • Posts

    1,429

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

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

  • Days Won

    10

 نوع المحتوي 

كل منشورات العضو محمد يحياوي

  1. محمد يحياوي
    الاخوة الافاضل ابو احمد وابو عبد الله وكيماس شكرا على التشجيع و خاصة الاستاذ كيماس الذي كان سباقا الى هذا العمل فنرجوا ان لا يحرمنا من صوته اما الاخ الكريم علي فشكرا على الاطراء الفرق هو ان الكود الذي تضعه في sheet1 sheet2.... فانه ينفذ على هذه الاوراق حصريا اما الكود الذي نضعه في this workbook فانه ينفذ على المصنف المفتوح و النشط باكمله
  2. محمد يحياوي
    الاخ الحبيب محمد صالح اشكرك كثيرا على التوضيح و الاضافة بالنسبة لطلب الاخ الكريم ابو الاحسان لا حظ الملف التالي ملاحظة لا تقم باي حركة في الملف لكي يعمل الكود اظهار فورم بعد مدة من ترك ملف غير نشط.rar
  3. محمد يحياوي
    اخواني الكرام هذا الجزء الاول من درس محرر الاكواد : قوائم ونوافذ وخصائص و الحقيقة هذي اول مشاركة بالصوت و الصورة ارجو ان اكون قد وفقت في ذلك ننتظر الجزء الثاني و هو مخصص ل الفورم و صندوق الادوات و كيفية التعامل معها
  4. محمد يحياوي
    كود لاضافة زر تصغير لليوزرفورم Add Minimize Button To Userform.zip
  5. محمد يحياوي
    الاخ الكريم لاحظ الملف التالي ddd.rar
  6. محمد يحياوي
    اخي ابو الاحسان تفضل المرفق cloock in textbox.rar
  7. محمد يحياوي
    الاخ الفاضل محمود علاء كقاعدة عامة لا يمكن باي حال من الاحوال تشغيل اي امر او كود الا اذا كان الامان منخفضا اخي الكريم الحل المتوفر حتى الان هو ارفاق ملف رجستري مع ملف الاكسل يكونان على شكل ملف تنفيذي بعمل ملف الرجستري عى خفض الامان بعده مباشرة يفتح ملف الاكسل لاحظ احد المرفقين .. الاختلاف في ملف الرجستري merg_3.rar merg_4.rar
  8. محمد يحياوي
    الاخ الكريم في بداية الماكرو ضع هذا الكود Dim WB As Workbook Dim WS As Worksheet On Error Resume Next Set WB = ActiveWorkbook For Each WS In WB.Worksheets WS.Unprotect Next و في نهاية الماكرو ضع الكود For Each WS In WB.Worksheets WS.Protect Next او لاحظ المرفق Book1.rar
  9. محمد يحياوي
    الاخوة الاحباب عبد الفتاح ، احمد فضيلة ، ابوالاحسان بارك الله فيكم و حفظكم و رعاكم
  10. محمد يحياوي
    الاخ الفاضل محمد صالح السؤال الذي طرحته لايمكن ان يجيب عليه من يتابع الدورة لذلك ارجوا ان تكون الاسئلة من المقرر !!!
  11. محمد يحياوي
    الاخ الكريم انا اشاطر اخي ابو نصار الراي الرجاء اعادة الطلب ربما يكون خطأ و اذا كان الموضوع حذف قصدا فهناك سبب وجيه و خاصة اذا كان الموضوع مكرر او تم نقله الى قسم اخر
  12. محمد يحياوي
    اخي الكريم تم عمل المطلوب ... لاحظ الملف 1نموذج.rar
  13. محمد يحياوي
    الاخ الكريم لاحظ الملف DisablePgUpDown.rar
  14. محمد يحياوي
    اضافة لما تفضل به اخي ابو احمد نعطي مثالا على ذلك : ... اذا اردنا دمج عدة خلايا فان الماكرو سيكون بعد الاختصار Selection.MergeCells = True ثم نفك الدمج بواسطة هذا الماكرو ... Selection.MergeCells = False لذلك يمكن دمج الماكرووين في ماكرو واحد يقوم بالعمل و عكسه اي الدمج و فك الدمج في نفس الامر باستعمال هذا اماكرو المعدل Selection.MergeCells = Not Selection.MergeCells
  15. محمد يحياوي
    الاخوة الافاضل : ابو عبد الله - يوسف عطا - ابو الليل جزاكم الله خيرا على المرور بالنسبة لملاحظة الاستاذ ابو عبد الله في محلها فساعمل على ذلك في نسخة اخرى ان شاء الله بالنسبة لطلب الاخ يوسف عطا الاول بفرض انك تريد اضافة سؤال حيث يصبح عدد الاسئلة 11 في المستوى الاول يصبح الكود Private Sub Comsoal1_Click() If trueq + falseq = 11 Then و كذلك زيادة هذه الاسطر ElseIf a = 11 Then q1 = Worksheets("Sheet1").Range("l1") a1 = Worksheets("Sheet1").Range("l2") a2 = Worksheets("Sheet1").Range("l3") a3 = Worksheets("Sheet1").Range("l4") a4 = Worksheets("Sheet1").Range("l5")
  16. محمد يحياوي
    الاستاذ الفاضل و الاخ الحبيب "خبور" عودا حميدا ان شاء الله و كل عام وانت بالف خير هدية رائعة و قيمة بارك الله فيك الله يوفقك
  17. محمد يحياوي
    لا تستعجل اخي سعد احنا ماشيين حبه حبه وسنصل بإذن الله الى هذه المصطلحات الان الموضوع يخص الماكرو وتسجيله انا مع راي اخي ابو احمد الرجاء عدم استعجال دروس الدورة الى دروس متقدمة و لناخذ في الحسبان ان مقياس الدورة هم المبتدؤون بالنسبة لطلب اخونا دغيدي يمكن عمل ذلك يدويا بالدخول الى مجلد C:\Documents and Settings\Administrator\Local Settings\Temporary Internet Files و ستجد الملف هناك و اذا كنت تستعمل الموزيل ففي هذا الرابط C:\Documents and Settings\Administrator\Local Settings\Application Data\Mozilla\Firefox\Profiles\8b4fi0ix.default\Cache
  18. محمد يحياوي
    الاخوة الافاضل طاهر - ابو نصار - ابو عبد الله حلول جميلة و رائعة
  19. محمد يحياوي
    الاخوة الافاضل دغيدي - ابو احسان - القومي - نادر - ابو نصار بارك الله فيكم و سعدت بمروركم الاخ القومي يمكن تطويرو تغيير الاسئلة حسب ما تريد بالنسبة للمشكلة التي ذكرت لم لتعرض لها و اذا احد الاخوة لاحظ ذلك فليخبرنا على العموم فك الضغط عن الملف التنفيذي و حاول مرة اخرى
  20. محمد يحياوي
    الاخ الفاضل ادخل الى الرابط التالي و اذا اعجبتك الفكرة يمكن تنويعها و التعديل عليها انا شخصيا استعملها مع تلاميذي و هي ناجحة حتى الان
  21. محمد يحياوي
    الاخوة الافاضل "سعد عابد" ، "طاهر" بارك الله و وفقكم الى الخير
  22. محمد يحياوي
    الاخ الفاضل "طاهر" لايمكن باي حال عمل ماكرو للتقليل من امان الماكرو و هذا للحفاظ على سلامة المستخدمين للاوفيس مثال على ذلك هذا الموضوع يتكلم عن خطر الماكروهات الضارة لتعرف سبب التقييد الشديد في عمل الماكرو الرابط
  23. محمد يحياوي
    تحية طيبة للاخوة الافاضل طاهر و ابو نصار و سعد عابد ...لاثراء الفكرة تم عمل تنبيه صوتي بالاستعانة بكود اخي ابو نصار ادخل قيمة اكبر من 20 في العمود A ياتيك تنبيه صوتي .... تنبيه صوتي.rar
  24. محمد يحياوي
    الاخ الحبيب "ابو احمد" دائما سبّاق بالخيرات بارك الله فيك و سعدت بمرورك
  25. محمد يحياوي
    ملاحظات على هذه النسخة : - تم وضع الاسئلة في شيت (ورقة) بدل الفورم ليتم التعديل على الاسئلة و الاجوبة - يتم التقيد بمكان وضع الاجابات الخاطئة و الاجابات الصحيحة (موضحة بالالوان) - تم ربط الفورم بالورقة و الورقة بالفورم (التناوب في الظهور) - تم عمل الملف في ملف تنفيذي مدمج معه ملف رجستري ليتم خفض امان الماكرو (صالح لجميع نسخ الاوفيس) - تم عمل ايقونة للملف لاضافة مسحة جمالية للملف في الاخير تقبلوا كل الود و المحبة و الشكر للاخ الحبيب يوسف عطا الذي اشار الى الفكرة المسابقةالثقافية 3.rar
×
×
  • اضف...

Important Information

  I accept