son dolu satır

Merhabalar, Aşağıdaki kod ile son boş satırı bulabiliyoruz. Sheet1.Cells(Rows.Count, "A").End(xlUp).Row + 1 Ancak benim buldurmak istediğim boşluklu yapıda olan bir satırda ilk boş satırın satır numarası. VBA da nasıl kodlarız?

Değerli hocalarım kitap içerisinde de açıklamaları yazdım. Acceste yapılmış bir programdan veri çekiyoruz. Şablon olarak elimizde bulunan excel dosyasındaki sayfaların altına otomatik toplam ve genel toplam ile koşullu biçimlendirme yapmak istiyorum. Yardımlarınız için şimdiden teşekkürler.