أخر الاخبار

أساسيات VBA إكسل : كيف يتم تشغيل الماكرو في الاكسل ؟

 

كيف يتم تشغيل الماكرو في الاكسل ؟



في هذه المقالة سأتحدث عن كيفية تشغيل الماكرو في الاكسيل, بالاضافة الى انشاء ماكرو سيحدد خلية من اختيارنا .


كيفية تشغيل الماكرو في الاكسيل

افتح المحرر وأضف Module إليه:

 

أساسيات VBA إكسل : كيف يتم تشغيل الماكرو في الاكسل ؟



في Module ، اكتب مثال ثانوي واضغط على موافق .

ستلاحظ أن الاكسيلأضاف تلقائيًا نهاية هذا الإجراء الجديد:

Sub exemple() End Sub

الآن قم بإنشاء زر الذي ستربط به هذا الماكرو :

 

أساسيات VBA إكسل : كيف يتم تشغيل الماكرو في الاكسل ؟

أكمل الماكرو الخاص بك بهذا:

Sub exemple() 'Sélection de la cellule A8 Range("A8").Select End Sub


يمكنك اختبار هذا الماكرو بالنقر فوق الزر الخاص بك ، ثم يتم تحديد الخلية A8 

سنقوم الآن بتعديل هذا الماكرو لتحديد الخلية A8 من الورقة الثانية:

Sub exemple() 'Activation de la feuille 2 Sheets("Feuil2").Activate 'Sélection de la cellule A8 Range("A8").Select End Sub

يقوم الاكسيلبعد ذلك بتنشيط الورقة 2 قبل تحديد الخلية A8 

نستخدم التعليقات أو الملاحظات (النص الأخضر) لمساعدتك على فهم وحدات الماكرو في هذه الدورة التدريبية.


كيفية تحديد نطاق من الخلايا  بواسطة الماكرو في الاكسيل


Sub exemple() 'Sélection des cellules A1 à A8 Range("A1:A8").Select End Sub


كيفية اختيار خلايا منفصلة بواسطة الماكرو في الاكسيل

Sub exemple() 'Sélection des cellule A8 et C5 Range("A8, C5").Select End Sub


كيفية تحديد نطاق مسمى من الخلايا  بواسطة الماكرو في الاكسيل

Sub exemple() 'Sélection des cellules de la plage "ma_plage" Range("ma_plage").Select End Sub

 

كيفية تحديد خلية بناءً على رقم الصف والعمود بواسطة الماكرو في الاكسيل

Sub exemple() 'Sélection de la cellule de la ligne 8 et de la colonne 1 Cells(8, 1).Select End Sub


هذا مثال صغير:

Sub exemple() 'Sélection aléatoire d'une cellule de la ligne 1 à 10 et de la colonne 1 Cells(Int(Rnd * 10) + 1, 1).Select 'Traduction : 'Cells([nombre_aléatoire_entre_1_et_10], 1).Select End Sub



كيفية اختيار الخط  بواسطة الماكرو في الاكسيل


من الممكن تحديد سطور كاملة باستخدام مرتب أين صفوف 

Sub exemple() 'Sélection des lignes 2 à 6 Range("2:6").Select End Sub


Sub exemple() 'Sélection des lignes 2 à 6 Rows("2:6").Select End Sub


اختيار العمود بواسطة الماكرو في الاكسيل

بالنسبة للصفوف ، من الممكن تحديد أعمدة بأكملها باستخدام مرتب أين الأعمدة


Sub exemple() 'Sélection des colonnes B à G Range("B:G").Select End Sub


Sub exemple() 'Sélection des colonnes B à G Columns("B:G").Select End Sub

تعليقات
ليست هناك تعليقات
إرسال تعليق



    وضع القراءة :
    حجم الخط
    +
    16
    -
    تباعد السطور
    +
    2
    -