Satır silmek

[mesutaygun70]

Sayfa 3 ün C1:C100 arası formül içeren boş hücrelerin bulunduğu satırları nasıl silebilirim.

 

[Baggwell]

ilgili sütunu seçin,

F5 > Özel > Boşluklar > Tamam

 

[Ömer BARAN]

Sayfa 3 ün C1:C100 arası formül içeren boş hücrelerin bulunduğu satırları nasıl silebilirim.

ilgili sütunu seçin,

F5 > Özel > Boşluklar > Tamam

Merhabalar, bir uyarıda bulunmak isterim.
Açılış mesajınızda formül içeren demişsiniz, formüllerin değer üretmemesi BOŞ oldukları anlamanıa gelmediğine göre, sileceğiniz satırlardaki hücrelere atıflar içeren diğer satırlardaki formülleriniz #BAŞV! şeklinde hata verecektir.

 

[mesutaygun70]

Sub işlemyap1()
For i = 1000 To 1 Step -1
If Cells(i, 4) = "" Or Cells(i, 4) = 0 Then
Rows(i).EntireRow.Delete
End If
Next
End Sub

Bu kodu a sutunu 1-1000 arası değilde a sununudaki son dolu hücreye kadar şeklinde değiştirmek için nasıl bir değişiklik yapabilirim.