هل من طريقة لتغيير كلمة سر فتح الملف، من داخل الشيت وليس بالطريقة الحالية

[شكيب عمار]

هل من طريقة لتغيير كلمة سر فتح الملف، من داخل الشيت نفسه وليس بالطريقة الحالية الكلاسيكية.

[الجموعي]

ارفق الملف اخي

[عبد الله بولنوار]

من قيمة خلية تقصد

 

ام من الكود

[شكيب عمار]

شكرا لكم اخوتي الأفاضل على اهتمامكم

 

قصدي أجعل صفحة معينة في الشيت، اخصص فيها خانة لحفظ وتعديل رقم السر،

ويرجى الإبتعاد عن الأكواد قدر المستطاع، إلا في الضرورة فم باليد حيلة

تم تعديل يناير 24, 2015 بواسطه شكيب عمار

[عبد الله بولنوار]

ضع هذا الكود في حدث اي ورقة تريد

 

تكون كلمة الجماية في الخلية

 

a1

 

 

ثم اربطع بزر لتنفيذ الحماية

Private Sub Protect()
ActiveSheet.Protect ([a1])
End Sub

تم تعديل يناير 24, 2015 بواسطه عبد الله بولنوار

[شكيب عمار]

هل هذا يحمي الصفحة فقط أم الملف كاملا، أرجو وضع ملف مرفق بسيط توضيحي، الله يرحم والديك