عرض جميع أوراق العمل المخفية باسرع طريقة وبنقرة واحدة اكسيل
اهلا بكم من جديد متابعى موقع عالم الاوفيس
نبدا اليوم باذن الله فى بدء سلسلة جديدة من شروحات اكسل vba
يمكن أن يؤدي استخدام وحدات ماكرو Excel الى تسريع العمل وتوفير الوقت والمجهود .
ونستعرض اليوم كود مهم جدا فى مجموعة الاكواد التى سنتناولها فى هذة السلسلة التعليمية
الكود الاول
1- عرض جميع أوراق العمل المخفية
من خلال هذا الكود
Sub UnhideAllWoksheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Visible = xlSheetVisible
Next ws
End Sub
ناتى الى شرح الكود اعلاه
استخدمنا فى الكود البرمجى أعلاه حلقة التكرارية VBA (For each)
لتصفح كل أوراق العمل في المصنف. ثم يغير الخاصية الغير مرئية لورقة العمل إلى مرئية.
اذا اعجبك الدرس لاتبخل علينا بمشاركتة عبر وسائل التواصل الاجتماعى