كود منع تظليل الخلايا

[هشام جمال الدين]

السلام عليكم أساتذتى الكرام أرجو التعطف على مساعدتى فى ايجاد كود منع تظليل الخلايا ... ولكم جزيل الشكر

Book1.xlsm

[Ali Mohamed Ali]

وعليكم السلام-جرب هذا الكود

Private Sub Worksheet_Activate()
    With Cells.Interior
        .Pattern = xlSolid
        .PatternColorIndex = xlAutomatic
        .Color = RGB(0, 192, 192)
        .TintAndShade = 0
        .PatternTintAndShade = 0
    End With
End Sub

Book2.xlsm

[هشام جمال الدين]

عفوا اخى الفاضل 

Ali Mohamed Ali

الكود لايعمل جيداا

اريد الكود يعمل تلقائى عند فتح الملف

تم تعديل مايو 25, 2021 بواسطه هشام جمال الدين