Excel'de belirli sütunlarda eksik/boş değerler içeren satırları nasıl silersiniz?

Excel'de, eksik veya boş değerlerle başa çıkmak, veri temizleme ve analizi için önemli olabilir. Bu kılavuz, VBA betiği kullanarak belirli sütunlarda boş hücreler bulunursa tüm satırları silme işlemini göstermektedir.

VBA kodu ile belirli sütunlarda eksik/boş değerler içeren satırları silme

VBA kodu ile belirli sütunlarda eksik/boş değerler içeren satırları silme

Diyelim ki aşağıdaki ekran görüntüsünde gösterildiği gibi B veya D sütunlarında bir eksik değer varsa satırları silmek istiyorsunuz. Aşağıdaki VBA kodunu çalıştırarak bunu gerçekleştirebilirsiniz.

1. Alt + F11 tuşlarına basarak Microsoft Visual Basic for Applications penceresini açın.

2. Microsoft Visual Basic for Applications penceresinde, Ekle > Modül'e tıklayın. Ardından aşağıdaki VBA kodunu Kod penceresine kopyalayıp yapıştırın.

VBA kodu: Belirli sütunlarda eksik/boş değerler içeren satırları silme

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. Kodu çalıştırmak için F5 tuşuna basın. Ardından bir Kutools for Excel iletişim kutusu açılır, lütfen eksik değer olup olmadığını kontrol etmek istediğiniz sütun aralığını seçin ve ardından Tamam düğmesine tıklayın.

Tamam düğmesine tıkladıktan sonra, B veya D sütunlarında eksik değerler bulunan tüm satırlar hemen silinir. Ekran görüntüsüne bakın:

Not: Aynı anda işlem yapmak için birden fazla aralık seçemezsiniz. Eksik değerler birden fazla sütunda varsa ve tüm satırları silmek istiyorsanız, her sütun için 3. adımı tekrarlayın.

İlgili makaleler:

• Excel'de hücre belirli bir değerden büyük/küçükse satırları nasıl silersiniz?
• Excel'de ilk başlık satırı hariç tüm satırları nasıl silersiniz?
• Excel'de belirli bir satırın veya etkin hücrenin altında kalan tüm satırları nasıl silersiniz?