الاستاذ مجدى
عزيزي الزائر / عزيزتي الزائرة يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا
او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي
سنتشرف بتسجيلك
شكرا
ادارة المنتدي







 
الرئيسيةالأستاذ التعليماليوميةس .و .جبحـثالأعضاءضع التسجيلالمجموعاتدخولالتسجيل
سبحانك لا علم لنا إلا ما علمتنا أنك أنت العليم
عزيزى الزائر قم بالتسجيل بالمنتدى لمشاهدة باقى الاقسام المهمه
مع تحيات مجدى عبد المنعم محمود يونس ببورسعيد " مدير المنتدى "
أهلا بك من جديد يا زائر آخر زيارة لك كانت في
آخر عضو مسجل Kina فمرحبا به


شاطر | 
 

 دروس فى VBA Excel

اذهب الى الأسفل 
كاتب الموضوعرسالة
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: دروس فى VBA Excel   الثلاثاء يناير 09, 2018 8:51 pm

دروس فى
VBA Excel


الدرس الأول
قبل أن نبدأ، دعونا نتأكد من أن الأدوات التي نحتاجها موجودة.
إذا كنت تستخدم ( Excel 2007) أو إصدار أعلى
click ". Office button, then click Excel Options بالاسفل
سيتم إضافة علامة تبويب جديدة وهى Developer
سوف نحتاج  فى العمل مع التعليمات البرمجية ل VBA ، محرر، يتم تثبيته بشكل افتراضى. يمكنك فتحه عن طريق الضغط على تركيبة مفتاح الاختصار "

 Alt+ F11 ": او انقر على الشكل المشار له بالسهم بالصورة السابقة

انتهى الدرس الأول

اليكم الشرح بالصور












_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-



عدل سابقا من قبل مجدى يونس في الثلاثاء يناير 09, 2018 9:22 pm عدل 3 مرات
الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الثلاثاء يناير 09, 2018 8:57 pm

الدرس الثاني
تسجيل الماكرو
سنقوم بعمل المثال التالى معا للتعرف على تفاصيل خاصة بالكود والماكرو
وأتمنى أن يتم تنفيذه من قبل الدارس أو الراغب فى التعلم
المثال
-         حذف محتويات الأعمدة A و C

       -         نقل محتويات العمود B  الى العمود A

      -         نقل محتويات العمود D الى العمود C

قم بتعبئة محتويات الأعمده السابقة بأيه بيانات
قم بالضغط على  "Ok"         " Record Macro"

قم بتنفيذ المطلوب يدويا الى أن تنفذ جميع الخطوات بالترتيب

لأن كل ما تفعله يتم تسجيله من قبل اداه تسجيل الماكرو

ثم إضغط على  Stop Recording
الخطوات بالصور لتسهيل تنفيذ المطلوب
بعد تعبئة البيانات قم بالضغط على  Record Macro    
تظهر لنا نافذة
1 - نقوم بكتابه اسم الماكرو

نلاحظ أن اسم الماكرو لا يحتوى على ايه مسافات

ومن الممكن أن نضع علامه ( _ ) بين كلمتين لو اردنا تسمية الماكرو بأسم مكون من كلمتين مثلا

2 – نجد ان هناك كلمه Ctrl + وبجوارها مربع

وتعنى أننا يمكن وضع أى حرف داخل هذا المربع ويكون وسيله لإستدعاء الماكرو فيما بعد لتنفيذ المطلوب وهذا امر غير مطلوب حاليا سيتم توضيح ذلك فيما بعد ان شاء الرحمن بالتفصيل

3 – هناك مستطيل به سهم رأسه الى الأسفل

وتعنى اختيار من متعدد وهنا نقوم بإختيار الملف المراد تسجيل به الماكرو فى حاله ان هناك مثلا عدد ( 2 ) ملف اكسل مفتوحين

4 – وهناك مربع آخر وهو الوصف المختصر لهذا الماكرو الذى سيتم تسجيله وحاليا هذا الأمر غير مطلوب

5 – نقوم بالضغط على زر OK
بعد الانتهاء من تنفيذ المطلوب بالكامل

نقوم بالضغط على ايقاف التسجيل
ملحوظة

قد تظهر علامه تسجيل الماكرو بأسفل الشيت نقوم بالضغط عليها لتسجيل الماكرو

ثم بعد الانتهاء من تنفيذ المطلوب نقوم بالضغط على ايقاف التسجيل
لقد تم تسجيل الماكرو

ونبدأ الآن فى معرفة تفاصيل الكود الذى قمنا بعمل خطواته من خلال عمليه التسجيل ومعرفة بعض الأمور الأساسية والهامه للكود البرمجى

للدخول الى الصفحة التى بها الكود البرمجى والذى تم تسجيله تلقائيا فى موديول

نقوم بالضغط على ALT+F11 معا

تفتح لنا صفحه تسمى صفحه محرر الأكواد

الملاحظات :

1-   يبدأ الكود بكلمه Sub  ثم اسم الماكرو ثم هذين القوسين المغلقين ( )

الكود دائما يبدأ بذلك الأمر وخاصة إذا كان داخل موديول

وهناك أكواد تكتب ولا تسجل عن طريق الماكرو تبدأ بخلاف ذلك وتلك التى توجد داخل حدث الصفحة ( الشيت ) أو داخل حدث الملف

This Workbook

وسيأتى الحديث عن ذلك بالتفصيل فيما بعد ان شاء الرحمن داخل تلك الدروس

   2 – هناك داخل الكود علامه ((  ' )) وهى دائما تكون مصبوغة باللون

        الأخضر وتسمى علامه اقتباس أحادية تشير الى تعليق يمكنك كتابته يدويا    

        بأى لغة

الفائدة منها : وهذا التعليق يكون خاص إما بشرح جزء من الكود أو تشير الى تعليمات برمجيه معينه

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

  3 – ينتهى الكود بجمله End Sub

       وهذه الجمله هامه جدا لإنهاء عمل الكود

4 – يمكننا هنا ونحن داخل الموديول الذى به الكود البرمجى الذى تم تسجيله تلقائيا بناء على أننا قمنا بتنفيذ الخطوات الخاصة بالمثال يدويا

·       تغيير اسم الكود الى اى اسم .. اى نقوم بتغيير كلمه Module1 الى اى كلمه أخرى قد تكون معبرة عن طبيعة عمل الكود أو حتى يمكننا وضع اسمنا باللغة الإنجليزية طبعا دون ترك مسافات ويمكننا الاستعانة بوضع تلك العلامه ( _ ) التى تسمى Under Scour

يمكننا التعديل والإضافة داخل الكود البرمجى ايضا فى تغيير اسماء الأعمده والمدى وخلافه أو أى أمر آخر كما يتراء لنا وسيأتى فيما بعد ذكر هذا الأمر فى الدروس القادمة بشىء من التفصيل


_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الثلاثاء يناير 09, 2018 9:11 pm

تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :

نذهب الى الشيت ثم نضغط على Insert

تظهر لنا نافذة نختار منها Button

ثم نقوم بوضعه داخل الشيت

ثم نقوم بالضغط على الزر كليك يمين

ونختار تعيين ماكرو كالتالى

تظهر لنا نافذة

نختر منها اسم الماكرو وهنا قد اسميته MZM_ELSHRIEF

ثم نختار This Workbook

ثم نضغط على OK

كالتالى

الآن يمكنك تنفيذ الماكرو الذى قمنا بتسجيله

بمجرد الضغط على الزر أى Button

يمكنك أيضا تغيير اسم الزر اذا اردت ذلك كالتالى

بالضغط كليك يمين على الزر

تظهر لك نافذة اختر منها اضافة نص

حفظ الملف

عند حفظ الملف تظهر لنا رساله
نضغط على زر NO

فتظهر لنا رساله أخرى
نضغط على زر Yes
فتظهر لنا نافذة
نقوم بإختيار من Save as type

excel Macro-Enbled Workbook

ثم نضغط على Save

الخيار التالى

فتكون أيقونه الملف

انتهى الدرس الثانى

_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الأربعاء يناير 10, 2018 5:48 am

اليكم الشرح بالصور


























_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الخميس يناير 11, 2018 1:44 pm

الدرس الثالث
إعدادات الأمان
لغة VBA هي لغة برمجة

وهذا يعنى أنه يمكن لبعض المبرمجين أن يستغلها استغلالا سيئا فى إنشاء برامج ضاره تضر بالحاسب الآلى الذى يستخدم هذا البرنامج

وعليه قررت شركة مايكروسوفت إضافة خاصية الأمان لحماية المستخدم

وللدخول إلى خيارات الأمان نتبع الخطوات التالية :

بأوفيس 2007 وما فوق

نضغط على زر برنامج الأوفيس

ثم نضغط على Excel Option تظهر لنا نافذة

ثم نختار

Trust Center

من القائمة تظهر لنا نافذة أخرى

ثم نضغط على

Trust Center Settings

تظهر لنا نافذة

نجد هنا قسمين بالنافذة الأعلى

الجزء الأول به عدد ( 4 ) اختيارات

ومعناهم كالتالى :

اختيار الخيار الثانى او الثالث

عندما يقوم المستخدم بفتح البرنامج تظهر نافذة الاكسيل
وبالضغط على زر Options
تظهر لنا نافذة
فإن كنا نثق بالبرنامج والمصدر نضغط على الخيار الثانى وهو

Enable this content

ونضغط على OK

_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الخميس يناير 11, 2018 1:52 pm

اليكم الصور














_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الخميس يناير 11, 2018 1:59 pm

الدرس الرابع
الرسائل

نتحدث هنا عن استخدام بعض التقنيات التى تجعل استخدامنا للماكرو _ ( برمجه اكسل ) _ أكثر مرونه .. وذات طابع احترافى وأكثر جمالا

وذلك من خلال استخدام الرسائل من خلال كتابة بعض الأكواد البسيطه

السؤال ؟

أين تكتب تلك الأكواد ؟

تكتب تلك الأكواد داخل حدث الشيت

تكتب داخل حدث المصنف

تكتب داخل موديول

تكتب داخل أكواد اليوزر فورم

أى تكتب حسب الحاجه لها على أن تكون داله على الهدف منها سواء كان تحذير من شىء أو طرح سؤال بسيط

مثال ( 1 )

نريد أن نتأكد من أن الطابعه فى وضع التشغيل وإعطاء المستخدم فرصة للتأكد من ذلك مع توقف الماكرو عن العمل الى أن يقرر المستخدم الضغط على زر موافق أو OK

التالى نص الرساله التى ستظهر

كما بالصورة

MsgBox “Please make sure that the printer is switched on”

جدير بالذكر

عند الملاحظة الأولى لشكل الرساله

نجد نص الرساله

ثم زر OK



اذا الإستنتاج هنا يدفعنا الى ذكر سؤال هام لمعرفة كيفية ظهورها بهذا الشكل

س : مما تتكون الرساله ؟ وكيف تكتب ؟

ج : تتكون الرساله من هذه التركيبة التالية

MsgBox (prompt [, buttons] [, title] [, helpfile, context])

السؤال الذى يطرح نفسه هنا

س : ماذا تعنى هذه التركيبة ؟

ج : كالتالى

كلمة Prompt تعنى ان تكون الرساله سريعه أى عند حدوث أمر ما تظهر الرساله سريعا

هناك أيضا أمور يجب ذكرها :

1 - طول الرساله يتكون من 1024 حرف

2 - واذا كانت الرساله تتكون من عده أسطر يجب الفصل بين كل سطر بعلامه (& _ )

3 – هناك معيار هام فى الرسائل عندما مثلا تريد تحذير المستخدم الى ان الطابعه تعمل مع التأكيد على ذلك بزر OK

هنا نستخدم الفواصل وهو امر ضرورى كمثل الرساله التالية

MsgBox “Is the printer on?”, , “Caution!”

نأتى الى القيم الرقمية

التى سبق الإشارة عنها

وبشىء من التفصيل

فمثلا إذا كنت تريد القيمة 4 والقيمة 32

يكون النص الذى يكتب فى الكود هكذا

MsgBox Prompt:=”Delete this record?”, Buttons:=36

أو يكتب النص هكذا

MsgBox (Prompt:=”Delete this record?”, Buttons:=vbYesNo + vbQuestion)

وإذا أردنا كتابة الرسالة بالترتيب الخاص بها كما ذكرنا بكيفية كتابة الرساله فتكون هكذا

MsgBox("Text", vbYesNoCancel + vbExclamation + vbDefaultButton2, "Title")

فتظهر الرساله

هنا السؤال يطرح نفسه

هل يمكن كتابة كل هذه الأزرار فى الرساله ؟

الإجابة بالقطع (( لا ))

· فمجموعة القيم من ( 1:5 ) تمثل الأزرار التى ستظهر فى الرساله وعلى حسب ما تريد وتختار


· ومجموعة القيم ( 16,32,48,64 ) تمثل نوع الرساله من كونها استفهام أو تعجب .. الخ وعلى حسب ما تختار

· ومجموعة القيم ( 0,256,512,768 ) تعنى أى الأزرار

YES أو NO أو CANCEL تريدها أن تكون الإفتراضية

للمستخدم أى المضيئة

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

وتظهر الرساله
MsgBox("Text", 3 + 48 + 256, "Title")

_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
مجدى يونس
Admin
avatar

عدد المساهمات : 1013
تاريخ التسجيل : 22/02/2013
العمر : 64

مُساهمةموضوع: رد: دروس فى VBA Excel   الخميس يناير 11, 2018 2:06 pm

صور الموضوع وفى انتظار الردود للتكملة













_________________
عندما تولد يابن ادم يؤذن فى أذنك من غير صلاة وعندما تموت يصلى عليك من غير أذان وكأن حياتك فى الدنيا ليست سوى الوقت الذى تقضيه بين الأذان والصلاة فلا تقضيهما فيما لاينفع
---((الله ناظرى الله سامعى الله مطلع علي))-

الرجوع الى أعلى الصفحة اذهب الى الأسفل
معاينة صفحة البيانات الشخصي للعضو http://magdi54.forumegypt.net
 
دروس فى VBA Excel
الرجوع الى أعلى الصفحة 
صفحة 1 من اصل 1
 مواضيع مماثلة
-
» امتحانات Excel لعام 2010 في الرخصة الدولية لقيادة الحاسب الآلي واللغات

صلاحيات هذا المنتدى:لاتستطيع الرد على المواضيع في هذا المنتدى
الاستاذ مجدى :: قسم مجموعة الاوفيس :: قسم الاكسل-
انتقل الى: