kodlardaki boş satırları temizleme

Merhaba Hocalarımız Sorum şudur: Basitçe şu kodda olduğu gibi Sub Test() [A2] = "Deneme" End Sub Dosyalarımdaki Vba tarafındaki kodlarda, üstteki örnekte olduğu gibi çok fazla boş satırlar vardır. Bunları derli toplu hale getirebilmek için silmek istiyorum. Elle yapmak hem zor...