บทช่วยสอนอธิบายวิธียกเลิกการซ่อนแผ่นงานใน Excel 2016, 2013, 2010 และต่ำกว่า คุณจะได้เรียนรู้วิธีเลิกซ่อนแผ่นงานอย่างรวดเร็วด้วยการคลิกขวา และวิธีเลิกซ่อนแผ่นงานทั้งหมดพร้อมกันด้วยโค้ด VBA

ลองนึกภาพตามนี้: คุณเปิดแผ่นงานแล้วสังเกตว่าสูตรบางสูตรอ้างอิงถึงแผ่นงานอื่น . คุณดูที่แท็บแผ่นงาน แต่ไม่มีสเปรดชีตอ้างอิง! คุณพยายามสร้างแผ่นงานใหม่ที่มีชื่อเดียวกัน แต่ Excel บอกคุณว่ามีอยู่แล้ว ทั้งหมดนี้หมายความว่าอย่างไร? เพียงแค่แผ่นงานถูกซ่อนไว้ วิธีดูแผ่นงานที่ซ่อนอยู่ใน Excel? แน่นอนคุณต้องยกเลิกการซ่อน สามารถทำได้ด้วยตนเองโดยใช้คำสั่ง เลิกซ่อน ของ Excel หรือโดยอัตโนมัติด้วย VBA บทช่วยสอนนี้จะสอนคุณทั้งสองวิธี

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

หากคุณต้องการดูแผ่นงานที่ซ่อนอยู่เพียงหนึ่งหรือสองแผ่น ต่อไปนี้คือวิธียกเลิกการซ่อนอย่างรวดเร็ว พวกเขา:

1. ในสมุดงาน Excel ของคุณ คลิกขวาที่แท็บแผ่นงานใดก็ได้ และเลือก เลิกซ่อน ... จากเมนูบริบท
2. ใน เลิกซ่อน กล่องเลือกแผ่นงานที่ซ่อนอยู่ที่คุณต้องการแสดงและคลิก ตกลง (หรือดับเบิลคลิกที่ชื่อแผ่นงาน) เสร็จแล้ว!

นอกจากเมนูตามบริบทคลิกขวาแล้ว ยังสามารถเข้าถึงกล่องโต้ตอบ เลิกซ่อน ได้จากริบบิ้น:

• ใน Excel 2003 และรุ่นก่อนหน้า คลิกเมนู รูปแบบ แล้วคลิก แผ่นงาน > เลิกซ่อน
• ใน Excel 2016 Excel 2013, Excel 2010 และ Excel2007 ไปที่แท็บ หน้าแรก > เซลล์ กลุ่ม แล้วคลิก รูปแบบ ภายใต้ การมองเห็น ชี้ไปที่ ซ่อน & ; เลิกซ่อน แล้วคลิก เลิกซ่อนแผ่นงาน …

หมายเหตุ ตัวเลือก เลิกซ่อน ของ Excel ให้คุณเลือกได้ทีละแผ่นเท่านั้น หากต้องการยกเลิกการซ่อนหลายแผ่น คุณจะต้องทำซ้ำขั้นตอนข้างต้นสำหรับแต่ละแผ่นงานทีละแผ่น หรือคุณสามารถยกเลิกการซ่อนแผ่นงานทั้งหมดในคราวเดียวโดยใช้มาโครด้านล่าง

วิธีเลิกซ่อนแผ่นงานใน Excel ด้วย VBA

ในสถานการณ์ที่คุณมีแผ่นงานที่ซ่อนอยู่หลายแผ่น การเลิกซ่อนแผ่นงานทีละแผ่นอาจใช้เวลานาน โดยเฉพาะถ้าคุณต้องการเลิกซ่อนแผ่นงานทั้งหมด ในสมุดงานของคุณ โชคดีที่คุณสามารถทำให้กระบวนการเป็นแบบอัตโนมัติด้วยมาโครตัวใดตัวหนึ่งต่อไปนี้

วิธียกเลิกการซ่อนแผ่นงานทั้งหมดใน Excel

มาโครขนาดเล็กนี้ทำให้แผ่นงานทั้งหมดที่ซ่อนอยู่ในสมุดงานที่ใช้งานอยู่มองเห็นได้พร้อมกันโดยไม่รบกวน ด้วยการแจ้งเตือนใด ๆ

Sub Unhide_All_Sheets() Dim wks As Worksheet For Each wks In ActiveWorkbook.Worksheets wks.Visible = xlSheetVisible สัปดาห์ถัดไป End Sub

แสดงแผ่นงานที่ซ่อนอยู่ทั้งหมดและแสดงจำนวน

ถูกใจ มาโครนี้จะแสดงแผ่นงานที่ซ่อนอยู่ทั้งหมดในสมุดงาน ข้อแตกต่างคือเมื่อเสร็จสิ้น จะแสดงกล่องโต้ตอบที่แจ้งผู้ใช้ว่ามีกี่แผ่นที่ไม่ได้ซ่อน:

Sub Unhide_All_Sheets_Count() Dim wks As Worksheet Dim count As Integer count = 0สำหรับแต่ละ wks ใน ActiveWorkbook.Worksheets ถ้า wks.Visible xlSheetVisible จากนั้น wks.Visible = xlSheetVisible count = count + 1 End If Next wks ถ้า count > 0 จากนั้น MsgBox จะนับ & "ยกเลิกการซ่อนแผ่นงานแล้ว" , vbOKOnly, "ยกเลิกการซ่อนแผ่นงาน" Else MsgBox "ไม่พบแผ่นงานที่ซ่อนอยู่" , vbOKOnly, "Unhiding worksheets" End If End Sub

เลิกซ่อนหลายแผ่นงานที่คุณเลือก

หากคุณไม่ต้องการเลิกซ่อนแผ่นงานทั้งหมดในคราวเดียว แต่เลือกเฉพาะแผ่นงานที่ผู้ใช้ยินยอมอย่างชัดเจนให้มองเห็นได้ จากนั้นให้มาโครถามเกี่ยวกับแผ่นงานแต่ละแผ่นที่ซ่อนอยู่ดังนี้:

Sub Unhide_Selected_Sheets() Dim wks As Worksheet Dim MsgResult As VbMsgBoxResult For Each wks In ActiveWorkbook.Worksheets If wks.Visible = xlSheetHidden จากนั้น MsgResult = MsgBox( "Unhide sheet " & wks.Name & "?" , vbYesNo, "Unhiding worksheets" ) ถ้า MsgResult = vbYes จากนั้น wks.Visible = xlSheetVisible End ถ้า Next End Sub

เลิกซ่อนแผ่นงานด้วย a คำเฉพาะในชื่อแผ่นงาน

ในสถานการณ์ที่คุณต้องการยกเลิกการซ่อนแผ่นงานที่มีข้อความบางอย่างในชื่อ ให้เพิ่มคำสั่ง IF ลงในมาโครที่จะตรวจสอบชื่อของแต่ละแผ่นงานที่ถูกซ่อนไว้ และเลิกซ่อนเฉพาะแผ่นงานเหล่านั้น ที่มีข้อความที่คุณระบุ

ในตัวอย่างนี้ เราเลิกซ่อนแผ่นงานด้วยคำว่า " repor t " ในชื่อ มาโครจะแสดงแผ่นงาน เช่น รายงาน , รายงาน 1 , กรกฎาคมรายงาน และอื่นๆ ในทำนองเดียวกัน

หากต้องการเลิกซ่อนเวิร์กชีตที่มีชื่ออื่นอยู่ ให้แทนที่ " รายงาน " ในโค้ดต่อไปนี้ด้วยข้อความของคุณเอง

Sub Unhide_Sheets_Contain( ) Dim wks As Worksheet Dim count As Integer count = 0 For Each wks In ActiveWorkbook.Worksheets If (wks.Visible xlSheetVisible) And (InStr(wks.Name, "report" ) > 0) จากนั้น wks.Visible = xlSheetVisible count = นับ + 1 สิ้นสุด ถ้า ถัดไป สัปดาห์ ถ้า นับ > 0 จากนั้น MsgBox จะนับ & "ยกเลิกการซ่อนแผ่นงานแล้ว" , vbOKOnly, "เลิกซ่อนเวิร์กชีต" Else MsgBox "ไม่พบเวิร์กชีตที่ซ่อนอยู่ซึ่งมีชื่อที่ระบุ" , vbOKOnly, "Unhiding worksheets" End If End Sub

วิธีใช้มาโครเพื่อยกเลิกการซ่อนแผ่นงานใน Excel

หากต้องการใช้มาโครในแผ่นงาน คุณสามารถคัดลอก/วางโค้ดใน Visual Basic แก้ไขหรือดาวน์โหลดสมุดงานด้วยมาโครและเรียกใช้จากที่นั่น

วิธีแทรกมาโครในสมุดงานของคุณ

คุณสามารถเพิ่มมาโครใดๆ ข้างต้นลงในสมุดงานด้วยวิธีนี้:

1. เปิดสมุดงานที่ซ่อนแผ่นงาน
2. กด Alt + F11 เพื่อเปิด Visual Basic Editor
3. ในบานหน้าต่างด้านซ้าย คลิกขวา ThisWorkbook และเลือก แทรก > โมดูล จากเมนูบริบท
4. วางโค้ดในหน้าต่างโค้ด
5. กด F5 เพื่อเรียกใช้ มาโคร

สำหรับคำแนะนำทีละขั้นตอนโดยละเอียด โปรดดูวิธีแทรกและเรียกใช้โค้ด VBA ในExcel

ดาวน์โหลดสมุดงานพร้อมมาโคร

หรืออีกวิธีหนึ่ง คุณสามารถดาวน์โหลดสมุดงานตัวอย่างของเราเพื่อเลิกซ่อนแผ่นงานใน Excel ที่มีมาโครทั้งหมดที่กล่าวถึงในบทช่วยสอนนี้:

• Unhide_All_Sheets - เลิกซ่อนแผ่นงานทั้งหมดในสมุดงานที่ใช้งานอยู่ชั่วขณะและเงียบ ๆ
• Unhide_All_Sheets_Count - แสดงแผ่นงานที่ซ่อนอยู่ทั้งหมดพร้อมกับจำนวน
<9 Unhide_Selected_Sheets - แสดงแผ่นงานที่ซ่อนซึ่งคุณเลือกที่จะเลิกซ่อน
• Unhide_Sheets_Contain - เลิกซ่อนแผ่นงานที่มีชื่อหรือข้อความเฉพาะ

ในการเรียกใช้มาโครใน Excel ให้ทำดังนี้:

1. เปิดสมุดงานที่ดาวน์โหลดมาและเปิดใช้งานมาโครหากได้รับแจ้ง
2. เปิดสมุดงานของคุณเองที่คุณต้องการดู แผ่นงานที่ซ่อนอยู่
3. ในสมุดงานของคุณ ให้กด Alt + F8 เลือกมาโครที่ต้องการ แล้วคลิก เรียกใช้

ตัวอย่างเช่น หากต้องการยกเลิกการซ่อนแผ่นงานทั้งหมดใน ไฟล์ Excel ของคุณและแสดงจำนวนแผ่นงานที่ซ่อนอยู่ คุณเรียกใช้มาโครนี้:

วิธีการ o แสดงแผ่นงานที่ซ่อนอยู่ใน Excel โดยสร้างมุมมองแบบกำหนดเอง

นอกเหนือจากมาโครแล้ว ความน่าเบื่อของการแสดงเวิร์กชีตที่ซ่อนอยู่ทีละรายการสามารถเอาชนะได้ด้วยการสร้างมุมมองแบบกำหนดเอง หากคุณไม่คุ้นเคยกับคุณลักษณะ Excel นี้ คุณสามารถคิดว่ามุมมองแบบกำหนดเองเป็นภาพรวมของการตั้งค่าสมุดงานของคุณ ซึ่งสามารถนำไปใช้ได้ทุกเมื่อด้วยการคลิกเมาส์ วิธีนี้เหมาะที่จะใช้ในหลายๆเริ่มต้นการทำงานของคุณ เมื่อยังไม่ได้ซ่อนแผ่นงานใดๆ เลย

ดังนั้น สิ่งที่เรากำลังจะทำในตอนนี้คือสร้างมุมมองที่กำหนดเอง แสดงแผ่นงานทั้งหมด โดยมีวิธีการดังนี้:

1. ตรวจสอบให้แน่ใจว่าสเปรดชีตทั้งหมดในสมุดงานของคุณ มองเห็นได้ เคล็ดลับนี้แสดงวิธีตรวจสอบสมุดงานอย่างรวดเร็วเพื่อหาแผ่นงานที่ซ่อนอยู่
2. ไปที่แท็บ มุมมอง กลุ่มมุมมองสมุดงาน แล้วคลิก มุมมองที่กำหนดเอง ปุ่ม

กล่องโต้ตอบ มุมมองกำหนดเอง จะปรากฏขึ้น และคุณคลิก เพิ่ม... <12

ในกล่องโต้ตอบ เพิ่มมุมมอง ให้พิมพ์ชื่อสำหรับมุมมองที่กำหนดเอง เช่น ShowAllSheets แล้วคลิก ตกลง<12

ขณะนี้คุณสามารถซ่อนเวิร์กชีตได้มากเท่าที่คุณต้องการ และเมื่อคุณต้องการทำให้มองเห็นได้อีกครั้ง ให้คลิกปุ่ม มุมมองที่กำหนดเอง เลือกปุ่ม ShowAllSheet ดูและคลิก แสดง หรือดับเบิลคลิกที่มุมมอง

แค่นั้น! แผ่นงานที่ซ่อนอยู่ทั้งหมดจะแสดงทันที

วิธีตรวจสอบว่าสมุดงานมีแผ่นงานที่ซ่อนอยู่หรือไม่

วิธีที่เร็วที่สุดในการตรวจหาแผ่นงานที่ซ่อนอยู่ใน Excel คือ: คลิกขวาที่แท็บแผ่นงานใดก็ได้ แล้วดู ถ้าคำสั่ง ซ่อน… ถูกเปิดใช้งานหรือไม่ หากเปิดใช้งานอยู่ ให้คลิกและดูว่าแผ่นงานใดถูกซ่อนไว้ หากปิดใช้งาน (เป็นสีเทา) สมุดงานจะไม่มีแผ่นงานที่ซ่อนอยู่

หมายเหตุ วิธีนี้จะไม่แสดงแผ่นงานที่ซ่อนอยู่มากนัก วิธีเดียวที่จะดูแผ่นงานดังกล่าวคือการเลิกซ่อนด้วย VBA

ไม่สามารถยกเลิกการซ่อนแผ่นงานใน Excel - ปัญหาและแนวทางแก้ไข

หากคุณไม่สามารถยกเลิกการซ่อนแผ่นงานบางแผ่นใน Excel ของคุณได้ เคล็ดลับการแก้ปัญหาต่อไปนี้อาจช่วยอธิบายสาเหตุบางประการ

1. สมุดงานได้รับการป้องกัน

ไม่สามารถซ่อนหรือเลิกซ่อนแผ่นงานได้หาก โครงสร้างสมุดงาน ได้รับการป้องกัน (ไม่ควรสับสนกับการเข้ารหัสรหัสผ่านระดับสมุดงานหรือการป้องกันแผ่นงาน) หากต้องการตรวจสอบ ให้ไปที่แท็บ ตรวจทาน > เปลี่ยนแปลง และดูที่ปุ่ม ป้องกันสมุดงาน ถ้าปุ่มนี้ถูกเน้นด้วยสีเขียว แสดงว่าสมุดงานได้รับการป้องกัน หากต้องการยกเลิกการป้องกัน ให้คลิกปุ่ม ป้องกันสมุดงาน พิมพ์รหัสผ่านหากได้รับแจ้ง และบันทึกสมุดงาน สำหรับข้อมูลเพิ่มเติม โปรดดูวิธีปลดล็อกสมุดงานที่มีการป้องกันใน Excel

2. แผ่นงานถูกซ่อนไว้มาก

หากแผ่นงานของคุณถูกซ่อนโดยโค้ด VBA ที่ทำให้แผ่นงานถูกซ่อนไว้มาก (กำหนดคุณสมบัติ xlSheetVeryHidden ) แผ่นงานดังกล่าวจะไม่สามารถแสดงได้โดยใช้ปุ่ม ยกเลิกการซ่อน คำสั่ง หากต้องการยกเลิกการซ่อนแผ่นงานที่ซ่อนอยู่ คุณต้องเปลี่ยนคุณสมบัติจาก xlSheetVeryHidden เป็น xlSheetVisible จากภายใน Visual Basic Editor หรือเรียกใช้โค้ด VBA นี้

3. ไม่มีแผ่นงานที่ซ่อนอยู่ในสมุดงาน

หากคำสั่ง เลิกซ่อน เป็นสีเทาทั้งบน Ribbon และในเมนูคลิกขวา แสดงว่าไม่มีแผ่นงานที่ซ่อนอยู่ในสมุดงานของคุณ :)

นี่คือวิธีที่คุณยกเลิกการซ่อนแผ่นงานใน Excel หากคุณอยากรู้วิธีซ่อนหรือเลิกซ่อนวัตถุอื่นๆ เช่น แถว คอลัมน์ หรือสูตร คุณจะพบรายละเอียดทั้งหมดในบทความด้านล่างนี้ ขอขอบคุณที่อ่านและหวังว่าจะได้พบคุณในบล็อกของเราในสัปดาห์หน้า!

ดาวน์โหลดได้

มาโครเพื่อเลิกซ่อนแผ่นงานใน Excel