Hücre değeri sıfır olan satırı silmek

[salimer]

teklif hazırlama dosyasında yapacak olduğum teklifler için 6-7 sayfalı bir exel dosyası hazırladım.Ürünler ana sayfadan diğer sayfalardaki ürünlerden çekiliyor ama ana sayfada olup kullanmadığım ürünler hücrede 0 olarak görünüyor.Kullanılmayan hücre değeri sıfır olan satırları silmek istiyorum.Şimdiden teşekkür ederim.

 

[acar6783]

Deneyin;,
alttan başlayıp yukarı doğru a sütununda değeri sıfır olan satırları siler

Sub sıfır_sil()

For s = Cells(Rows.Count, "A").End(3).Row To 1 Step -1

If Cells(s, "A") = 0 Then
   Rows(s).Delete Shift:=xlUp
End If
Next s

End Sub

 

[salimer]

Deneyin;,
alttan başlayıp yukarı doğru a sütununda değeri sıfır olan satırları siler

Sub sıfır_sil()

For s = Cells(Rows.Count, "A").End(3).Row To 1 Step -1

If Cells(s, "A") = 0 Then
   Rows(s).Delete Shift:=xlUp
End If
Next s

End Sub

olmadı yada ben yapamadım üstad isterseniz dosyayı ekleyeyim

 

[acar6783]

Yani tabi dosya görmeden hatayı görmek zor ????

 

[Korhan Ayhan]

Sıfır görünen hücredeki formülü foruma eklerseniz sanırım sorunu anlayabiliriz.