خواندن نام یک شیت از یک سلول

[pedram_ns]

سلام دوستان
من چند شیت دارم که هر کدوم رو با یک عدد نام گذاری کردم مثلا کد 102

حالا در یک شیت دیگه این کد رو در یک سلول دارم و میخوام با استفاده از سلولی که این کد درونش هست یک مقدار رو از شیت 102 بخونم

در حالت عادی برای اینکه مقدار سلول A1 در شیت 102 رو بخونم باید اینطوری بنویسم

[undefined=undefined]='102'!A1[/undefined]

ولی چیکار کنم که این مقدار نام شیت رو از یک سلول در همون شیت بخونه؟

با تشکر

[alieddy0]

RE: خواندن نام یک شیت از یک سلول

اگه میشه فایلتون رو ضمیمه کنید تا روشن تر بشه

[s.cheraghi]

RE: خواندن نام یک شیت از یک سلول

سلام
از دستور زیر استفاده کنید:

Sheet1.Range("b1") = Worksheets(Sheet1.Range("A1").Text).Cells(1, 1).Text 

سلولی که قرار است این مقدار در آنجا ذخیره شود در قسمت b1 تعیین کنید و سلولی که نام شیت را را دربر دارد در قسمت A1 قرار دهید.
در نهایت آدرس سلولی که قرار است اطلاعات از آنجا خوانده شود در قسمت Cells تعیین کنید.

[MEYTI]

RE: خواندن نام یک شیت از یک سلول

با سلام دوست عزیز از فرمول زیر میتونی استفاده کنی

=INDIRECT(A1&"!"&"A1") 

این فرمولو در سلول B1 شیت اصلی مینویسی با توجه به اینکه نام شیت در سلول A1 قرار دارد.