أسهل الطرق لعمل الدوائر الحمراء

[الزباري]

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

رغم أن الموضوع مكرر.. إلا أني أحببت بأن أطرحه في صفحة نظيفة خالية من المعادلات والكودات المعقدة.. وطرق عرضها بشكل مختلف.

تابعونا..

[الزباري]

المثال الأول:

سنتعامل مع هذا الجدول لعمل دوائر على درجة الرسوب

[الزباري]

الخطوات كالتالي:

1- نطبق data validation على خلية الدرجة

لا تنس إزالة علامة الصح 

نطبق ما ذكرناه على جميع خلايا درجة الطالب

2- نضيف زر لعمل الدوائر ونربطه بالكود التالي:

 ActiveSheet.CircleInvalid

 

3- نضيف زر لمسح الدوائر ونربطه بالكود التالي:

ActiveSheet.ClearCircles

 

وتهانينا..

 

 

المرفق:

دوائر01.rar

[خالد الشاعر]

استاذ الزيارى

يسعدنى ان اكون اول المشاركين 

فكرة جميلة جداً و سهله

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

[الزباري]

يشرفنا مرورك أ. خالد الشاعر

[جلال الجمال_ابو أدهم]

الزباري

اخى الفاضل ما شاء الله عليك
تحياتى

[الزباري]

جلال الجمال_ابو أدهم

سررت بتواجدك

تحياتي

[الزباري]

المثال الثاني:

سنتعامل مع هذا الجدول لعمل دوائر على درجة الرسوب:

 

 

الإجابة كالتالي :

اختر الدرجات وطبق الآتي

 

المرفق:

دوائر02.rar

[إبراهيم ابوليله]

اخى الزبارى

مشكورا على المجهود المثمر

بارك الله فيك

تقبل تحياتى

 

[الزباري]

تسلم يا أخي ابراهيم

[الزباري]

المثال الثالت:

سنتعامل مع هذا الجدول لعمل دوائر على كلمة "راسب":

 

الإجابة كالتالي :

اختر الدرجات وطبق الآتي

 

المرفق:

دوائر03.rar

[saad abed]

اخى الزبارى

اسمح لى اخى ان ابدى اعجابى باسلوبك

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

هناك مواضيع فى vba

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

مثلا :-

Collection CreateObject("Scripting.Dictionary")

[أستيكا]

أخى الزبارى 

اولا أشكرك جزيلا على الشرح المبسط 

و ثانيا بارك الله فى علمكم و رزقكم خيرا 

[كعبلاوى]

أخى الفاضل / الزباري

هل يمكن تطبيق ما سبق شرحه على اكسيل نسخة 2003

[الزباري]

في 11/2/2016 at 19:20, سعد عابد said:

اخى الزبارى

اسمح لى اخى ان ابدى اعجابى باسلوبك

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

هناك مواضيع فى vba

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

مثلا :-

Collection CreateObject("Scripting.Dictionary")

جزالك الله خيراً كل الجزاء..

بصراحة معلوماتي في البرمجة متوسطة نوعاً ما، وفي أمور عامة مطروحة في هذا المنتدى، فقد تعلمتها من متابعتي لهذا المنتدى الرائع، إلا أنني قد رتبت بعض الأفكار ووسعت مداركي بها من خلال البحث والقراءة، ولا زلت أجهل الكثير منها، ولازلنا نتعلم منكم، وأي موضوع أراه مهم بالنسبة لي أقم بتدوينه في هذا المنتدى ليكون مرجعاً لي ولكم.. وهذا لا يمنع يأن نتعاون معكم لترتيب فكرة معينة تكون بمثابة توسيع مدارك الأعضاء للبرمجة.

وتقبل تحياتي

منذ ساعه, كعبلاوى said:

أخى الفاضل / الزباري

هل يمكن تطبيق ما سبق شرحه على اكسيل نسخة 2003

لا يوجد فرق سوى مكان data validation كالتالي:

من هنا

 

شاكرين لك مرورك أستيكا

[عبد القادر محمد مهدى]

شكرا استاذى

موضوع أكثر من رائع

بارك الله فيك

[عبد القادر محمد مهدى]

أستاذي الفاضل / الزباري

هل يمكن تطبيق ما سبق على

"ضعيف" ، "ضغيف جدا"

أشكرك استاذي

 

[الزباري]

يمكن تطبيقه بشرط التعامل مع الدرجات، بحيث تكون المعادلة كالتالي:

المرفق:

دوائر04.rar

[Abdelhady Tahoon]

اخى الفاضل عمل ممتاز ورائع 

لى سؤال لو كانت خانة بها درجة واسفلها خانة بها غائب والمطلوب عمل دائرة حمراء عليهما معاً فما هى الطريقة 

شكراً لمجهود حضرتك

[فضل حسين]

استاذنا الفاضل / الزبارى

سلام الله عليكم ورحمته وبركاته

تسلم الايادى بارك الله فيك

ولكن بعد اذنك لى سؤال هل هذة الدوائر تظهر عند طباعة ورقة الاكسل ؟

ولسيادتكم جزيل الشكر 

[الزباري]

4 ساعات مضت, Abdelhady Tahoon said:

اخى الفاضل عمل ممتاز ورائع 

لى سؤال لو كانت خانة بها درجة واسفلها خانة بها غائب والمطلوب عمل دائرة حمراء عليهما معاً فما هى الطريقة 

شكراً لمجهود حضرتك

لو كتبت كلمة غائب في المثال الثاني فسيقوم البرنامج باختيارها مع الدرجات، لأن الفكرة تكمن بتحديد أي رقم أو كلمة خارج المدى المحدد.. جرب

2 ساعات مضت, فضل حسين said:

استاذنا الفاضل / الزبارى

سلام الله عليكم ورحمته وبركاته

تسلم الايادى بارك الله فيك

ولكن بعد اذنك لى سؤال هل هذة الدوائر تظهر عند طباعة ورقة الاكسل ؟

ولسيادتكم جزيل الشكر 

نعم تظهر

[عبد القادر محمد مهدى]

أستاذي الفاضل / الزباري

أحسنت استاذي

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

 

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

بارك الله فيك أخي الغالي الزباري على الموضوع الجميل

يمكن تجميع مجموعة شروط من خلال اختيار Custom ثم وضع معادلة لجمع الشروط المطلوبة ..

المشكلة فقط في هذه الطريقة هي عدم القدرة على التحكم في شكل الدائرة ، وأعتقد أنها لا تظهر في الطباعة (لم أجرب في الواقع)

تقبل وافر تقديري واحترامي

[سليم حاصبيا]

3 دقائق مضت, ياسر خليل أبو البراء said:

بارك الله فيك أخي الغالي الزباري على الموضوع الجميل

يمكن تجميع مجموعة شروط من خلال اختيار Custom ثم وضع معادلة لجمع الشروط المطلوبة ..

المشكلة فقط في هذه الطريقة هي عدم القدرة على التحكم في شكل الدائرة ، وأعتقد أنها لا تظهر في الطباعة (لم أجرب في الواقع)

تقبل وافر تقديري واحترامي

 

3 دقائق مضت, ياسر خليل أبو البراء said:

بارك الله فيك أخي الغالي الزباري على الموضوع الجميل

يمكن تجميع مجموعة شروط من خلال اختيار Custom ثم وضع معادلة لجمع الشروط المطلوبة ..

المشكلة فقط في هذه الطريقة هي عدم القدرة على التحكم في شكل الدائرة ، وأعتقد أنها لا تظهر في الطباعة (لم أجرب في الواقع)

تقبل وافر تقديري واحترامي

اخي ياسر صياج الخير والورد والياسمين

اعتقد انه هناك طريقة ما للتحكم بحجم هذه الدوائر لجعلها ضمن حدود الخلية Parent  (فقد مررت على فيديو بهذا الشأن  - لا اذكر العنوان)

ما بموضوع الطباعة اعتقد ان هناك خيارات لطباعتها او لا

[الزباري]

صباح الخير جميعاً..

بارك الله فيك أخي ياسر على ملاحظة الطباعة.. في الحقيقة جربت أن أطبعها فلم تظهر في الطباعة.. وجاري البحث عن الحل، وأتمنى من أخي سليم أن يوافينا بالجديد.

وتقبلوا تحياتي