Menghitung baris atau sel yang aktif

Pada artikel sebelumnya saya telah share cara mengetahui sel yang aktif, bagi anda yang melewatkanya anda bisa membacanya kembali pada link dibawah ini

VBA mencari sel aktif

Menghitung baris atau sel yang aktif - Berikut ini kode untuk menghitung baris atau sel yang aktif

Private Sub CommandButton1_Click()
Set Macro = Sheets("Sheet1")
Macro.Range("C2").Value = Macro.Cells(Macro.Rows.Count, "A"). _
    End(xlUp).Offset(0, 0).Row - 0
End Sub

Jumlah baris atau sel ayang aktif akan ditunjukan pada range C2, jika anda menginginkan muncul kotak dialog anda bisa modifikasi kode macronya seperti ini

Private Sub CommandButton1_Click()
Set Macro = Sheets("Sheet1")
MsgBox "Jumlah baris aktif : " & Macro.Cells(Macro.Rows.Count, "A"). _
    End(xlUp).Offset(0, 0).Row - 0