วิธียกเลิกการซ่อนแผ่นงาน 'ซ่อนมาก'

ฉันสับสนในการตั้งค่าแผ่นงานและจัดการบางอย่างเพื่อทำให้แผ่น 'ซ่อนอยู่มาก' แต่ฉันไม่สามารถมองเห็นได้อีก ฉันจะทำให้มองเห็นได้อย่างไร

ฉันใช้ Excel 2010

ทางเลือกหนึ่งคือทำกับ VBA

ลองด้านล่าง:

Sub UnHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = True
Next
End Sub

สิ่งนี้จะปรากฏขึ้น ทั้งหมด แผ่นงานที่ถูกซ่อนหรือซ่อนอยู่มาก

คุณทำเช่นนี้:

1. เปิดเครื่องมือแก้ไข VBA ( Alt + F11 )
2. เปิด VBAProject ที่สอดคล้องกับไฟล์ของคุณ
3. เปิดโฟลเดอร์ "Microsoft Excel-objects"
4. เลือกแผ่นงานที่คุณซ่อนไว้
5. ไปที่คุณสมบัติ (กด F4 )
6. เปลี่ยนคุณสมบัติ "Visible" เป็น xlSheetVisible แทน xlSheetVeryHidden

ในเครื่องมือแก้ไข VBA ไปที่คุณสมบัติแผ่นงานและเปลี่ยนคุณสมบัติด้านล่าง

หากต้องการซ่อนไว้ แต่มองเห็นได้ในเมนูตัวเลือก (ยกเลิกการซ่อน .. ) ให้ใช้รหัสเดียวกัน แต่ใช้ ..

Sub StillHide()
Dim ws As Worksheet
For Each ws In Sheets
    ws.Visible = xlSheetHidden  <-- change from Visible to this.
Next
End Sub

ด้วยวิธีนี้แท็บไม่ได้แสดงให้ผู้ใช้เห็นในทันใด พวกเขายังคง "ซ่อน"