เคล็ดลับ: ภาษาอื่น ๆ ได้รับการแปลโดย Google คุณสามารถเยี่ยมชม English รุ่นของลิงก์นี้
เข้าสู่ระบบ
x
or
x
x
สมัครสมาชิก
x

or

วิธีการซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนไว้ใน Excel?

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

ซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนด้วยรหัส VBA


คุณอาจสนใจ:

แทรกหรือลบช่องทำเครื่องหมาย / ปุ่มตัวเลือกต่างๆใน Excel ได้อย่างง่ายดาย

กับ Kutools สำหรับ Excel's Batch Insert Check Boxes / ปุ่มตัวเลือก or ปุ่มตรวจสอบกล่องแบทช์ / ปุ่มตัวเลือก คุณสามารถแทรกหรือลบกล่องกาเครื่องหมายหลายรายการหรือปุ่มตัวเลือกจำนวนมากในแผ่นงาน Excel ของคุณได้ ดูภาพหน้าจอด้านล่าง:

เครื่องมือเพิ่มประสิทธิภาพที่แนะนำสำหรับ Excel

แท็บ Office: นำแท็บที่ทรงพลังมาที่ Office (รวมถึง Excel) เช่น Chrome, Safari, Firefox และ Internet Explorer ช่วยคุณประหยัดเวลาครึ่งหนึ่งและลดการคลิกเมาส์นับพันครั้ง การทดลองใช้ฟรีไม่ จำกัด 30 วัน

Kutools สำหรับ Excel: ประหยัด 71% จากเวลาของคุณและแก้ไขปัญหา 82% Excel ให้คุณ เครื่องมือขั้นสูง 300 + ออกแบบมาสำหรับสถานการณ์การทำงาน 1500 + ทำให้ Excel ง่ายขึ้นและเพิ่มผลิตผลทันทีการทดลองใช้ฟรีไม่ จำกัด 60 วัน


ลูกศรสีฟ้าด้านขวา ซ่อนช่องทำเครื่องหมายเมื่อแถวถูกซ่อนด้วยรหัส 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 เลือกแถวทั้งหมดที่มีช่องทำเครื่องหมายที่คุณต้องซ่อนจากนั้นกล่องโต้ตอบปรากฏขึ้นโปรดคลิกที่ ใช่ ปุ่ม

จากนั้นคุณจะเห็นช่องทำเครื่องหมายทั้งหมดถูกซ่อนด้วยแถวที่ด้านล่างภาพหน้าจอที่แสดงไว้

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


ลูกศรสีฟ้าด้านขวาบทความที่เกี่ยวข้อง:


เครื่องมือเพิ่มประสิทธิภาพที่แนะนำ

Ribbon ของ Excel (ที่ติดตั้ง Kutools สำหรับ Excel)

300 + คุณสมบัติขั้นสูงเพิ่มประสิทธิภาพการผลิตของคุณโดย 71% และช่วยให้คุณโดดเด่นจากฝูงชน!

คุณต้องการทำงานให้เสร็จทุกวันอย่างรวดเร็วและสมบูรณ์แบบหรือไม่? Kutools สำหรับ Excel นำ 300 + คุณสมบัติขั้นสูงที่ยอดเยี่ยมและทรงพลัง (รวมสมุดงาน, ผลรวมตามสี, แบ่งเนื้อหาของเซลล์, แปลงวันที่และอื่น ๆ ... ) สำหรับ 1500 + สถานการณ์การทำงานช่วยให้คุณแก้ปัญหา ปัญหา 82% Excel.

  • จัดการกับงานที่ซับซ้อนทั้งหมดในไม่กี่วินาทีช่วยเพิ่มความสามารถในการทำงานของคุณรับความสำเร็จจากการแข่งขันที่ดุเดือดและไม่ต้องกังวลกับการถูกไล่ออก
  • ประหยัดเวลาทำงานมากปล่อยให้เวลามากสำหรับคุณที่จะรักและดูแลครอบครัวและเพลิดเพลินกับชีวิตที่สะดวกสบายในขณะนี้.
  • ลดการคลิกแป้นพิมพ์และเมาส์หลายพันครั้งทุกวันช่วยลดความเหนื่อยล้าของดวงตาและมือและให้ร่างกายที่แข็งแรง
  • มาเป็นผู้เชี่ยวชาญใน Excel ใน 3 นาทีและรับความชื่นชมจากเพื่อนร่วมงานหรือเพื่อนของคุณ.
  • ไม่จำเป็นต้องจำสูตรเจ็บปวดและรหัส VBA อีกต่อไปมีจิตใจที่ผ่อนคลายและน่ารื่นรมย์ให้ความตื่นเต้นที่คุณไม่เคยมีมาก่อน
  • ใช้จ่ายเพียง $ 39 แต่คุ้มค่ากว่าการฝึกอบรม $ 4000 ของผู้อื่น. มีการใช้งานโดยชนชั้นสูง 110,000 และ บริษัท ที่มีชื่อเสียง 300 +
  • ทดลองใช้ 60 ฟรีไม่ จำกัด วัน. รับประกันคืนเงิน 60 ในวัน ฟรีอัพเกรดและรองรับ 2 ปี ซื้อครั้งเดียวใช้ตลอดไป
  • เปลี่ยนวิธีการทำงานตอนนี้และให้ชีวิตที่ดีขึ้นทันที!

แท็บ Office นำแท็บที่มีประสิทธิภาพและมีประโยชน์มาสู่ Office (รวมถึง Excel) เช่นเดียวกับ Chrome, Firefox และ IE ใหม่

  • เพิ่มผลผลิตของคุณ 50% เมื่อดูและแก้ไขเอกสารหลายชุด
  • ลดการคลิกเมาส์หลายร้อยครั้งทุกวันบอกลามือเม้าส์
  • เปิดและสร้างเอกสารในแท็บใหม่ของหน้าต่างเดียวกันไม่ใช่ในหน้าต่างใหม่
  • ช่วยให้คุณทำงานได้เร็วขึ้นและโดดเด่นจากฝูงชน! หนึ่งวินาทีเพื่อสลับระหว่างเอกสารที่เปิดอยู่หลายสิบรายการ!
Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.