Excel Boş Satır Silme

Excel Boş Satır Silme, veri aralarında kalan tamamen boş satırları makro ile temizleyen hazır bir çalışma dosyasıdır. Dosyadaki örnek liste üzerinde işlem denenebilir, makro kendi listelerinizde de çalıştırılabilir.

Dosya makro içerir (.xlsm), açarken makroları etkinleştirmeniz gerekir.

Dosyanın içeriği​

• Sheet1: A1:H1739 aralığında örnek veri bulunur. A, C, E ve G sütunlarında 1 ile 99 arasında sayılar yer alır; 3, 10 ve 11. satırlar gibi bazı satırlar tamamen boştur.
• Module1: DeleteEmptyRows adlı makroyu içeren VBA modülüdür.

Dosyada çalışma sayfası formülü kullanılmamıştır; işlem tamamen makro ile yapılır.

Makrolar​

DeleteEmptyRows makrosu etkin sayfanın kullanılan alanını (UsedRange) belirler ve son satırdan birinci satıra doğru geriye giden bir döngüyle her satırı kontrol eder. Satırdaki dolu hücre sayısı CountA ile sayılır; sonuç 0 ise satır silinir ve sayaç bir artırılır. Tarama alttan üste yapıldığı için silme sırasında satır numaraları kaymaz. İşlem boyunca ScreenUpdating kapatılır, böylece binlerce satırda bile hızlı çalışır. Bittiğinde bir MsgBox ile silinen boş satır sayısı bildirilir.

Makro yalnızca satırın tamamı boşsa silme yapar; içinde en az bir değer bulunan satırlara dokunmaz. Kod dosya silme veya dışarıya bağlantı gibi işlemler içermez.

Nasıl kullanılır​

1. Dosyayı açın ve güvenlik uyarısında makroları etkinleştirin.
2. Temizlenecek verinin bulunduğu sayfayı etkin hale getirin; makro etkin sayfada çalışır.
3. Alt+F8 tuşlarıyla makro listesini açın, DeleteEmptyRows makrosunu seçip Çalıştır düğmesine tıklayın.
4. İşlem bitince görüntülenen mesajda silinen boş satır sayısını kontrol edin.
5. Kendi verinizde kullanmak için makroyu içeren modülü VBA düzenleyicisinden (Alt+F11) kendi çalışma kitabınıza aktarın.

Silme işlemi geri alınamayacağı için önemli verilerde önce dosyanın bir kopyasını almanız önerilir.

Konuyla ilgili ayrıntılı anlatım için Excel Boş Satırları Silme yazısına bakabilirsiniz.