Question

vb中有没有函数获取Excel中表格的行数？

Answer 1

Dim rng As Range
Dim i As Integer, j As Integer

Set rng = xl.ActiveSheet.UsedRange

i = rng.Rows.Count '已使用的行数
j = rng.Columns.Count'已使用的列数

但是建议你不使用这种方式，比如你的excel有3行，然后你在第5行里写入数据，然后再把写的数据删了，此时得到的行数还是5.只要用过了它就算在内

Answer 2

Range("A1").End(xlDown).Select
r1 = ActiveCell.Row
前提，A行不为空，且没有空行

Answer 3

用函数不行吗？row（）

追问

能不能说一下具体用法，谢谢

追答

你把你问题补充一下，说的具体点

Answer 4

和我有同样的问题 我也求解