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

在sheet1第一行中引用单元格的内容(a1:a5,也可能是a1:a8,引用的单元格数不固定)然后在sheet2第一行中的C1单元格之后(d1、e1.....)插入内容,要找到这行的最后一个非空单元格,并在这个单元格后再调用其它内容,该如何写代码。在这里先谢谢了!

可以用下面的语句:
最后一个值 = Sheets("sheet1").Range("A65535").End(xlUp).Value

用 col=range("C1").end(xltoright).column '找到最后非空一列
语句可能存在问题:当A1至A5数据连续时,该语句能返回正确
的结果,但当不连续时,将得不到最后一个非空结果

1
2

4
5
将只得到2,而不是5(其中3是空白,如果3有数值,将得到5)
温馨提示:内容为网友见解,仅供参考
第1个回答  2010-12-22
col=range("C1").end(xltoright).column '找到最后非空一列
cells(3,col)即为你所想要的单元格本回答被提问者采纳
相似回答