unhide کردن شیت های اکسل به صورت همزمان

[tahamtan]

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

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

[Amir Ghasemiyan]

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

سلام دوست عزيز
با اين كد vba ميتونين هر چند تا شيت كه خواستين unhide كنيد.

Sub unhideing()
For Each sh In Sheets(Array("Sheet1", "sheet2", "sheet3"))
    sh.Visible = True
Next
End Sub

اگه بخواين همه شيت ها رو با هم unhide كنيد از اين كد ميتونين استفاده كنيد

Sub unhideing()
For Each sh In Worksheets
    sh.Visible = True
Next
End Sub

[tahamtan]

ببخشید این کدهای vba در کدوم قسمت اکسل باید وارد کنم؟ من تا الان کد نویسی در اکسل انجام ندادم.ممنون میشم در این مورد هم راهنماییم کنید

[Amir Ghasemiyan]

ببخشید این کدهای vba در کدوم قسمت اکسل باید وارد کنم؟ من تا الان کد نویسی در اکسل انجام ندادم.ممنون میشم در این مورد هم راهنماییم کنید

كليدهاي تركيبي Alt+F11 رو بزنيد. وارد محيط vba ميشيد.(visual basic)
از تب insert گزينه module رو انتخاب كنيد. در قسمت سفيد رنگ كدهايي كه خدمتتون دادم وارد كنيد

[tahamtan]

دوست عزیز من alt+f11 میزنم وارد فضایی که شما میگی نمیشه. آیا باید تنظیمات خاصی انجام بدم قبلش؟

[~M*E*H*D*I~]

دوست عزیز من alt+f11 میزنم وارد فضایی که شما میگی نمیشه. آیا باید تنظیمات خاصی انجام بدم قبلش؟

دوست عزیز کجا alt+f11 میزنید؟

[Ali Parsaei]

دوست عزیز من alt+f11 میزنم وارد فضایی که شما میگی نمیشه. آیا باید تنظیمات خاصی انجام بدم قبلش؟

روي نام شيت ها رايت کليک کنيد و VIEW CODE را بزنيد اگر باز هم پنجره اي باز نشد احتمالا" اکسل شما کامل نصب نشده و بايد cd آفيس را گذاشته و قسمتهاي ناقص را نصب کنيد.

[tahamtan]

دوست عزیز کجا alt+f11 میزنید؟

شیت باز میکنم. توی شیت اینکار انجام میدم. روی شیت راست کلیک کردم گزینه

view code فعال نبود! احتمالاً ناقص نصب شده

[Amir Ghasemiyan]

شیت باز میکنم. توی شیت اینکار انجام میدم. روی شیت راست کلیک کردم گزینه

view code فعال نبود! احتمالاً ناقص نصب شده

بله ناقص نصب كردين
همون روشي كه جناب پارسا فرمودن رو بايد عمل كنيد. خوشبختانه نياز نيست آفيستون رو پاك كنيد. فقط كافيه موارد ناقص رو بهش اضافه كنيد

[~M*E*H*D*I~]

شیت باز میکنم. توی شیت اینکار انجام میدم. روی شیت راست کلیک کردم گزینه

view code فعال نبود! احتمالاً ناقص نصب شده

اگر از 2007 استفاده میکنید باید از مسیر file/option/general (اگر اشتباه نکنم) گزینه developer رو تیک بزنید ، و اگر از ورژن های بالاتر استفاده میکنید از customize Ribbon این تب رو فعال کنید و از طریق ابزار visual basic وارد vba editor بشید در غیر اینصورت باید مجدد نصب کنید