举例说明。第一步:编写宏代码。代码如下:Sub 当前行号()Dim a As Integera = ActiveCell.RowMsgBox "当前行号=" & str(a)End Sub第二步:运行宏“当前行号”。如图:运行结果如图:
你的意思是想知道表格中有多少行数据么?我有一个方法:Range("a65536").End(xlUp).Row 返回值是一个整数,是当最后一行被使用的单元格的行数。当然方法有好几个,但我通常比较喜欢使用这个方法,当然好多人也喜欢用这个方法。它所以的功能类似在Excel中最后一行按住End键不放,然后再按向上的方向键,得到最后一个被使用的单元格的位置,然后通过Row属性返回行数。绝对可靠而且高效,不信你可以试验一下。
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可以获得区域中第一块的第一行行号、第一列列号,所得值均以十进制数表示。