• DİKKAT !

    Forum içeriğine ve tüm hizmetlerimize erişim sağlamak için foruma kayıt olmalı ya da giriş yapmalısınız. Foruma üye olmak Dosya Yükleme tamamen ücretsizdir.

    Giriş yap veya Şimdi kayıt ol

Çözüldü Kelime Bul ve Satır Sil

Bu konu çözüldü olarak işaretlenmiştir. Çözülmediğini düşünüyorsanız konuyu rapor edebilirsiniz.
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
RBozkurt

RBozkurt

Yeni Üye
Katılım
25 Ara 2021
Mesajlar
322
Çözümler
36
Aldığı beğeni
206
Katkı
%0.41
Excel V
Office 2021 TR
Konu Sahibi
Merhaba
Ekte örnek olarak eklediğim dosyada V Sütununda "Ölüm" ve "Kapalı" kelimelerini arama yapıp bulunan satırları komple nasıl sildirilebilir.
Teşekkür ederim 🙏
 

Ekli dosyalar

Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
Çözüm
E
Sheets("Kaynak2").Activate
Sheets("Kaynak2").Range("W1").Select

For k = Sheets("Kaynak2").Cells(Rows.Count, "H").End(3).Row To 2 Step -1
If Trim(Sheets("Kaynak2").Cells(k, 22)) = "Kapalı" Or Trim(Sheets("Kaynak2").Cells(k, 22)) = "Ölüm" Then
Rows(Sheets("Kaynak2").Cells(k, 22).Row).EntireRow.Delete
End If
Next
Tarihe göre sırala Oylara göre sırala
Sheets("Kaynak2").Activate
Sheets("Kaynak2").Range("W1").Select

For k = Sheets("Kaynak2").Cells(Rows.Count, "H").End(3).Row To 2 Step -1
If Trim(Sheets("Kaynak2").Cells(k, 22)) = "Kapalı" Or Trim(Sheets("Kaynak2").Cells(k, 22)) = "Ölüm" Then
Rows(Sheets("Kaynak2").Cells(k, 22).Row).EntireRow.Delete
End If
Next
 
Olumlu oy 1 Negatif oyla
Çözüm
Durum
Konu Çözümlendiği İçin Kapatılmıştır.
Geri
Üst