محتاج كود حماية ورقة عمل

[الصقر الحر]

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

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

 

[طلعت محمد حسن]

السلام عليكم

شاهد الكود الموجود بالملف حيث يحدد المدى المطلوب العمل علية والباقي لا يمكن التعامل معة

صفحات الاكسل2.rar

[الصقر الحر]

اشكرك الأخ الكريم الأستاذ / طلعت

الكود الذى طرحته اخى هو تحديد مدى معين للعمل عليه

ارغب فى كود حماية ورقه العمل بالكامل  بباسورد مع  امكانية العمل على الخلايا الغير غير مؤمنه وعدم وقوف المؤشر فى الخلايا المؤمنه

تم تعديل ديسمبر 10, 2016 بواسطه الصقر الحر

[الصقر الحر]

الحمد لله توصلت للكود أشكركم ولتعم الفائده الكود

ActiveSheet.Protect Password:="123", DrawingObjects:=True, Contents:=True, Scenarios:=True
ActiveSheet.EnableSelection = xlUnlockedCells