Soru sıfır satırları silme

incsoft

Altın Üye
Katılım
18 Ağustos 2009
Mesajlar
731
Excel Vers. ve Dili
Office Ev ve İş 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
12-12-2024
A:W aralında çalışan ve N sütununda olan tüm satırları silmek için nasıl bir macro kullanabilirim arkadaşlar? Diğer sorularda buna benzer sorular gördüm ancak onlarla yaptıramadım arkadaşlar.

Teşekkürler..
 

Ekli dosyalar

BaY_KaPTaN

Kürşat
Altın Üye
Katılım
4 Mart 2008
Mesajlar
85
Excel Vers. ve Dili
Office 2007 Türkçe
Altın Üyelik Bitiş Tarihi
04-10-2028
Soru içeriğinde yazmamışsınız ama konuyla soruyu birleştirince, N sütunundaki 0 olan satırları silmek istiyorsunuz sanırım.
Doğru anladıysam aşağıdaki kodu deneyebilirsiniz.

Kod:
Sub SİL()
    For x = [N65536].End(3).Row To 1 Step -1
    If Cells(x, "N") = "0" Then Rows(x).Delete Shift:=xlUp
    Next
End Sub
 

relaxim

Altın Üye
Katılım
30 Ağustos 2009
Mesajlar
527
Excel Vers. ve Dili
Ofis 2016 Tr 64 bit
Altın Üyelik Bitiş Tarihi
15.06.2027
Merhaba
İstediğiniz N sütununu silmek ise aşağıdaki kodu bir butona atayabilirsiniz.

Columns("N:N").Select
Selection.ClearContents
 

incsoft

Altın Üye
Katılım
18 Ağustos 2009
Mesajlar
731
Excel Vers. ve Dili
Office Ev ve İş 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
12-12-2024

relaxim

Altın Üye
Katılım
30 Ağustos 2009
Mesajlar
527
Excel Vers. ve Dili
Ofis 2016 Tr 64 bit
Altın Üyelik Bitiş Tarihi
15.06.2027
Merhaba

Ne kadar sileceksiniz? Tümü demişsiniz. Örnekte açıklayabilir misiniz?
 

BaY_KaPTaN

Kürşat
Altın Üye
Katılım
4 Mart 2008
Mesajlar
85
Excel Vers. ve Dili
Office 2007 Türkçe
Altın Üyelik Bitiş Tarihi
04-10-2028
bu tamamını siler ama bildiğim
2 numaralı cevabımda doğru anladıysam N sütununda 0 olan satırları siliyor.
Ha sadece N'de 0 olan tekil hücreleri silin diyosanız aşağıdakini kullanın
Kod:
Range("N:N").Replace What:="0", Replacement:="", LookAt:=xlPart
 

incsoft

Altın Üye
Katılım
18 Ağustos 2009
Mesajlar
731
Excel Vers. ve Dili
Office Ev ve İş 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
12-12-2024
Teşekkürler arkadaşlar
 

incsoft

Altın Üye
Katılım
18 Ağustos 2009
Mesajlar
731
Excel Vers. ve Dili
Office Ev ve İş 2021 - Türkçe
Altın Üyelik Bitiş Tarihi
12-12-2024
2 numaralı cevabımda doğru anladıysam N sütununda 0 olan satırları siliyor.
Ha sadece N'de 0 olan tekil hücreleri silin diyosanız aşağıdakini kullanın
Kod:
Range("N:N").Replace What:="0", Replacement:="", LookAt:=xlPart

N sütünunda değeri 0 olan satırlar silinecek
 
Üst