التعامل مع الماكرو في برنامج الاكسيل

بسم الله الرحمن الرحيم

للتعامل مع الماكرو في برنامج الاكسيل
في بداية قم باظهار لوحة الادوات من خلال الضغط علي قائمة view واختر toolbars ثم control Toolbox قم برسم command في المكان الذي تريد

اضغط بالزر اليمين للفارة علي command واختار view code قم بكتابة الماكرو او الكود الذي تريده فالفجول بيسك ثم اغلق الكود وارجع الي برنامج الاكسيل لكي تسطيع تشغيل الكود من الاكسيل قم بالضغط داخل control Toolbox علي exit design mode( رمز المثلث). اذا اردت تشغيل الكود قم بالضغط علي command الذي قمت باضافته

ثانيا
اذا اردنا التعامل مع cell في sheet نقوم في البداية بتعريف متغير من نوع worksheet داخل الكود الخاص ب command مثل
Dim ws As Worksheet
لكي نجعل ws يشير الي sheet1 من الملف نقوم بكتابة هذا السطر داخل command

Set ws = Worksheets("sheet1
("

من خلال ws نستطيع ان نصل الي اي خليه داخل sheet1 مثلا اذا اردنا الوصول الي الصف 2 والعمود 3 الخلية (C2) نقوم بكتابة

ws.Cells(2, 3).Value=value
حيث value هي القيمه التي نود ان نضعها داخل الخلية
اي نكتب
ws.Cells(row, column).Value
حيث row هو رقم الصف و column هو رقم العمود
اذا اردنا ان ناخذ قيمة من الخلية ونضعها في متغير نقوم في البداية بتعريف المتغير مثل

dim x as single
x=ws.Cells(row, column).Value

اذا اردنا ان نصل الي مجموعة من الخلاية مثلا من الخلية a1 الي a10
فيتم ذلك من خلال التعامل مع loop

for i=1 to 10
ws.Cells(i,1).Value=value
next i

لان A هي العمود الاول ثبتنا رقم العمود عند 1 وغيرنا رقم الصف من 1 الي 10

اذا كان لديك اي استفسار قم بارساله وان شاء الله تسطيع الاجابة عليه

جزاك الله خيرا بشمهندس محمود فعلا عاجز عن الشكر والامتنان لك اسال الله العلى العظيم ان يجعله في ميزان حسناتك

ميرسي يا بشمهندس بجد علي الافاده الجميله
انا عملت المشروع بس بطريقه تانيه و يارب تكون صح
التعامل مع الماكرو في برنامج الاكسيل 700120

انا اول مرة اتعامل بالاتنين مع بعض
ولما فهمتها وجربتها حسيت بأهميتها
وسؤالي......
هل بالطريقة دي ممكن نعمل برنامج عادي في الاكسل
وبعدين المستخدم يملا قاعدة البيانات للبرنامج عن طريق استخدامه للاكسل
يعني لو الجدول فيه قيم حقيقية وكتير
ممكن ناخد القيم دي في arrays ونشتغل علي قيمها عادي في الفجوال؟؟؟؟؟

جزيل الشكر للباشمهندس محمود

انا فعلاً كنت حاسس ان طلبة اعدادى في الكلية حيموتوا ويفهموا جزئية الماكرو دىىى

السلام عليكم ورحمة الله وبركاته
بالنسبة للمهندسةPRINCESSs

انت ممكن تعملي array وتدخلي فيها القيم الي انت عايزاها فيها ممكن تعملي الي انت عايزاه
علي array
ممكن تعملي الكلام ده علي اي عدد من البيانات
ممكن نعرف array من خلال واحده من الطرق ديه

Dim a() ' variable length array of variants
Dim b(5) as String ' An array of 5 strings
Dim c(1 to 6) as Integer ' 6 elements
Dim d(4, 7) ' Multiple dimensions, up to 60 allowed

for i = 1 to 5
a(i) = i
next i
والموقع ده بيشرح ازاي نتعامل مع المصفوفات في لغة الفجول بيسك
http://mc-computing.com/languages/Arrays.htm

وممكن نتعامل معاها ب loop عشان نخزن فيها قيم من sheet

جزاك الله كل خير يا باشمهندس
وشكررررررا علي الشرح والموقع

التعامل مع الماكرو في برنامج الاكسيل Bxljdttfju

شكراً لك جداً يابشمهندس محمود علي هذا الشرح لاننا بجد كنا محتاجينه
لا اعرف كيف ارد لك هذا الجميل

التعامل مع الماكرو في برنامج الاكسيل 0adffe11