Hur tar jag bort rader med saknade / tomma värden i vissa kolumner i Excel?

I vissa fall kan du behöva radera hela raderna med saknat värde eller tom cell i ett cellområde i Excel. Den här artikeln visar hur du hanterar detta problem.

Ta bort rader med saknade / tomma värden i vissa kolumner med VBA-kod

---

Ta bort rader med saknade / tomma värden i vissa kolumner med VBA-kod

Antag att du vill radera rader om det saknas värde i kolumn B och D som nedanstående skärmdump. Du kan köra följande VBA-kod för att uppnå den.

1. Tryck andra + F11 att öppna Microsoft Visual Basic för applikationer fönster.

2. I Microsoft Visual Basic för applikationer fönstret klickar Insert > Modulerna. Kopiera och klistra sedan in nedanstående VBA-kod i kodfönstret.

VBA-kod: Radera rader med saknade / tomma värden i vissa kolumner

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. Tryck F5 för att köra koden. Då en Kutools för Excel dialogrutan dyker upp, välj det kolumnområde som du vill kontrollera om det saknas värde eller inte, och klicka sedan på OK knapp.

När du klickat på OK knappen, kan du se alla rader med saknat värde i kolumn B och D raderas omedelbart. Se skärmdump:

Anmärkningar: Du kan inte välja flera områden för att fungera samtidigt. Om det saknas värde i flera kolumner och du vill ta bort alla rader kan du upprepa steg 3 ovan från en kolumn till en annan.

---

---

Relaterade artiklar:

• Hur tar jag bort rader om cellen är större / mindre än ett visst värde i Excel?
• Hur tar jag bort alla rader utom den första rubrikraden i Excel?
• Hur tar jag bort alla rader under en viss rad eller aktiv cell i Excel?