จะลบแถวทั้งหมดได้อย่างไรถ้าเซลล์มีศูนย์ใน Excel
บางครั้งคุณต้องการลบทั้งแถวหากเซลล์มีศูนย์ใน Excel และคุณสามารถลบทีละแถวได้หากมีไม่กี่แถว แต่จำเป็นต้องลบแถวหลายร้อยแถวที่มีศูนย์ออกอย่างไร? คุณสามารถเลือกวิธีที่ยุ่งยากด้านล่างเพื่อแก้ปัญหา
ลบแถวถ้าเซลล์มีศูนย์ด้วยฟังก์ชันตัวกรองใน Excel
ลบแถวถ้าเซลล์มีศูนย์ด้วย VBA ใน Excel
ลบแถวถ้าเซลล์มีศูนย์ด้วย Kutools for Excel
ลบแถวถ้าเซลล์มีศูนย์ด้วยฟังก์ชันตัวกรองใน Excel
คุณสามารถใช้ฟังก์ชันตัวกรองเพื่อกรองแถวทั้งหมดโดยยึดตามค่าศูนย์ในคอลัมน์ใดคอลัมน์หนึ่งจากนั้นจึงลบแถวที่มองเห็นทั้งหมดในภายหลัง กรุณาดำเนินการดังนี้
1. เลือกเซลล์คอลัมน์ที่มีค่าศูนย์ที่คุณต้องการลบทั้งแถวตามจากนั้นคลิก ข้อมูล > ตัวกรอง. ดูภาพหน้าจอ:
2. จากนั้นลูกศรดรอปดาวน์จะแสดงในเซลล์แรกของคอลัมน์ที่เลือกคลิกลูกศรจากนั้นเลือก ตัวกรองตัวเลข > เท่ากับ จากรายการแบบหล่นลง
3 ใน ตัวกรองอัตโนมัติที่กำหนดเอง กล่องโต้ตอบป้อนหมายเลข 0 ลงในช่องข้อความตามภาพด้านล่างที่แสดงจากนั้นคลิกที่ไฟล์ OK ปุ่ม
4. จากนั้นเซลล์ค่าศูนย์ทั้งหมดในคอลัมน์บางคอลัมน์นี้จะถูกกรองออก โปรดเลือกเซลล์ที่มองเห็นได้ทั้งหมดในช่วงตัวกรองและคลิกขวาที่เซลล์เหล่านั้นเลือก ลบแถว จากเมนูคลิกขวา และในกล่องพรอมต์ป๊อปอัพให้คลิกไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:
5. ตอนนี้แถวที่มองเห็นทั้งหมดจะถูกลบ คุณสามารถคลิก ข้อมูล > ตัวกรอง อีกครั้งเพื่อแสดงข้อมูลทั้งหมดโดยไม่มีเซลล์ค่าเป็นศูนย์ ดูภาพหน้าจอ:
ลบแถวทั้งหมดได้อย่างง่ายดายหากมีค่าเป็นศูนย์ในช่วงหนึ่งใน Excel:
Kutools สำหรับ Excel's เลือกเซลล์เฉพาะ ยูทิลิตี้ช่วยให้คุณเลือกแถวทั้งหมดได้อย่างง่ายดายหากมีค่าศูนย์อยู่ในช่วงหนึ่งจากนั้นคุณสามารถลบแถวที่เลือกทั้งหมดด้วยตนเองได้อย่างรวดเร็วโดยไม่ผิดพลาด
ดาวน์โหลดและทดลองใช้ทันที! (เส้นทางฟรี 30 วัน)
ลบแถวถ้าเซลล์มีศูนย์ด้วย VBA ใน Excel
ส่วนนี้จะแสดงวิธี VBA เพื่อลบแถวทั้งหมดหากมีค่าเป็นศูนย์ในคอลัมน์ใดคอลัมน์หนึ่งใน Excel
1 กด Alt + F11 พร้อมกันเพื่อแสดงไฟล์ Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2. ในหน้าต่าง Microsoft Visual Basic for Applications คลิก สิ่งที่ใส่เข้าไป > โมดูลจากนั้นคัดลอกและวางโค้ด VBA ต่อไปนี้ลงในหน้าต่างโมดูล
VBA: ลบทั้งแถวหากมีค่าเป็นศูนย์ในช่วงคอลัมน์บางช่วงในแผ่นงาน
Sub DeleteZeroRow () 'Updateby20140616 Dim Rng As Range Dim WorkRng เป็น Range On Error Resume ถัดไป xTitleId = "KutoolsforExcel" Set WorkRng = Application.Selection Set WorkRng = Application.InputBox ("Range", xTitleId, WorkRng.Address, Type: = 8 ) Application.ScreenUpdating = False Do Set Rng = WorkRng.Find ("0", LookIn: = xlValues) If Not Rng Is nothing then Rng.EntireRow.Delete End If Loop while Not Rng Is Nothing Application.ScreenUpdating = True End Sub
3 กด F5 คีย์เพื่อเรียกใช้รหัสในป๊อปอัป KutoolsforExcel กล่องโต้ตอบเลือกช่วงคอลัมน์ที่คุณต้องการลบทั้งแถวโดยยึดตามค่าศูนย์ภายในจากนั้นคลิกไฟล์ OK ปุ่ม. ดูภาพหน้าจอ:
จากนั้นแถวทั้งหมดที่ยึดตามค่าศูนย์ในช่วงคอลัมน์ที่ระบุจะถูกลบทันที
ลบแถวถ้าเซลล์มีศูนย์ด้วย Kutools for Excel
สำหรับผู้ใช้ Excel จำนวนมากการใช้รหัส VBA เป็นอันตรายต่อการลบข้อมูลใน Excel หากคุณไม่เชื่อถือรหัส VBA เราขอแนะนำให้คุณลองใช้ไฟล์ เลือกเซลล์เฉพาะ ประโยชน์ของ Kutools สำหรับ Excel.
ก่อนที่จะใช้ Kutools สำหรับ Excelโปรด ดาวน์โหลดและติดตั้งในตอนแรก.
1. เลือกช่วงคอลัมน์ที่คุณจะลบแถวทั้งหมดตามค่าศูนย์ภายในจากนั้นคลิก Kutools > เลือก > เลือกเซลล์เฉพาะ. ดูภาพหน้าจอ:
2 ใน เลือกเซลล์เฉพาะ คุณต้อง:
(1) เลือกไฟล์ ทั้งแถว ตัวเลือกใน ประเภทการเลือก มาตรา.
(2) เลือก เท่ากับ ในครั้งแรก ประเภทเฉพาะ รายการแบบเลื่อนลงจากนั้นป้อนหมายเลข 0 ลงในกล่องข้อความ
(3) คลิกไฟล์ OK ปุ่ม
3. กล่องโต้ตอบจะปรากฏขึ้นเพื่อบอกจำนวนแถวที่เลือกคลิกที่ OK ปุ่ม. ตอนนี้แถวทั้งหมดที่มีค่าเป็นศูนย์มีอยู่ในช่วงคอลัมน์ที่ระบุจะถูกเลือก กรุณาคลิกขวาที่แถวที่เลือกจากนั้นคลิก ลบ ในเมนูคลิกขวา ดูภาพหน้าจอ:
ตอนนี้แถวทั้งหมดที่มีค่าเป็นศูนย์อยู่ในคอลัมน์ที่ระบุจะถูกลบทันที ดูภาพหน้าจอ:
หากคุณต้องการทดลองใช้ยูทิลิตีนี้ฟรี (30 วัน) กรุณาคลิกเพื่อดาวน์โหลดแล้วไปใช้การดำเนินการตามขั้นตอนข้างต้น
ลบแถวถ้าเซลล์มีศูนย์ด้วย Kutools for Excel
บทความญาติ:
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!
