vba获取最后一行行号
时间: 2023-08-17 16:06:16 浏览: 147
你可以使用以下VBA代码来获取最后一行的行号:
```
Dim lastRow As Long
lastRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row
```
这个代码假定你想要获取第一列的最后一行的行号。如果你想要获取其他列的最后一行的行号,只需要将代码中的第二个参数(即数字1)替换成你想要的列号即可。
相关问题
VBA, 列里最后一个单元格所在行
你可以使用以下VBA代码来获取某一列中最后一个单元格所在的行号:
```
Dim lastRow as Long
lastRow = Cells(Rows.Count, "A").End(xlUp).Row
```
上述代码中的"A"表示你要获取的列。你可以将其替换为你需要的列字母。这段代码使用`xlUp`参数从下往上查找最后一个非空单元格。`Rows.Count`返回指定工作表的总行数。`End(xlUp)`将光标移到指定范围的最后一个单元格。最后,`.Row`返回该单元格的行号。
VBA, 某行最后一列的列数
假设你要求的行号为row_num,可以使用以下代码获取该行最后一列的列数:
```
last_col = Cells(row_num, Columns.Count).End(xlToLeft).Column
```
其中,Cells(row_num, Columns.Count)是该行最后一列的单元格,.End(xlToLeft)是向左查找最后一个非空单元格,.Column是返回该单元格的列数。