• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

değeri "0" olan satırları silmek

C sütununa 0 değerine göre filtre uygulayın, görünen satırları seçin ve silin.
 
Yukarıdaki önerimin vba kodları, silinecek satırların 2 satırdan başladığını, 1 satırın başlık olduğunu varsaydım.
Kod:
Sub Makro1()
Say = Cells(Rows.Count, "C").End(3).Row
    ActiveSheet.Range("C:C").AutoFilter Field:=1, Criteria1:="0"
Rows("2:" & Say).Delete
Cells.AutoFilter
End Sub
 
#16 nolu mesajımda ki kodu özelden paylaştığınız (özel bilgiler içeriyor) dosyanıza göre revize ettim. Deneyiniz.
 
Geri
Üst