نمایش شیت خاص در زمان بازشدن فایل اکسل

**mokaram** · 2014/10/08, 09:33

شما این کار را می تونید از طریق vba انجام بدید ( البته راهی که به نظرم میرسه )
(اگه آشنایی به vba ندارید بفرمایید تا جزئی تر توضیح بدم )

کد زیر را وارد کنید و با فرمت 2003 یا xlsm سیو کنید

کد PHP:


Private Sub Workbook_Open()
Sheet2.Activate
End Sub

**mehdies** · 2014/10/08, 09:51

ممنون می شم اگه جزئی تر توضیح بدین

**mokaram** · 2014/10/08, 10:13

شما با فشردن Alt + F11 به محیط vba وارد می شید ستون سمت چپ آیتمی تحت عنوان This Workbooks مشاهده میشه روی اون دابل کلیک می کنید تا صفحه زیر نمایان بشه

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

کد PHP:


Private Sub Workbook_Open()

End Sub

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

کد PHP:


Private Sub Workbook_Open()
Sheet2.Activate
End Sub

**mehdies** · 2014/10/08, 11:05

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

**mokaram** · 2014/10/08, 12:11

روی هر سیستم یکبار برای همیشه شما ماکرو را فعال کن بعد هر موقع که فایل را باز می کنی دیگه احتیاج به فعال کردن نداره
Excel Option-->Trust Center -->Trust Center Settings --> macro Settings --> Enable All Macros

**mehdies** · 2014/10/08, 13:53

ممنون می شم فایل پیوستی رو یه نگاه بیندازین و راهنمایی بفرمایید

فایل های پیوست شده

test.xlsm (53.3 کیلو بایت, مشاهدات 31)

**mokaram** · 2014/10/08, 14:28

فایل شما مشکلی نداره

**mehdies** · 2014/10/08, 15:36

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

**mehdies** · 2014/10/09, 11:32

سلام چی شده به نتیجه ای رسیدید

**eleman** · 2015/01/22, 11:09

نوشته اصلی توسط M_R_M

شما با فشردن Alt + F11 به محیط vba وارد می شید ستون سمت چپ آیتمی تحت عنوان This Workbooks مشاهده میشه روی اون دابل کلیک می کنید تا صفحه زیر نمایان بشه

[ATTACH=CONFIG]4808[/ATTACH]

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

کد PHP:


Private Sub Workbook_Open()

End Sub

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

کد PHP:


Private Sub Workbook_Open()
Sheet2.Activate
End Sub

سلام و تشکر
من هم همچین مشکلی داشتم که این کارو انجام دادم، اما هر بار که فایل باز میشه پیغام خطای زیر میاد مبنی بر runtime error و باید دکمه debug رو بزنی تا فایل باز شه.

میشه برای رفع مشکل و انجام صحیح این کار راهنمایی کنید.
ممنونم