حماية ورقة مخفية من تعديل اسمها

[أنس دروبي]

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

أخواني أنتم املي في هذه الحياة عندما أواجه المشاكل

المطلوب والشرح في الملف المرفق

والسلام

أخوكم انس دروبي

حماية ورقة مخفية من تعديل أسمها.rar

[الحسامي]

السلام عليكم

اخي الكريم يبدو ان هناك حماية واقفال للملف وهذا النوع من الحماية يمنعك من تعديل اسم الصفحة او حتى اخفاها

في اكسل2007 من قائمة Review اختار Protect Workbook وقم بالغاء تحديد الخيار الاول

او استخدم الكود التالي لفك الحماية

ActiveWorkbook.Unprotect

[أنس دروبي]

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

أخي عماد الحسامي هذا شرف لي في مشاركتك

ولكن القصد أن الحماية تظل موجودة وهي حماية المصنف

يعني عند الضغط على أيقونة اﻹنتقال الى ورقة2 أن يظهر الورقة وتظل حماية المصنف على الورقة موجودة

لو سمحت اريد تفصيل حول هذا الموضوع

وكل عام أنت والعائلة الكريمة بالف خير

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

أخوكم أنس دروبي

[الحسامي]

السلام عليكم

اخي انس .......

اذا كان المطلوب هو تفعيل الاكواد وعند انهاء الكود عمله يتم وضع الحماية فالامر بسيط

فالمبدأ هنا ببساطة ينص هلى تسلسل الكود على ثلاثة مراحل :

فك الحماية .... الكود المطلوب تنفيذه ..... وضع الحماية

وهذا ينطبق على جميع الاكواد ومرفق الملف

وكل عام وانت وجميع المسلمين بخير

حماية ورقة مخفية من تعديل أسمها.rar

[basem said]

استاذ الحسامى

اضافة اخرى ليس الا بعد اذن حضرتك

الكود منقول وللاسف لم اعرف صاحبه

هذا الكود لا يستطيع الوصل الى الصفحات المخفية الا انت

على وعسى ينفع السائل

اخفاء.rar

تم تعديل نوفمبر 4, 2011 بواسطه باسم سعيد

[Akram Galal]

أستاذ باسم سعيد

أريد أخفاء ورقة واحدة

وليس كل الأوراق

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

[ضاحي الغريب]

الاخ أكرم جلال

لاخفاء ورقة واحدة مثلا الورقة 2

Sub hide_full()

ورقة2.Visible = xlSheetVeryHidden

End Sub

ولا ظهارها استخدم الكود

Sub show_sheets()

ورقة2.Visible = True

End Sub

اظهار_اخفاء.rar

[Akram Galal]

جزاك الله كل الخير يا أخي ضاحي

هذا هو المطلوب بالفعل

والف شكر