Son Dolu Satırın Bir Altına Yazdırma isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
Faydalanılması temennisiyle
Hazır Kod
VBA:
Sub AfterLast()
ActiveSheet.Range("A" & ActiveSheet.Rows.Count).End(xlUp).Offset(1, 0).Value = "İlk Boş Hücre"
End SubAçıklama
Koddaki örnek A sütun için geçerlidir. A sütununda diyelim 10. satırda bir şeyler yazılı. Kodu çalıştırdığınızda, A11 hücresine "İlk Boş Hücre" yazacaktır.Faydalanılması temennisiyle
