اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر (معدل)

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

أخي الفاضل حفظك الله

ضع هذه المعادلة في التنسيق الشرطي للخلية B2 واجعل النقش باللون الذي تريد ثم انسخ التنسيق لباقي الخلايا

=IF($B2="نعم", 1)

أبو أنس

وهذا الملف مطبق عليه الشرط

تحديد خلايا مشروط.rar

تم تعديل بواسطه أبو أنس حاجب
قام بنشر (معدل)

عذراً المقصود كيف يمكن تظليل الخلايا ذات اللون الأزرقفي العمود رقم والتي لها شرط نعم في العمودشرط بحيث يكون التحديد بكود بالأمر .Select

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

السلام عليكم

الاخ العزيز ابو انس حاجب المحترم

الاخ العزيز محمود المحترم

بارك الله في جهودكم وحلول اكثر من رائعة

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

وتقبل دعواتي لك بالموفقية والنجاح

تنسيق شرطي.rar

قام بنشر

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

بعد اذن الاخوة الكرام بارك الله بكم

الاخ أبو حكيم

اذا كان المطلوب كود لعمل Select على الخلايا ذات اللون الأزرق التي لها شرط نعم في العمودشرط

جرب الكود التالي:


Sub AL_KHALEDI()

[G2:G27].ColumnDifferences(Comparison:=[G2:G27].Cells(Application.Match("لا", [G2:G27], 0), 1)).Offset(0, -5).Select

End Sub

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

Sub AL_KHALEDI()

On Error Resume Next

Set Rn_G = [G2:G27]

For r = 1 To Rn_G.Rows.Count

If CStr(Rn_G(r)) = "نعم" Then If Rn_A Is Nothing Then Set Rn_A = Rn_G(r) Else Set Rn_A = Union(Rn_A, Rn_G(r))

Next r

Rn_A.Offset(0, -5).Select

Set Rn_G = Nothing: Set Rn_A = Nothing

End Sub

في أمان الله

قام بنشر (معدل)

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

أستاذي وسيدي الفاضل الخالدي حفظك الله وأكرم منزلك في الجنة

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

بلغكم رمضان وتقبل الله منكم ومننا صالح الأعمال

أبو أنس ناصر حاجب

تم تعديل بواسطه أبو أنس حاجب
قام بنشر

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

أستاذي وسيدي الفاضل الخالدي حفظك الله وأكرم منزلك في الجنة

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

بلغكم رمضان وتقبل الله منكم ومننا صالح الأعمال

أبو أنس ناصر حاجب

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

ولك مثل دعائك لي اخي الفاضل أبو أنس

بلغكم الله رمضان وتقبل منكم ومننا صالح الأعمال

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

الأخ خبير الاكسيل .... الخالدي .... شكراً الكود الثاني هو المطلوب وبارك الله فيك

بارك الله فيك

والحمدلله على التوفبق

  • 6 months later...
قام بنشر

السلام عليكم

الاستاذ القدير المبدع / الخالدي

 

صدق الاستاذ القدير / عبد الله المجرب في وصفه

فكم انت كبير وروائعك لا تنتهي

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

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

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information