الكود لا يعمل عند حمايه الشيت

[2saad]

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

وبه مجموعة أكود ورابط كل كود بزر للتنفيذ

ولكن حماية الأوراق بيتعارض مع تنفيذ الأكود

 

هل فيه حل ؟

ولكم جزيل الشكر

 

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

يمكن أن تضع أمرين في كل كود من أكوادك، الأول في بداية الكود يقوم بإلغاء الحماية عن الورقة التي يتم تطبيق الكود عليها، والأمر الثاني في نهاية الكود يقوم بإعادة حماية الورقة بالكلمة السرية نفسها... 

[أبوأحـمـد]

فك حماية كل أوراق العمل
ThisWorkbook.unprotect "123456"

حماية كل أوراق العمل
ThisWorkbook.protect "123456"

فك حماية الورقة النشطة
ActiveSheet.unprotect Password:="123456"

 حماية الورقة النشطة
ActiveSheet.protect Password:="123456"

الأفضل تستخدم فك وحماية الورقة التي تحتاج التعامل معها.

لأن فك جميع أوراق العمل يسبب بطئ .

[2saad]

شكرا جزيلا