عزيزي الزائر / عزيزتي الزائرة يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي سنتشرف بتسجيلك شكرا ادارة المنتدي
الاستاذ مجدى
عزيزي الزائر / عزيزتي الزائرة يرجي التكرم بتسجبل الدخول اذا كنت عضو معنا او التسجيل ان لم تكن عضو وترغب في الانضمام الي اسرة المنتدي سنتشرف بتسجيلك شكرا ادارة المنتدي
الاستاذ مجدى
هل تريد التفاعل مع هذه المساهمة؟ كل ما عليك هو إنشاء حساب جديد ببضع خطوات أو تسجيل الدخول للمتابعة.
سبحانك لا علم لنا إلا ما علمتنا أنك أنت العليم
مع تحيات مجدى عبد المنعم محمود يونس ببورسعيد " مدير المنتدى "
عدد المساهمات : 3806 تاريخ التسجيل : 22/02/2013 العمر : 70
موضوع: دروس فى VBA Excel الإثنين نوفمبر 11, 2019 4:07 pm
دروس فى VBA Excel
الدرس الأول
قبل أن نبدأ، دعونا نتأكد من أن الأدوات التي نحتاجها موجودة. إذا كنت تستخدم ( Excel 2007) أو إصدار أعلى click ". Office button, then click Excel Options بالاسفل سيتم إضافة علامة تبويب جديدة وهى Developer
سوف نحتاج فى العمل مع التعليمات البرمجية ل VBA ، محرر، يتم تثبيته بشكل افتراضى. يمكنك فتحه عن طريق الضغط على تركيبة مفتاح الاختصار Alt+ F11
الدرس الثاني
تسجيل الماكرو
سنقوم بعمل المثال التالى معا للتعرف على تفاصيل خاصة بالكود والماكرو وأتمنى أن يتم تنفيذه من قبل الدارس أو الراغب فى التعلم
المثال
- حذف محتويات الأعمدة 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 يمكننا التعديل والإضافة داخل الكود البرمجى ايضا فى تغيير اسماء الأعمده والمدى وخلافه أو أى أمر آخر كما يتراء لنا وسيأتى فيما بعد ذكر هذا الأمر فى الدروس القادمة بشىء من التفصيل تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :
نذهب الى الشيت ثم نضغط على Insert تظهر لنا نافذة نختار منها Button ثم نقوم بوضعه داخل الشيت
تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :
نذهب الى الشيت ثم نضغط على Insert تظهر لنا نافذة نختار منها Button ثم نقوم بوضعه داخل الشيت
ثم نقوم بالضغط على الزر كليك يمين ونختار تعيين ماكرو
تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :
نذهب الى الشيت ثم نضغط على Insert تظهر لنا نافذة نختار منها Button ثم نقوم بوضعه داخل الشيت
ثم نقوم بالضغط على الزر كليك يمين ونختار تعيين ماكرو كالتالى
تظهر لنا نافذة نختر منها اسم الماكرو وهنا قد اسميته MZM_ELSHRIEF ثم نختار This Workbook ثم نضغط على OK
تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :
نذهب الى الشيت ثم نضغط على Insert تظهر لنا نافذة نختار منها Button ثم نقوم بوضعه داخل الشيت
ثم نقوم بالضغط على الزر كليك يمين ونختار تعيين ماكرو كالتالى
تظهر لنا نافذة نختر منها اسم الماكرو وهنا قد اسميته MZM_ELSHRIEF ثم نختار This Workbook ثم نضغط على OK
الآن يمكنك تنفيذ الماكرو الذى قمنا بتسجيله بمجرد الضغط على الزر أى Button
يمكنك أيضا تغيير اسم الزر اذا اردت ذلك كالتالى بالضغط كليك يمين على الزر تظهر لك نافذة اختر منها اضافة نص
حفظ الملف
عند حفظ الملف تظهر لنا رساله
نضغط على زر NO
فتظهر لنا رساله أخرى
تابع الدرس الثانى
ندخل الى مرحله تنفيذ الماكرو الذى قمنا بتسجيله
ولها خطوات معينة كالتالى :
نذهب الى الشيت ثم نضغط على Insert تظهر لنا نافذة نختار منها Button ثم نقوم بوضعه داخل الشيت ثم نقوم بالضغط على الزر كليك يمين ونختار تعيين ماكرو كالتالى
تظهر لنا نافذة نختر منها اسم الماكرو وهنا قد اسميته MZM_ELSHRIEF ثم نختار This Workbook ثم نضغط على OK
الآن يمكنك تنفيذ الماكرو الذى قمنا بتسجيله بمجرد الضغط على الزر أى Button
يمكنك أيضا تغيير اسم الزر اذا اردت ذلك كالتالى بالضغط كليك يمين على الزر تظهر لك نافذة اختر منها اضافة نص
حفظ الملف
عند حفظ الملف تظهر لنا رساله نضغط على زر NO
فتظهر لنا رساله أخرى
نضغط على زر Yes
Save as type
Excel Macro-Enbled Workbook
ثم نضغط على Save
_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
إبراهيم العوامي و Youcef يعجبهم هذا الموضوع
serdoun
عدد المساهمات : 17 تاريخ التسجيل : 25/11/2019 العمر : 43
موضوع: رد: دروس فى VBA Excel الخميس نوفمبر 28, 2019 9:25 pm
جزاك الله خيرا أساتذي العزيز
مجدى يونس Admin
عدد المساهمات : 3806 تاريخ التسجيل : 22/02/2013 العمر : 70
موضوع: رد: دروس فى VBA Excel الإثنين مارس 23, 2020 5:47 am
شكرا لك
_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
Tawfeeq alsrori
عدد المساهمات : 1 تاريخ التسجيل : 16/04/2020
موضوع: طلب السماح بتنزيل ملفا التطبيق في الاكسل اليوزرفورم الثلاثاء يونيو 09, 2020 3:10 am
السلام عليكم ورحمة الله وبركاته ،،، سعادة الاستاذ مجدي حفظكم الله يسعدني ويشرفني ان اكون عضواً في ناديك التعليمي الاكثر من رائع كما اامل منكم السماح لي بتنزيل ملفات تطبيق اليوزرفورم التي تفضلتم بتصميماتها على الاكسل مأجورين . متنين لكم دوام الصحة والعافية ،،
مجدى يونس Admin
عدد المساهمات : 3806 تاريخ التسجيل : 22/02/2013 العمر : 70
موضوع: رد: دروس فى VBA Excel الثلاثاء يونيو 09, 2020 4:40 am
وعليكم السلام ورحمة الله وبركاتة اولا اخى العزيز قل اخى وليس سعادة نحن أخوة ثانيا يسعدنى وجودكم بالمنتدى انت وجميع الاخوة ثالثا قم بذلك بدون استئزان على رابط خارجى فهى حسنة جارية لى ولك
_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
عصام المحمد
عدد المساهمات : 5 تاريخ التسجيل : 02/01/2020
موضوع: رد: دروس فى VBA Excel الإثنين أكتوبر 19, 2020 6:34 pm
شكرا على الجهود الجبارة
مجدى يونس Admin
عدد المساهمات : 3806 تاريخ التسجيل : 22/02/2013 العمر : 70
موضوع: رد: دروس فى VBA Excel الأحد أكتوبر 25, 2020 8:20 am
اى خدمة
_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
وحيد فريد
عدد المساهمات : 11 تاريخ التسجيل : 11/01/2019
موضوع: رد: دروس فى VBA Excel الخميس نوفمبر 05, 2020 4:38 pm
بارك الله فيكم شكرا لحضرتك
مجدى يونس Admin
عدد المساهمات : 3806 تاريخ التسجيل : 22/02/2013 العمر : 70
موضوع: رد: دروس فى VBA Excel الجمعة نوفمبر 06, 2020 12:42 pm
اى خدمة
_________________
لا تعطيني سمكة ... و لكن علمني كيف أصطاد السمك
ليلى محمد
عدد المساهمات : 8 تاريخ التسجيل : 16/03/2021
موضوع: رد: دروس فى VBA Excel الثلاثاء مارس 16, 2021 6:59 pm
موضوع: دروس فى VBA Excel 
الإثنين نوفمبر 11, 2019 4:07 pm
