Excell'de boş hücrelerin bulunduğu satırları silmek

Posted by ismail şimşek | Posted in Pratik Bilgiler | Posted on 15-02-2009-05-2008

0

Evet başlık biraz garip ama bunu resimle göstermeden açıklayamam sanırım. aşağıdan resmi önce inceleyin.

excell

Resmi incelediyseniz açıklamaya geçeyim. Gördüğünüz resim yazları memlekette çalıştığım eczanede bulunan ilaçların sıralı listesi. Satır sütunda sayı olan satırlardaki ilaçlar eczanede bulunan ilaçlar. Diğerleri ise yok. Biz de sadece elimizde bulunan ilaçları yazdırmak istiyoruz. Ama diğer ilaçların bulunduğu satırları tek tek silmek büyük problem. hepsini yazdırmakta akıl karı iş değil. Tek çözüm küçük bir makro yazmak. İnternette küçük bir araştırma yaptım ve tam bizim sorunumuza uygun bir çözüm buldum.

Makro düzenleme ekranında şu kodu yazıp çalıştırıyoruz.

Sub silme()
[b1:b9].SpecialCells(xlCellTypeBlanks).EntireRow.Delete
End Sub

Sub silme() makromuza verdiğimiz isim siz dilediğiniz aşka bir isim verebilirsiniz.

[b1:b9] b1 hücresi ile b9 hücresi arasındaki hücreleri kontrol edip boş olan varsa hücrenin bulunduğu satırı silecek sadece işimize yarayanlar kalacaktır.

Herkese kolay gelsin.

Write a comment

Anti-Spam Protection by WP-SpamFree