عدم انتخاب شیت

[art1364]

با سلام
من در هر شیت یک کلیدی قرار دادم که میتواند بین شیت ها جابجا شد . حال می خواهم کدی باشد که فرد تنها با انتخاب این کلید ها بتواند بین شیت ها جابجا شود و نتوان در پایین اکسل با کلیک روی شیت مورد نظر به آن شیت دسترسی پیدا کن. به عبارت دیگر انتخاب شیت ها قفل شود و کاربر فقط با آن کلیدهای تعریف شده بین شیت ها جابجا شود
ممنون

اخطار: این یک موضوع قدیمی است به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

[amir_ts]

با سلام
اگر مشکلی ندارید sheet tab رو مخفی کنید.

Sub hideSheetTabBar()
ActiveWindow.DisplayWorkbookTabs = False
End Sub

[art1364]

سلام
نه میخوام تعداد شیتهام معلوم باشه که چند تا شیت دارم و
با Un hide کردن می شود دوباره شیت نشان داده شود

[amir_ts]

البته شما میخواهید شیت ها نمایش داده بشه و الا با تغییر خاصیت شیت و گذاشتنم رمز امکان نمایش اون رو محدود میشه کرد.