Belirli bir sütunda bulunan belirli metne dayalı olarak tüm satırları silmek için size yardımcı olacak bir VBA kodunun peşindeyseniz, bu makale tam size göre. Bu makalede, belirli bir metin bir sütunda bulunursa bir satırın nasıl silineceğini öğreneceğiz.
Soru): B sütununda "B Ürünü" olan satırlara ihtiyacım olan bir dosyam var. Geri kalan her şeyi silmek istiyorum. Birisi bana bir makro yazmama yardım edebilir mi? Sahip olduğumuz verilerin anlık görüntüsü aşağıdadır: 
Aşağıdaki adımları izlememiz gerekiyor:
- Geliştirici sekmesine tıklayın
- Kod grubundan Visual Basic'i seçin
Standart modüle aşağıdaki kodu girin:
Alt DeleteRow()
Sheet1.Cells(1).CurrentRegion.Columns(2) ile
.Otomatik Filtre 1, "Ürün B"
.Tüm Satır.Sil
İle bitmek
Alt Bitiş
Kod açıklaması:
Adım 1) Yukarıdaki kod, 2. sütundan, yani Ürün sütunundan geçerli bölgeyi seçecektir.
Adım 2) Filtre Uygulayın
Adım 3) Görünür hücreler tüm satırla birlikte silinecektir. Kodu silin. Verilerin geri kalanı, yani Ürün B'nin B sütununda bulunduğu yer bizim çıktımız olacaktır.
Bu şekilde VBA kodunu kullanarak belirli koşulları sağlayan satırları silebiliriz.
İndir - Koşullara göre satırları sil - xlsm