Question

Excel宏当中，如何得到当前的行数

用什么属性，还是什么方法，怎么用，谢谢了

Answer 1

举例说明。

第一步：编写宏代码。代码如下：

Sub 当前行号()

Dim a As Integer

a = ActiveCell.Row

MsgBox "当前行号=" & str(a)

End Sub

第二步：运行宏“当前行号”。如图：

运行结果如图：

Answer 2

你的意思是想知道表格中有多少行数据么？

我有一个方法：

Range("a65536").End(xlUp).Row

返回值是一个整数，是当最后一行被使用的单元格的行数。

当然方法有好几个，但我通常比较喜欢使用这个方法,当然好多人也喜欢用这个方法。

它所以的功能类似在Excel中最后一行按住End键不放，然后再按向上的方向键，得到最后一个被使用的单元格的位置，然后通过Row属性返回行数。

绝对可靠而且高效，不信你可以试验一下。

Answer 3

Rows、Columns分别代表活动工作表、单元格区域范围Range、指定工作表中的所有行数、列数。对于一个多选单元格区域范围Range的Rows、Columns，只返回该范围中第一个区域的行数、列数。例如，如果Range对象有两个区域（areas）A1:B2和C3:D4，Rows.Count返回2而不是4。

可通过Rows(行号)、Columns(列号)来引用相应的行与列；如Rows(3)、Columns(4)分别对应第三行、D列。
利用Rows、Column可以获得区域中第一块的第一行行号、第一列列号，所得值均以十进制数表示。

Answer 4

j = 1
Do While Cells(j, 1) <> ""
’ 检测表格的行数
j = j + 1
’j 为表格的行数
Loop

Answer 5

回家帮你看看哦！
一时间想不好。不知道怎么表达。