玖叶教程网

第一种方式：判断多列的最大行

1.maxrow = ThisWorkbook.Sheets("工作表名称").[C:D].Find("*", , xlValues, , , xlPrevious).Row

‘只查找数值

2.maxrow = ThisWorkbook.Sheets("工作表名称").[A:A].Find("*", , xlFormulas, , , xlPrevious).Row

'只查找公式

第二种方式:判断单列的最大行

1.maxrow=sheet1.range("a" & sheet1.rows.count).end(xlup).row ’求最大行数

2.maxcolumn=sheet1.cells(2,sheet1.columns.count).end(xltoleft).column '求最大列数，2指第二行。

相关参数：

row '行数

value '数值

address(0,1) '单元格地址