البحث في الموقع
Showing results for tags 'نسخ و لصق نطاق لنفس الشيت مع حماية الورقة'.
تم العثور علي 1 نتيجه
-
تم رفع هذا الكود فى مشاركة منفصله حتى لا ننسى هذه المشاركة تم ارفاق كود الحل من الفاضل _ ا / ابو اسامة العينبوسي Sub_copyprotect() ActiveSheet.Unprotect ActiveSheet.Range("e4:f503").Value = ActiveSheet.Range("b4:c503").Value ActiveSheet.Protect End Sub و عن طريق تسمية نطاق Sub_copyprotect() ActiveSheet.Unprotect ActiveSheet.Range("omar2").Value = ActiveSheet.Range("omar").Value ActiveSheet.Protect End Sub مرفق الملف 6564.rar و لا تنسونا من صالح الدعاء تحياتى