أخي أيمن 123 كما تفضل الأخ lion2014 مشكور بتوضيح طريقة الحماية من خلال القوائم
أما بالنسبة للحماية من خلال كود فإليك الكود الخاص بالحماية
ActiveSheet.protect Password:=12
حيث أن 12 هو الرقم السري ويمكن تغيره ويمكن وضعه داخل ماكرو أو داخل الحدقث الخاص بالملف أو بورقة العمل كيفما تشاء وهذا الكود في أبسط صوره
وبالحماية يمنع إدراج صفوف وأعمدة وأشياء كثيرة
ويمكن كتابة الكود بهذة الصورة للحماية والتأكيد على عدم إدراج صفوف
ActiveSheet.Protect Password:=12
ActiveSheet.Protect AllowInsertingRows:=False
وكود فك الحماية هو
ActiveSheet.Unprotect Password:=12
عذرا لآنني لا أتمكن من إرفاق ملف للتوضيح الآن