كلمة سر لشيت اكسيل ارجوا المساعدة

[ucppharma]

ارجوا من الاخوة الخبراء المساعدة حيث اريد ان اقوم بعمل برنامج بالاكسل واريد ان اجعل بعض الصفحات كلمة سر والباقى مفتوح

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

[أيسم إبراهيم]

السلام عليكم

ما نوع الحماية التي تريدها للصفحات؟؟؟؟؟؟؟؟

هل تريد منع المستخدم من التعديل على الصفحة لكنه يراها؟؟

من قائمة أدوات .... حماية .... حماية ورقة العمل .... ممكن تضع كلمة مرور

Tools >> Protection >> Protect Sheet

أم تريد منع المستخدم من رؤية ورقة العمل و عدم الدخول عليها إلا بإدخال كلمة المرور؟؟؟

تفضل الملف المرفق به كود وأزرار انقلها إلى ملفك

دمت بخير

أيسم إبراهيم

حماية ورقة عمل بكلمة مرور2.rar

[ucppharma]

اخى العزيز ايسم بارك الله فيك وجزاك الله خير الجزاء على نفعك بعلمك

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

[علي فاهم]

استاذ ايسم

الى الامام دائما

[أيسم إبراهيم]

السلام عليكم

الأخ الكريم

يوجد كود في حدث الملف الرئيسي يقوم بإخفاء الأوراق عند القيام بفتح الملف

أما إذا أردت أن تخفي الورقة بعد أن تظهرها دون الخروج من الملف

قم برسم زر في الصفحة التي تريد إخفاءها واكتب له هذا الكود

Sub ورقة1_Button1_Click()

Worksheets("ورقة1").Visible = xlSheetVeryHidden

End Sub

تم تعديل فبراير 8, 2010 بواسطه أيسم إبراهيم

[بن خليفه]

استفسار واعتقد انه بسيط

في حال أردت أن يكون الرقم الظاهر عند الضغط على الزر وكتابة الرقم السري على شكل نجوم للحماية هل يوجد تعديل على الكود ؟؟

 

[جلال الجمال_ابو أدهم]

بن خليفه

اخى الفاضل تفضل ما تريد و اكثر
من هنا