ماکروی روز – روز دوم: Unhide کردن تمام شیت ها

Unhide کردن شیت ها در اکسل .

 

ماکروی اکسل

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

برای دسترسی به این مطلب می توانید از لینک زیر بهره ببرید .

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

اما امروز و در سلسله مطالب مربوط به ماکروی روز به بررسی ماکرویی می پردازیم که با استفاده از آن می توانیم به Unhide کردن شیت ها در اکسل بپردازیم .

برای Unhide کردن شیت ها در اکسل و خارج نمودن آنها از حالت مخفی می توانید از کدهای زیر بهره ببرید :

Sub UnhideWoksheets()
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
ws.Visible = xlSheetVisible
Next ws
End Sub

اکنون با اجرای این کدها از طریق انتساب آنها به یک دکمه به راحتی می توانید کارایی این کدها را در Unhide کردن شیت ها در اکسل مشاهده نمایید  .

 در روز های بعدی نیز با سایت softpluse  همراه باشید تا با ماکروهای کاربردی بیشتری آشنا شوید . 

آموزش اکسل 2016,دسته‌بندی نشده,یک ترفند بازدید : 23 views ۱۱ بهمن, ۱۳۹۷ ۰