วิธีลบแถวที่มีค่าหายไป / ว่างในบางคอลัมน์ใน Excel
ในบางกรณีคุณอาจต้องลบทั้งแถวที่ไม่มีค่าหรือเซลล์ว่างในช่วงของเซลล์ใน Excel บทความนี้จะแสดงวิธีจัดการกับปัญหานี้
ลบแถวที่มีค่าขาดหายไป / ว่างในบางคอลัมน์ด้วยรหัส VBA
ลบแถวที่มีค่าขาดหายไป / ว่างในบางคอลัมน์ด้วยรหัส VBA
สมมติว่าคุณต้องการลบแถวหากไม่มีค่าในคอลัมน์ B และ D ตามภาพหน้าจอร้อง คุณสามารถเรียกใช้รหัส VBA ต่อไปนี้เพื่อให้บรรลุ
1 กด อื่น ๆ + F11 เพื่อเปิด Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่าง
2 ใน Microsoft Visual Basic สำหรับแอปพลิเคชัน หน้าต่างคลิก สิ่งที่ใส่เข้าไป > โมดูล. จากนั้นคัดลอกและวางโค้ด VBA ด้านล่างลงในหน้าต่างรหัส
รหัส VBA: ลบแถวที่มีค่าขาดหายไป / ว่างในบางคอลัมน์
Sub DeleteRows()
Dim I As Integer
Dim xCount As Integer
Dim xRg As Range
Dim xTxt As String
On Error Resume Next
If ActiveWindow.RangeSelection.Count > 1 Then
xTxt = ActiveWindow.RangeSelection.AddressLocal
Else
xTxt = ActiveSheet.UsedRange.AddressLocal
End If
Set xRg = Application.InputBox("Please select range:", "Kutools for Excel", xTxt, , , , , 8)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "You can’t select multiple ranges to operate", vbInformation, "Kutools for Excel"
Exit Sub
End If
xCount = xRg.Rows.Count
For I = xCount To 1 Step -1
If Application.WorksheetFunction.CountBlank(xRg.Rows(I)) > 0 Then
xRg.Rows(I).EntireRow.Delete
End If
Next
End Sub
3 กด F5 กุญแจสำคัญในการเรียกใช้รหัส จากนั้นก Kutools สำหรับ Excel กล่องโต้ตอบจะปรากฏขึ้นโปรดเลือกช่วงคอลัมน์ที่คุณต้องการตรวจสอบว่ามีค่าที่ขาดหายไปหรือไม่จากนั้นคลิกที่ OK ปุ่ม
หลังจากคลิก OK คุณสามารถดูแถวทั้งหมดที่มีค่าที่ขาดหายไปในคอลัมน์ B และ D จะถูกลบทันที ดูภาพหน้าจอ:
หมายเหตุ: คุณไม่สามารถเลือกหลายช่วงเพื่อใช้งานพร้อมกันได้ หากไม่มีค่าในหลายคอลัมน์และคุณต้องการลบแถวทั้งหมดคุณสามารถทำขั้นตอนที่ 3 ข้างต้นซ้ำจากคอลัมน์หนึ่งไปยังอีกคอลัมน์หนึ่งได้
เติมเซลล์ว่างทั้งหมดด้วยค่าที่แน่นอนใน Excel
พื้นที่ เติมเซลล์ว่าง ประโยชน์ของ Kutools สำหรับ Excel สามารถช่วยให้คุณจัดการกับเซลล์ว่างใน Excel ได้อย่างง่ายดาย ตัวอย่างเช่นคุณสามารถเติมเซลล์ว่างทั้งหมดในช่วงที่เลือกด้วยค่าคงที่เติมเซลล์ว่างตามค่าในเซลล์ด้านบนลงซ้ายหรือขวาหรือคุณสามารถเติมเซลล์ว่างด้วยค่าเชิงเส้น ดูภาพหน้าจอ:
ดาวน์โหลดและทดลองใช้ทันที! (เส้นทางฟรี 30 วัน)
บทความที่เกี่ยวข้อง:
- จะลบแถวได้อย่างไรหากเซลล์มีค่ามากกว่า / น้อยกว่าค่าที่กำหนดใน Excel
- จะลบแถวทั้งหมดยกเว้นแถวส่วนหัวแรกใน Excel ได้อย่างไร?
- จะลบแถวทั้งหมดด้านล่างแถวหรือเซลล์ที่ใช้งานอยู่ใน Excel ได้อย่างไร
สุดยอดเครื่องมือเพิ่มผลผลิตในสำนักงาน
เพิ่มพูนทักษะ Excel ของคุณด้วย Kutools สำหรับ Excel และสัมผัสประสิทธิภาพอย่างที่ไม่เคยมีมาก่อน Kutools สำหรับ Excel เสนอคุณสมบัติขั้นสูงมากกว่า 300 รายการเพื่อเพิ่มประสิทธิภาพและประหยัดเวลา คลิกที่นี่เพื่อรับคุณสมบัติที่คุณต้องการมากที่สุด...
แท็บ Office นำอินเทอร์เฟซแบบแท็บมาที่ Office และทำให้งานของคุณง่ายขึ้นมาก
- เปิดใช้งานการแก้ไขและอ่านแบบแท็บใน Word, Excel, PowerPoint, ผู้จัดพิมพ์, Access, Visio และโครงการ
- เปิดและสร้างเอกสารหลายรายการในแท็บใหม่ของหน้าต่างเดียวกันแทนที่จะเป็นในหน้าต่างใหม่
- เพิ่มประสิทธิภาพการทำงานของคุณ 50% และลดการคลิกเมาส์หลายร้อยครั้งให้คุณทุกวัน!