Son Dolu Satırı Bulma (End xlUp)
Excel'de verileri alt alta kaydederken en büyük sorunumuz şudur: "Yeni veriyi kaçıncı satıra yazmalıyım?" Eğer her seferinde Range("A10") gibi sabit bir yer yazarsanız, eski verilerinizin üzerine yazıp onları silersiniz. İşte bu yüzden tablonun büyüklüğüne bakılmaksızın son dolu satırı otomatik bulan sihirli komut kullanılır: End(xlUp).
End(xlUp) Mantığı Nasıl Çalışır?
Klavyenizde Excel'in en son satırına (1,048,576. satır) gidip Ctrl + Yukarı Ok tuşlarına bastığınızı hayal edin. İmleç hızla yukarı fırlar ve karşısına çıkan ilk dolu hücreye çarparak durur. VBA'daki bu komut tam olarak bu klavye kısayolunun kod halidir!
Alt Alta Veri Ekleme Formülü (Ezberleyin!)
Profesyonel yazılımcıların her gün kullandığı standart son dolu satırı bulup bir alt satıra geçme kalıbı şöyledir:
Dim sonSatir As Integer
' A sütunundaki en son dolu satırı bul ve 1 ekle (yeni boş satır)
sonSatir = Cells(Rows.Count, "A").End(xlUp).Row + 1
' Yeni veriyi o boş satıra yapıştır
Cells(sonSatir, 1).Value = "Yeni Veri"