حماية وتثبيت ايقونات التنقل بين الصفحات

[عمار الدخخنى السعيد]

عندى برنامج وكنت طالب من أساتذى خبراء الأكسل مساعدة بسيطة فى تصميمم الوجهة الرئيسية للبرنامج  وهو تثبيت ايقونات التنقل بين الصفحات على الوجهة الرئيسية بمعنى عدم قدرة  المستخدم  بالعبث بالايقونات وتغييرها او  حذفها من على الوجهة الرئيسية للبرنامج ويقتصر استخدامه فقط  على التنقل بها الى صفحات البرنامج فقط .ارجو المساعدة فى تنفيذ هذا الطلب,مرفق ملف للاطلاع

وأسف على الاطالة. شكرا جزيلا اساتذتى خبراء الاكسل

Book1.xlsx

[Ali Mohamed Ali]

تفضل لك ما طلبت وزيادة

تم عمل كود ووضعه في حدث الصفحة لحماية الصفحة الرئيسية _ وكلمة السر 123

 Private Sub Worksheet_Activate()
Sheets("Main").Protect Password:="123", UserInterFaceOnly:=True
End Sub

 

Book1.xlsm

[عمار الدخخنى السعيد]

استاذنا الاستاذ   Ali mohamed  لك من عظبم الشكر

وجعله الله فى ميزان حسناتك

[أحمد يوسف]

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

فلابد من الضغط له على الإعجاب وذلك كما بالصورة