วิธีซ่อนหรือยกเลิกการซ่อนรูปร่างตามค่าเซลล์ที่ระบุใน Excel

คุณสามารถซ่อนหรือยกเลิกการซ่อนรูปร่างเฉพาะใน Excel ได้ตามค่าของเซลล์ที่ระบุ ทำตามวิธีนี้เพื่อบรรลุเป้าหมาย

ซ่อนหรือยกเลิกการซ่อนรูปร่างตามค่าของเซลล์ที่ระบุด้วยรหัส VBA

ซ่อนหรือยกเลิกการซ่อนรูปร่างตามค่าของเซลล์ที่ระบุด้วยรหัส VBA

ตัวอย่างเช่นคุณต้องการยกเลิกการซ่อนรูปร่างบางอย่างเมื่อป้อนหมายเลข 1 ลงในเซลล์ A1 หรือซ่อนรูปร่างนี้หากเซลล์ A1 เป็นค่าอื่น โปรดเรียกใช้รหัส VBA ต่อไปนี้เพื่อให้บรรลุ

1. คลิกขวาที่แท็บแผ่นงานซึ่งมีรูปร่างที่คุณจะซ่อนหรือเลิกซ่อนจากนั้นคลิก ดูรหัส จากเมนูคลิกขวา

2. จากนั้น Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างจะปรากฏขึ้น โปรดคัดลอกและวางรหัส VBA ด้านล่างลงในไฟล์ รหัส หน้าต่าง

รหัส VBA: ซ่อนหรือเลิกซ่อนรูปร่างบางอย่างตามค่าเซลล์ที่ระบุ

Private Sub Worksheet_Change(ByVal Target As Range)
    If Target.Row = 1 And Target.Column = 1 Then _
        Me.Shapes("Oval 6").Visible = (Cells(1, 1).Value = 1)
End Sub

หมายเหตุ : : ในรหัส:

3 กด อื่น ๆ + Q พร้อมกันเพื่อปิดไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง

จากนี้ไป เมื่อป้อนค่าตัวเลข 1 ลงในเซลล์ A1 รูปร่าง “วงรี 6” จะถูกแสดงออกมา แต่หากป้อนค่าอื่น เช่น ตัวเลข 2 ลงในเซลล์ A1 รูปร่าง “วงรี 6” จะถูกแสดงออกมาทันที

บทความที่เกี่ยวข้อง:

• วิธีเพิ่มปลายเมาส์ให้เป็นรูปร่างบางอย่างใน Excel
• วิธีเปลี่ยนขนาดรูปร่างโดยอัตโนมัติตาม / ขึ้นอยู่กับค่าเซลล์ที่ระบุใน Excel
• วิธีเติมรูปร่างด้วยสีพื้นหลังโปร่งใสใน Excel