如何在EXCEL VBA中获取行数

Alw*_*nda 3 excel vba

我正在用 excel 开发一个仪表板。我正在寻找计算行数。(存在多少条记录) ..

由于有一些空白单元格,我认为从下到上。我使用以下

   Range("A1048576").Select
Selection.End(xlUp).Select
Run Code Online (Sandbox Code Playgroud)

执行此操作后,活动单元格位于 A113,这意味着行数为 113。

我的问题是如何从活动单元格中获取这个数字 113?

Dmi*_*liv 6

你可以使用这个:

Dim lastrow as Long
lastrow = Cells(Rows.Count,"A").End(xlUp).Row
Run Code Online (Sandbox Code Playgroud)

lastrow将包含列中最后一个空行的数量A,在您的情况下为 113