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

إستفسار بخصوص كيفية عمل زر أمر ؟


euro_999

الردود الموصى بها

السلام عليكم ...

هذا شرح بشكل سريع أرجو أن يفيدك، وأنا جاهز لأسئلتك

اضغط على Alt+f11 ومن ثم أدرج Module من القائمة Insert ، وفي داخل المودل اكتب الإجراء Open1 التالي:

Sub Open1()
 Worksheets("m").Select
End Sub

الإجراء السابق يقوم بفتح الصفحة m ...

الآن اذهب لنافذة العمل واضغط بزر الفأرة اليميني على الزر المطلوب و اختر Assign Macro من القائمة المنسدلة لتظهر لك نافذة ، اختر الماكرو Open1 .

الآن تستطيع بالضغط على الزر فتح الصفحة m

رابط هذا التعليق
شارك

السلام عليكم ...

أظن أن شرح الأستاذ حسام يفي بالغرض ، وعذراً من الأخ أبو مؤنس فالرابط بعد التصحيح :

http://www.officena.net/ib/index.php?showtopic=2407

أما عن كيفية إنشاء موديل فإليك الشرح التالي :

اضغط مفتاحي Alt+F11 لتظهر لك النافذة التالية :

cc1.gif

أدرج موديل من القائمة Insert

الآن افتح الموديل واكتب فيه الإجراء السابق :

cc2.gif

كرر كتابة الإجراء السابق ، ولكن بعد تغيير اسمه واسم الورقة التي تريد فتحها ...

الآن وبعد كتابة الكود ، يصبح لديك مايكروات بعدد الإجراءات التي كتبتها :

cc3.gif

اربط كل مايكرو بالزر المخصص له ...

تحياتي ... :lol:

تم تعديل بواسطه محمد حجازي
رابط هذا التعليق
شارك

  • 1 month later...
زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information