[حل شده] ادامه سوالی که در قسمت اکسل پرسیدم

[saeed bagheri]

عدم حذف و تغییر نام شیت های مشخص

سلام
چطور می توان کاری کرد که نتوان بعضی از شیت ها(نه همشون) را نه حذف کرد و نه تغییر نام داد(در مورد عدم تغییر نام به نتیجه رسیدم اما درمورد جلوگیری از حذف شیت به نتیجه نرسیدم البته فایل ضمیمه باز نشد میشه درمورد عدم حذف یک یا چند شیت کدهارو بنویسین همراه با فایل ضمیمه ممنون میشم)
با تشکر

از کد زیر نتیجه نگرفتم

Private Sub Worksheet_Activate()
ThisWorkbook.Protect "yourpassword"
End Sub

Private Sub Worksheet_Deactivate()
ThisWorkbook.Unprotect "yourpassword"
End Sub

این کد برای جلوگیری ازحذف شیت در پروژه های ساده خوبه اما من میخام تو پروژه ای استفاده کنم که هر شیتی رو که خواستم دلیت نشه ، اما اگر اون شیت اکتیو بود (فایل اکسل یه شیت اکتیو داشت)برنامه بتونه یه شیت دیگه اضافه کنه(درصورتی که کنترل پاک کردن شیت غیر فعاله کنترل اضافه کردن شیت فعال باشه)فقط دکمه Delet شیت غیر فعال باشه یا کدی باشه که فقط مانع از پاک شدن شیت بشه
ممنون

درمود این مطلب هم اگه میشه بیشتر توضیح بدین

در موارد دیگه باید کنترل ها رو مخفی کرد مثل پنجره pop out برای شیت (ply) که البته فکر میکنم برای همه شیت ها رو مخفی میکنه !
راه دیگه ای پیدا کردید لطفا اطلاع بدید...!
با سپاس