هل يمكن تلوين الخلية بمعادلة

[أم عبد الله]

الأساتذة الأفاضل

 

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

 

هل يمكن تلوين الخلية التي بها رقم معين بمعادلة دون تنسيق شرطي. ولكم كل التحية والتقدير.s1.rar

تم تعديل أبريل 19, 2013 بواسطه أم عبد الله

[بن علية حاجي]

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

 

أختي الكريمة أم عبد الله، لا أعتقد أن ذلك ممكنا باستعمال المعادلات فقط... يستحسن استعمال الأكواد وعلى سبيل المثال الكود التالي الذي يلون خلايا النطاق C5:N34 في ملفك (حسب الرقم في الخلية وأرقام الألوان):

Private Sub Worksheet_Change(ByVal Target As Range)
Application.ScreenUpdating = False
   For Each cel In Range("C5:N34")
      If cel.Value = "" Or cel.Value = 0 Then cel.Interior.ColorIndex = 1
      cel.Interior.ColorIndex = cel.Value + 2
   Next
Application.ScreenUpdating = True
End Sub

وقد قمت بتطبيقه في الملف المرفق التالي :  s1.rar

 

أخوك بن علية

[أم عبد الله]

أستاذنا العلّامة الكبير / بن عليه حاجي

 

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

[يوسف السيد]

خير الناس انفعهم للناس 
جزاك الله خيرا

[حمادة عمر]

السلام عليكم

الاخت الفاضلة / أم عبد الله

 

بارك الله فيكي

كما اخبرك استاذنا القدير / بن علية حاجي

بانه لا أعتقد أن ذلك ممكنا باستعمال المعادلات فقط .... فعلا

حيث انكي تريدين التلوين ... مع عدم استخدام التنسيق الشرطي

فاظن ان ذلك لا يمكن مع المعادلات الا بالتنسيق الشرطي ... او الاكواد كما تفضل استاذنا القدير / بن عليه ... جزاه الله خيرا

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

[أم عبد الله]

أستاذنا الفاضل / حمادة عمر

 

ألف مليون شكر لمرور حضرتك بالموضوع وتفضل أستاذنا الكبير / بن عليه حاجي بارسال الكود الخاص بالتلوين. جزاكم الله خيراً . لكم كل التحية والتقدير.

[ahmedgenedy]

كيف يتم ربط الارقام باللون بمعنى لو الفارق اتنين سيكون اللون اصفر ولو اكثر من ذلك سيكون احمر

[الـمـاتادور]

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