مشكلة اختفاء الازرار مع العواميد عند الضغط عليها

[elbass]

السلام عليكم

 

عند مجموعة ازرار فى شيت مستخدمة للرصد

على الجلوس

وعلى سري 1 وسري 2

وهذه الازار موجودة اعلى العمود A & B

وكلما ضغطت على احد هذه الازرار لاخفاء العواميد تختفى الازرار  او تنضغط مع العواميد

فهل من طريقة لا تجعل الازرار تختفى عند الضغط عليها

 

وهذا هو الكود المستخدم

 

Sub رصد_على_الجلوس_الاصلى()
'
' Macro3 Macro
'
 Application.ScreenUpdating = False
ActiveSheet.Unprotect
    Columns("A:l").Select
    Selection.EntireColumn.Hidden = False
    Columns("G:U").Select
    Selection.EntireColumn.Hidden = True
    Columns("f:m").Select
    Selection.EntireColumn.Hidden = True
    Range("A14").Select
     ActiveSheet.Protect
     Application.ScreenUpdating = True
End Sub

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

 

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

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

وعليكم السلام

 

 

 

 

 

 

 

[elbass]

1 ساعه مضت, ياسر خليل أبو البراء said:

وعليكم السلام

 

 

 

 

 

 

 

شكراً على اهتمامك استاذنا الفاضل

ولكنى عامل أزرا من داخل الخلية نفسها مثل الموجودة فى الصورة

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

 

 

 

 

 

 

 

 

 

[elbass]

شكراً استاذ ياسر تم بنجاح