ในส่วนนี้เราจะให้มาโคร VBA แก่คุณเพื่อลบแถวหากเซลล์ว่างใน Excel

1 กด อื่น ๆ + F11 คีย์พร้อมกันเพื่อเปิดหน้าต่าง Microsoft Visual Basic for Applications

2. ใส่โมดูลโดยคลิกที่ไฟล์ สิ่งที่ใส่เข้าไป > โมดูลและวางมาโคร VBA ต่อไปนี้ลงในโมดูล

VBA: ลบทั้งแถวหากเซลล์ว่างในคอลัมน์

Sub DeleteBlackCell()
Dim Rng As Range
Dim WorkRng As Range
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set WorkRng = WorkRng.SpecialCells(xlCellTypeBlanks)
If Err = 0 Then
WorkRng.EntireRow.Delete
End If
End Sub

4. ในกล่องโต้ตอบ KutoolsforExcel ของเราให้เลือกและระบุคอลัมน์ที่คุณต้องการลบทั้งแถวหากเซลล์ว่างและคลิกที่ OK ปุ่ม

ตอนนี้เฉพาะในกรณีที่เซลล์ในคอลัมน์ที่ระบุว่างเปล่าแถวที่เซลล์ว่างเหล่านี้อยู่จะถูกลบออกพร้อมกัน

บางครั้งคุณอาจต้องลบทั้งแถวหากเซลล์ในคอลัมน์ที่ระบุมีเนื้อหาบางอย่าง ในกรณีนี้คุณสามารถใช้ Kutools สำหรับ Excel's Select Specific Cells ยูทิลิตี้เพื่อแก้ปัญหาได้อย่างง่ายดายใน Excel

1. เลือกคอลัมน์ที่หากเซลล์มีเนื้อหาที่ระบุคุณจะลบแถวที่เกี่ยวข้องแล้วคลิก Kutools > เลือก > เลือกเซลล์เฉพาะ.

2. ในการเปิดกล่องโต้ตอบเลือกเซลล์เฉพาะดูภาพหน้าจอด้านบน:

(1) ตรวจสอบไฟล์ ทั้งแถว ตัวเลือกใน ประเภทการเลือก มาตรา;

(2) เลือกไฟล์ ประกอบด้วย จากรายการแบบเลื่อนลงรายการแรกในไฟล์ ประเภทเฉพาะ มาตรา;

(3) พิมพ์เนื้อหาบางอย่างลงในช่องต่อไปนี้

(4) คลิกไฟล์ Ok ปุ่ม

3. จากนั้นกล่องโต้ตอบจะปรากฏขึ้นและแสดงจำนวนแถวที่เลือกไว้ คลิก OK เพื่อปิด

4. คลิกขวาที่แถวที่เลือกแล้วเลือก ลบ จากเมนูคลิกขวา

จากนั้นแถวที่เลือกทั้งหมดจะถูกลบพร้อมกัน ดูภาพหน้าจอ:

วิธีป้องกันการบันทึกหากเซลล์ใดเซลล์หนึ่งว่างเปล่าใน Excel

วิธีการเน้นแถวถ้าเซลล์มีข้อความ / ค่า / ว่างใน Excel

จะไม่คำนวณ (ละเว้นสูตร) ​​ได้อย่างไรหากเซลล์ว่างใน Excel

วิธีใช้ฟังก์ชัน IF กับ AND, OR และ NOT ใน Excel

วิธีแสดงข้อความเตือน / แจ้งเตือนหากเซลล์ว่างใน Excel

วิธีป้อน / แสดงข้อความหรือข้อความหากเซลล์ว่างใน Excel