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

أين يوضع الكود و كيف أفعل الكود ؟؟


إذهب إلى أفضل إجابة Solved by محمد طاهر عرفه,

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

  • أفضل إجابة

لتشغيل الكود فى الاكسيل

اما تشغيله عند حدث معين

مثل :

فتح ملف

تغيير فى ورقة عمل

ضغط علي زر

و للتعرف علي الاحداث المرتبطة بالكائنات

اضغط alt+F11

ثم انقر مرتين علي اكائن سواء كان الملف أو ورقة العمل

ستجد فى اليمين مربعي سرد COMBO BOX من أحدها تختار الكائن و من الاخر تختار الحدث

فيكتب لك بداية الروتين الفرعي المرتبط بالحدث

و الذي تضع الكود داخله

مثل

Private Sub Workbook_Open()

هنا يكتب الكود

End Sub
أو اذا كان مكتوب فى Sub Routine لها اسم مخصص غير مرتبط بحدث مثل
Sub IBNSINA1()

هنا يكتب الكود

End Sub
سيظهر فى قائمة الماكرو و يمكن تشغيله من القائمة أو بضغط ALT+F8 و اختياره ثم تشغيله و اذا كان فى دالة Function
Function IBNSINA()

هنا يكتب الكود

End Function

فيمكن استدعاء الدالة مثل باقي الدوال الموجودة فى الاكسيل

و ذلك من القسم المسمي User Defined Functions

من مجموعات الدوال

و توجد مقدمة عن الكود و استخدامه فى الاكسيل هنا

( اضغط هنا )

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

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

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

Important Information