نام سل بر اساس نام شیت

[علی فاطمی]

با سلام ،
آیا این امکان وجود دارد که نام یک شیت را به سل اختصاص داد و یا بالعکس به گونه ایی که اگر هر تغییری بر روی سل یا نام شیت ایجاد شد بر دیگری نیز تاثیر بگذارد.

Sheets("sheet1").name=Range("A1")
Range("A1")= Sheets("sheet1").name

در حالتهای فوق این کار صورت می گیرد ولی اگر بطور اتفاقی کاربر نام sheet1 را بدلخواه تغییر دهد قطعا ارور میدهند.
حال با توجه به توضیحات فوق آیا کد جنرالی وجود دارد که با تغییر نام شیت اروری داده نشود و کد اجرا گردد؟

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

[Javid Mokhtari]

با سلام.
خب برای راحتی کار به جای نام شیت، Index شیت را قرار دهید تا با تغییر نام شیت اروری دریافت ننمائید.

[amin.t]

با سلام.
خب برای راحتی کار به جای نام شیت، Index شیت را قرار دهید تا با تغییر نام شیت اروری دریافت ننمائید.

سلام میشه بیشتر توضیح بدید و یا فایل آپ کنید
باتشکر

[amin.t]

با سلام.
خب برای راحتی کار به جای نام شیت، Index شیت را قرار دهید تا با تغییر نام شیت اروری دریافت ننمائید.

سلام آیا منظورتون اینه که تو فایل انجام دادم
me.xlsm
راستی راهی وجود داره که برای تغییر نام شیتها باتون که به نام شیته رو در هر شیت کپی کنیم و با زدن اون نام همون شیتی که درونشه به نام سل a1 کنه
آخه با فرمولی که من داخلش نوشتم با زدن دکمه شیت نام sheet1 فقط تغییر می کنه .

[علی فاطمی]

با سلام.
خب برای راحتی کار به جای نام شیت، Index شیت را قرار دهید تا با تغییر نام شیت اروری دریافت ننمائید.

با سلام ، اتفاقا می خواستم توی پست اول بگم که کاربر ممکنه بخواد شیت رو کپی کنه یعنی عملا Index هم تغییر میکنه......

[Javid Mokhtari]

با سلام.
در فرم زیر در هر شیتی می توانید موارد تغییر نام شیت را به سلولی دلخواه ارجاع دهید و بالعکس.

[amin.t]

با سلام.
در فرم زیر در هر شیتی می توانید موارد تغییر نام شیت را به سلولی دلخواه ارجاع دهید و بالعکس.

سلام دوست عزیز
کاری که ارائه دادید بسیار عالی بود .
ولی میشه همون فایلی که من ارائه دادم رو براب دوتا باتون داخل فایل کاری کرد که در هر شیتی که کپی می شه تغییرات نام رو روی همون شیت انجام بده؟