VBA Son Satır Sayısını Elde Etme

Aşağıda ki kodu ben oldukça sık kullanırım.

Sub sonsatir()
Dim ws As Worksheet
Dim son As Integer
 
Set ws = Worksheets("Sayfa1")
 
son = ws.Cells(Rows.Count, 1).End(xlUp).Row
 
End Sub

Kolay gele…

İlk Yorumu Siz Yapın

Bir yanıt yazın

E-posta adresiniz yayınlanmayacak. Gerekli alanlar * ile işaretlenmişlerdir