كيفية تغيير لون الخلية

[magid_o]

تحية طيبة 

 

كيف يتم تغيير لون الخلية عند الضغط على مفتاح معين مثل Enter  

هل هناك كود لعمل ذلك

 

وشكرا....

[محمود_الشريف]

أخى الكريم

 

بدايه تغيير لون الخليه الذى تتحدث عنه

هل هو مرتبط بشىء ما 

مثل عند ادخال قيمه أو خلافه فهناك تنسيق شرطى يستخدم لذلك وهذا متاح من خلال قوائم الاكسل نفسها

وممكن من خلال الأكواد

 

اما اذا كنت تقصد تغيير لون الخليه عند الوقوف عليها لإبرازها فهناك كود لذلك

فهذا كود مثلا يقوم بتغيير لون الخلية عند الوقوف عليها ولا يغير لون الخلفية الأصلى عند الانتقال منها الى خليه أخرى

والكود يوضع بحدث المصنف

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
MyColor = 32
If Not IsError(Sh.[N_Color_Rng]) Then
If Not IsError(Sh.[N_Color_Color]) Then
If Not IsError(Sh.[N_Color_Old]) Then
If Sh.[N_Color_Rng].Interior.ColorIndex = Sh.[N_Color_Old] Then
Sh.[N_Color_Rng].Interior.ColorIndex = Sh.[N_Color_Color]
End If
End If
End If
End If
Sh.Names.Add "N_Color_Rng", ActiveCell
Sh.Names.Add "N_Color_Color", ActiveCell.Interior.ColorIndex
Sh.Names.Add "N_Color_Old", MyColor
ActiveCell.Interior.ColorIndex = MyColor
End Sub

فيرجى تحديد ماذا تريد

ورفع ملف للعمل عليه

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

 

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

[magid_o]

تحية طيبة 

 

لدي حجم كبير من البيانات واحتاج اغير لون الخلية بلون معين وليكن لون اصفر 

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

والمطلوب عند الوصول للخلية والضغط على مفتاح Enter  يتم تغييرها 

هل هناك ماكرو او كود يتم استخدامه ليتم تغيير وظيفة مفتاح Enter بحيث جعله يغير اللون للغلية النشطة 

 

او اي مفتاح اخر 

 

وشكرا

BOOKI1.zip

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

أخي جرب التالي قد يفيدك

لتلوين الخلية قم بالنقر المزدوج على الخلية ولازالة اللون قم بالنقر المزدوج مرة أخرى

Double Click To Color Cell.rar

تم تعديل نوفمبر 7, 2014 بواسطه YasserKhalil

[magid_o]

شكرا لك 

 

ولكن هل من الامكان تغيير اللون بواسطة الضغط على اي مفتاح 

 

 

وشكرا