İpucu: Digər dillər Google-tərcümə olunur. Sizi ziyarət edə bilərsiniz English bu linkin versiyası.
Daxil ol
x
or
x
x
Qeydiyyatdan
x

or

Excel-də müəyyən sütunlarda eksik / boş dəyərləri olan satırları necə silmək olar?

Bəzi hallarda Excel-də bir sıra hüceyrələrdə eksik və ya boş bir hüceyrə olan bütün satırları silmək tələb oluna bilər. Bu yazıda bu problemlə necə məşğul olacağınız sizə göstəriləcək.

VBA kodu ilə müəyyən sütunlarda eksik / boş dəyərləri olan satırları silin


Asanlıqla bütün boş hüceyrələri Excel-də müəyyən dəyəri ilə doldurun

Basın Kutools > Taxmaq > Boş Hüceyrələri doldurun. Excel üçün Kutools's Balnk hüceyrələrini doldurun kommunal, bütün boş hüceyrələri müəyyən bir dəyərlə doldurmaqla yanaşı lazım olan qədər yuxarıdakı dəyərə əsaslanan balnk hüceyrələrini doldurur. Ekran görüntüsünə baxın:

Excel üçün Kutools 300-dən çox lazımlı Excel alətləri daxildir. 60 gün ərzində heç bir məhdudiyyətsiz cəhd edin. İndi pulsuz sınaq yükləyin


arrow mavi sağ bubble VBA kodu ilə müəyyən sütunlarda eksik / boş dəyərləri olan satırları silin


Eksik göstərilən B və D sütunlarında göstərilən ekran görüntüsü kimi mövcud olduqda satırları silmək istədiyiniz halda. Bunu bacarmaq üçün aşağıdakı VBA kodu çalıştırabilirsiniz.

1. Basın Dayandırmaq + F11 açmaq üçün Proqramlar üçün Microsoft Visual Basic pəncərə.

2. İçində Proqramlar üçün Microsoft Visual Basic pəncərə basın Taxmaq > Modules. Aşağıdakı VBA kodunu Kod pencerəsinə kopyalayıb yapışdırın.

VBA kodu: müəyyən sütunlarda eksik / boş dəyərləri olan satırları silin

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. Basın F5 kodunu çalıştırmak üçün düyməsini basın. Sonra a Excel üçün Kutools informasiya qutusu açılırsa, xahiş edirik, eksik dəyər mövcud olub-olmadığını yoxlamaq istədiyiniz sütun aralığını seçin və sonra basın OK düyməsini basın.

Bu tıklayarak sonra OK düyməsini basaraq, B və D sütunlarında itkin dəyərləri olan bütün satırları dərhal silin. Ekran görüntüsünə baxın:

Qeyd: Eyni zamanda fəaliyyət göstərmək üçün birdən çox aralıq seçə bilməzsiniz. Eksik dəyər çox sütunlarda mövcuddur və bütün satırları silmək istəyirsinizsə, yuxarıda göstərilən 3 addımını bir sütundan digərinə təkrarlaya bilərsiniz.


arrow mavi sağ bubbleƏlaqəli məqalələr:



Təklif olunan Məhsuldarlıq Vasitələri

Office Tab

qızıl star1 Chrome, Firefox və yeni Internet Explorer kimi Excel və digər Office proqramlarına lazımlı sekmeleri gətirin.

Excel üçün Kutools

qızıl star1 Amazing! 5 dəqiqədə məhsuldarlığınızı artırın. Heç bir xüsusi bacarıqa ehtiyac yoxdur, hər gün iki saat saxlaya bilərsiniz!

qızıl star1 300 Excel üçün yeni funksiyalar, Excel çox asan və güclü olun:

  • Veriyi ləğv etmədən Cell / Satır / Sütunları birləşdirin.
  • Bir neçə Çarşaf və İş Kitabını birləşdirin və birləşdirin.
  • Çaprazları müqayisə edin, birdən çox aralığa kopyalayın, mətni tarixə, vahidə və valyuta çevrilməsinə çevirin.
  • Rənglər, Paging Subtotals, Advanced Sort və Super Filter tərəfindən sayılan,
  • Daha çox seçin / Insert / Sil / Mətn / Biçim / Bağlantı / Yorum / Çalışma kitabları / Çalışma Qurğuları Tools ...

Excel üçün Kutools-un ekranı

Say something here...
symbols left.
You are guest ( Sign Up? )
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.

Be the first to comment.