VB定位到A列最后一个不等于空的单元格上？ vba判断单元格不为空

• 如何用excel vba查找某一行最后一个非空单元格
• 用VBA找A列的最后一个非空单元格的行号加1，这个代码怎么写？要求从下向土查找
• VBA找出一列中最后一个非空单元格
• Excel VBA 找到某一行的最后一个非空单元格 用VBA代码怎么写阿 本人VBA小白

如何用excel vba查找某一行最后一个非空单元格

可以用下面的语句：

最后一个值 = Sheets("sheet1").Range("A65535").End(xlUp).Value

用 col=range("C1").end(xltoright).column '找到最后非空一列

语句可能存在问题：当A1至A5数据连续时，该语句能返回正确

的结果，但当不连续时，将得不到最后一个非空结果

如

1

2

4

5

将只得到2，而不是5（其中3是空白，如果3有数值，将得到5）

用VBA找A列的最后一个非空单元格的行号加1，这个代码怎么写？要求从下向土查找

sheet2.cells(cells.rows.count,1).end(3).row+1

VBA找出一列中最后一个非空单元格

假设你要操作的列号是ColumnNo

那么该列最后一个非空单元格的行号是

Cells(65536, ColumnNo).End(xlUp).Row

有行号列号，搞定。

相当于手选该列最后一格，再按下END+UP 组合键.

Excel VBA 找到某一行的最后一个非空单元格 用VBA代码怎么写阿 本人VBA小白

iCol=Cells(1,colunms.count).end(xltoleft).column

这是第1行的