วิธีซ่อนช่องทำเครื่องหมายเมื่อซ่อนแถวใน Excel
โดยปกติแล้ว เมื่อซ่อนแถวที่มีช่องกาเครื่องหมายในเซลล์ของแถว ช่องกาเครื่องหมายจะไม่ถูกซ่อนพร้อมกับแถวนั้น แต่จะทับซ้อนกับเนื้อหาของแถวอื่นตามภาพหน้าจอด้านล่าง คุณจะซ่อนช่องกาเครื่องหมายได้อย่างไรเมื่อแถวถูกซ่อนใน Excel บทความนี้จะช่วยคุณแก้ปัญหานี้ได้
ซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนด้วยรหัส VBA
ซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนด้วยรหัส VBA
คุณสามารถเรียกใช้รหัส VBA ต่อไปนี้เพื่อซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนใน Excel
1. คลิกขวาที่แท็บแผ่นงานที่มีช่องทำเครื่องหมายที่คุณต้องการซ่อนแล้วคลิก ดูรหัส จากเมนูคลิกขวา
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน คัดลอกและวางโค้ด VBA ด้านล่างลงในไฟล์ รหัส หน้าต่าง
รหัส VBA: ซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อน
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Dim xChkBox As CheckBox
Dim xCell As Range
Dim xHide As Boolean
If Target.EntireRow.AddressLocal = Application.Intersect(Target, Target.EntireRow).AddressLocal Then
xHide = (MsgBox("Hide Rows ???", vbYesNo + vbQuestion, "Kutools for Excel") = vbYes)
Target.EntireRow.Hidden = xHide
For Each xChkBox In ActiveSheet.CheckBoxes
Set xCell = xChkBox.TopLeftCell
If Not Intersect(xCell, Target) Is Nothing Then
xChkBox.Visible = Not xHide
End If
Next
End If
End Sub
3 จากนั้นกดปุ่ม อื่น ๆ + Q ในเวลาเดียวกันเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
4. เลือกทั้งแถวที่มีช่องทำเครื่องหมายที่คุณต้องการซ่อนจากนั้นกล่องโต้ตอบจะปรากฏขึ้นโปรดคลิกที่ ใช่ ปุ่ม
จากนั้นคุณจะเห็นว่าช่องกาเครื่องหมายทั้งหมดถูกซ่อนไว้กับแถวตามที่แสดงในภาพหน้าจอด้านล่าง
หมายเหตุ: สำหรับการแสดงแถวที่ซ่อนด้วยช่องทำเครื่องหมายโปรดเลือกแถวทั้งหมดรวมถึงแถวที่ซ่อนอยู่และในกล่องโต้ตอบที่ปรากฏขึ้นให้คลิก ไม่ ปุ่ม. จากนั้นแถวที่มีช่องทำเครื่องหมายจะปรากฏขึ้น
บทความที่เกี่ยวข้อง:
- วิธีซ่อนแถวตามวันที่ของวันนี้ใน Excel
- วิธีซ่อน / ยกเลิกการซ่อนแถวหรือคอลัมน์ด้วยเครื่องหมายบวกหรือลบใน Excel
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!