چطور شیت های مخفی در اکسل را نمایش دهیم ؟
سلام به سافت پلاس خوش آمدید . امروز در ادامه آموزش های مربوط به برنامه نویسی VBA در محیط اکسل می خواهیم با هم کدهایی را بنویسیم که با استفاده از آنها تمامی شیت های موجود در اکسل را که به حالت مخفی هستند از حالت مخفی دربیاوریم .
مخفی کردن شیت های کاری در اکسل یکی از کارهایی است که ممکن است بنا بر هر دلیل به آن احتیاج پیدا کنیم .
در مطلب آموزشی قبلی مربوط به ماکروی روز به بررسی ماکرویی پرداختیم که با استفاده از آن توانستیم تمامی شیت های کاری موجود در نرم افزار اکسل را بغیر از شیت جاری آن از دید کاربر مخفی نماییم.
برای دسترسی به این مطلب می توانید از لینک زیر بهره ببرید .
ماکروی روز -روز اول : مخفی نمودن تمام ماکروها
اما امروز و در سلسله مطالب مربوط به ماکروی روز به بررسی ماکرویی می پردازیم که با استفاده از آن می توانیم به خارج کردن شیت ها از حالت مخفی یا Unhide کردن شیت ها در اکسل بپردازیم .
در واقع کاری که امروز می خواهیم انجام دهیم دقیقا برعکس کاری است که در ماکروی قبل انجام دادیم
یعنی ماکروی قبلی یک شیت را برای ما مخفی می کرد اما این ماکرو آن را از حالت مخفی در می آورد .
Unhide کردن شیت ها در اکسل و روش آن
همانطور که مخفی کردن شیت های کاری در محیط کاری اکسل از روش های مختلفی امکان پذیر است بر عکس همین قضیه هم وجود دارد .
یعنی برای خارج کردن Unhide کردن شیت ها در اکسل هم راهکارهای مختلفی وجود دارد .
یکی از این روش ها استفاده از کدها و برنامه نویسی وی بی ای است برای این منظور می توانیم از کدهایی مانند کدهای زیر استفاده کنیم :
Sub UnhideWoksheets()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Visible = xlSheetVisible
Next ws
End Sub
اکنون با اجرای این کدها از طریق انتساب آنها به یک دکمه به راحتی می توانید کارایی این کدها را در خارج نمودن کردن شیت ها از حالت مخفی در اکسل مشاهده نمایید .
امیدوارم از این ماکرو استفاده لازم را ببرید .
در روز های بعدی نیز با سایت softpluse همراه باشید تا با ماکروهای کاربردی بیشتری آشنا شوید.
خوشحال می شوم که هر گونه نظر و پیشنهادی در خصوص این مطلب و سایر مطالب این سایت را در قسمت دیدگاهها درج نمایید.
دیدگاهتان را بنویسید