حصريا : دورة كاملة في شرح VBA وتطبيقاته في إكسيل

[أبو هاجر المصري]

ملحوظة هامة :

لاحظت بعد الانتهاء من الموضوع ونشره على المنتدى ، الاختلاف في الكتابة الانجليزية والعربية واتجاه النصوص

حبيت اوضح علشان لأخوة يأخذوا بالهم

شكرا لكم

[رفيق محمد]

يعطيك الف عافية ابوهاجر

وتسلم ايديك

واعانك الله على اشغالك

[يحيى حسين]

اخي أبو هاجر

ضع الكلمات التي باللغة الانجليزة داخل اشارة الاكواد

و ستساعد في ابقاء المادة بتنسيق صحيح

[ahmedebrahem9222@yahoo.com]

يا اخي متشكراااا جدا علي مجهودك الرائع وربنا يوفقك

علي طول

[land2002]

السلام عليك يااخي العزيز وانا شاكرلك جزيل الشكر على الموضوع/

اذا اردت كتابة ماكرو محتواه(بعد عملية الطباعة امسح الخلايا البيضاء)

وشكرا

land2002

[abujak2007]

جزاك الله كل خير على هذه الافادة.

ارجو المواصلة في الموضوع واعطاء امثلة اكثر على كل خاصية.

[naderwatfa]

الأخ الفاضل/ أبوهاجر

كل الشكر و التقدير لكم و للأخوة الأعضاء المساهمين في موضوعك المفيد جداً

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

أرجو الاستمرار ........ مع كل الشكر و خالص الدعاء

[يوسف عطا]

اخى الحبيب

انا مش فاهم اكتب فين الاكواد بالظبط

وحتى اذا عرفت اطبقها ازاى اصلا كل ما ادوس على زرار رن يظهرلى قائمه الماكرو اختار الماكرو ولا ايه انا مش فاهم الحقيقه

ارجو الاجابه

وشكرا

أيها الحصان الأسود

أهلاً ومرحباً بك في منتدى الأحبة

إذا أردت أن تتعلم فابدأ من بداية الدورة رويداً رويداً ولا تتعجل الأمر ، فالعبرة ليست بالكم الذي تتعلمه إنما بالكيف والتطبيق العملي لكل ما تتعلمه

زمانك بتقول : بيقول حكم دا ولا ايه!! مش ناقصه وجع دماغ ع الصبح!!

عموماً تتم كتابة الأكواد من خلال محرر الفيجوال بيسك VBE ويمكنك الإيلاج إليه عن طريق قائمة أدوات أو اضغط كليك يمين على أي ورقة عمل واختر عرض كافة التعليمات البرمجية أو بلغتي الثانية View Code

هذا ونسألك الدعاء يا جواد ( أقصد من الجود وليس الجواد الفرس)

عاشق الإكسيل

صدقونى أعزائى الأفاضل المشاركتين دول لا يقلون أهمية عن باقى المشاركات فى الموضوع

الشكر كل الشكر لصاحب الدار بالطبع اقصد ( صاحب الموضوع )

وجزيل الشكر لكل من ساهم فى الموضوع ليس فقط من عرضوا النقاط وسألوا الاسئلة أو أجابو ا عنها

بل ايضاً من كتب حرف يعبر فيه عن شكره للسادة الأفاضل

تحياتى لكل القائمين على هذا المنتدى الغالى أقصد طبعاً أوفيسنا وهو فعلاً أوفيسنا أى بيتنا ومطرحنا

شكراً لكم جميعاً

للأسف كونت متعجلاً فتسرعت فى قراءة المشاركات ولكنى أعد بالتروى فى متابعة الدرس كاملاً عندما يتم تجميعه وتنقيحه

وشكراً مقدماً لمن سيقوم بهذا العمل

دمتم فى رعاية الله جميعاً

[ghass]

أخي ابو هاجر

مبارك الترقية

و شكرا على جهوداتك

و مداخلات رائعة من الاستاذ عامود و الاستاذ هادي

و هذه المداخلات ستثري الموضوع

و دمتم

السلام عليكم كيف يمكنني ادخال user form ارجو التوضيح لأن الشرح غير واضح مع الشكر

[zine pef]

مجهود كبير يا استاذ أبو هاجر(واصل)

معاك حق اخي justice لبد وضع الكود في الأطار الخاص بيه لكن يلزم نقدر ثعب الأستاذ

معدرى اخي ابو هاجر الكود بالطريقة الصحيحة

Private Sub GuessAge()

Dim userGuess As Integer
Dim age As Integer

age = 25
userGuess = Val(InputBox(“Guess a number between 20 and 30.”, “Guess Age”))
If (userGuess > age) Then
MsgBox (“Too high!”)
MsgBox (“The answer is “ & age)
End If

If (userGuess < age) Then
MsgBox (“Too low!”)
MsgBox (“The answer is “ & age)
End If

If (userGuess = age) Then MsgBox (“You got it!”)

End Sub

[يوسف عطا]

لازلت بعد عدة محاولات لا أعرف طريقة وضع الكود فى الملف

أرجو المساعدة للأهمية

[استاذ ياسر]

بارك الله فى عملك وجزاك خير الجزاء

[zine pef]

السلام عليكم اخواني

لطب الأخ يوسف عطا((لازلت بعد عدة محاولات لا أعرف طريقة وضع الكود فى الملف))

سوف اوضع شرح مبسط لهذه الفكرة بعد إذن***(( الأستاذ: ابو هاجر جزاه الله))***

1) في الصفحة الأولة للحساب( اضغط على المفتاحين معا Alt+F11 تفتح لك صفحة محرر فيجوال بزيك

2) تختار الشكل رقم 1 userform

3)نأخذ زر كما في الصورة و بالسحب نوضعه في الفورم

4) بعد الضغط على الزر مرتين تظهر محرر الفيجوال بزيك

5) نكتب بين السطرين

msgbox"اهلا و سهلا بيك"

و اخيرا اضغط على مفتاح F5

[سالم شباني]

السلام عليكم أستاذنا الفاضل أبو هاجر المصري

حقيقة دروس قيمة عرضت بطريقة شيقة وبأسلوب بسيط

أشكرك على المجهود الذي بذلته ، جعله الله في ميزان حسناتك ورزقك الصحة والعافية

[ياسر الحافظ]

شـــــــــــــــــــــــــــــــــــكرا شكرا ابو هاجر وشكر خاص للسيد خبور والمشرفين الموضوع قيم جدا

وفقكم الله

ياسر حافظ

[خالد القدس]

السلام عليكم

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

والله مشتاقين لمواصلة هذه الدورة مثل شوقنا للماء العذب

زادك الله علماً ونفع بك البلاد والعباد

[ياسر خليل أبو البراء]

والله مشتاقين لمواصلة هذه الدورة مثل شوقنا للماء العذب

أضم صوتي لصوت أخي خالد

نريد متابعة الدورة بشكل منتظم أخي أبو هاجر

أنا عارف إننا متقلين عليك

بس إنت دلوقتي سبيلنا لتعلم VBA فياريت ما تستغناش عنا ونشوف ردودك دايماً

وياريت كمان لو ندعم كل شرح بأمثلة ويكون فيه حاجة زي واجب؟؟لغز؟؟ عشان الناس تشغل دماغها

عايزين تعليم مشترك وفعال

عاشق الإكسيل

[أ / محمد صالح]

أولا جزى الله الأخ أبو هاجر المصري خير الجزاء على ما قدم

واليوم أقدم هدية لكل من يريد تعلم vba الإكسل

موقع كامل لهذا الغرض

هنـــــا

وهذا رابط لترجمته عبر ترجمة جوجل

هنــــــــــــــــــــــــــــــــــــا

أتمنى أن أكون ساهمت ولو بقدر يسير

أخوكم

محمد صالح

[alladinad]

جزاك الله خيرا

[خالد القدس]

السلام عليكم

هدية رائعة بافعل أخي الكريم محمد صالح خاصة مع الترجمة

فتح الله عليك وزادك من نعيمه

[أ / محمد صالح]

السلام عليكم

هدية رائعة بافعل أخي الكريم محمد صالح خاصة مع الترجمة

فتح الله عليك وزادك من نعيمه

للأسف أخي خالد

الغالبية العظمى لمصادري لتعليم لغات البرمجة انجليزية

لأنهم تفوقوا

ولكن كلي أمل في بناء جيل عربي يبدأ من حيث انتهوا

أشكرك لمرورك الكريم وحسن حديثك

[محمد يحياوي]

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

دورة في VBA.rar

[sheno2100]

جزاكم الله خيرا جميعا علي المجهود العظيم

[ربيع7]

اجد حرجا شديدا امام كل هذا الجهد الراااااائع والضخم والذى يحتوى فى طياته على كرم خلق رفيع جدا وروحا عالية من العطاء

فارجو الله ان يبارك لك فى كل شيئ... صحتك ... واولادك ..... واهلك .... ومالك .... وان يزيدك من علمه وان يجعل جهدك خالصا لوجهه تعالى لتجد ذلك مباركا فيه ان شاء الله فى ميزان حسناتك يوم لا ينفع مال ولا بنون

ونرجو الاستمرار ان شاء الله وبعونه سبحانه وتعالى

تم تعديل أغسطس 31, 2009 بواسطه ربيع7

[aymansharef]

جزاكم الله خيرا . شكؤا لجهودكم .

عملت اف الشرطية المركبة ولكن عندالتنفيذ ينفذ اول شرط ويترك بقية الشروط وينتقل فورا الى عبارة end if

فما هي المشكلة لوسمحتم.