• DİKKAT

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

iki koşullu satır silme

Katılım
28 Ocak 2010
Mesajlar
92
Excel Vers. ve Dili
Office 2003
Office 2007
Merhabalar,
belirticeğim iki farklı sütunda hücrelerin boş olmasın durumunda o sarırın macro ile silinmesini istemekteyim macro ile mümkünmüdür.
 
Mümkündür, aşağıdaki şekilde kullanabilirsiniz.
Kod:
Sub sil()
For i = [A65500].End(3).Row To 1 Step -1
    If Cells(i, [COLOR="red"]"C"[/COLOR]) = "" And Cells(i, [COLOR="Red"]"D"[/COLOR]) = "" Then Rows(i).Delete
Next
End Sub
Kırmızılar kontrol edeceğiniz sütunlar oluyor.
 
Son düzenleme:
Buyurun.:cool:
Kod:
Sub sil59()
Dim sat As Long, i As Long
sat = Cells(Rows.Count, "C").End(xlUp).Row
For i = sat To 1 Step -1
    If Cells(i, "C").Value = "" And Cells(i, "D").Value = "" Then Rows(i).Delete
Next
End Sub
 
Sayın mucit77 ve Orion1 ellerinize sağlık
Teşekkürler..
 
Geri
Üst