在看一本书的时候没搞明白例子上写的一句话,如上。 经调试才搞明白。分享给大家。 NextRow = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1 这句话的意思是 取活动单元表的第一列最后一个有值的行的下一行行号。 Rows.Count是指当前活动工作表的行数,为数字 1048576,很熟悉的一个数字,为Excel工作表的最大行数 Cells(Rows.Count, 1),则是定位到第一列的最后一行cell,即单元格“A1048576” 主要是End(xlUp)比较难理解。 Range.End属性是返回一个 Range 对象,该对象代表包含源 区域的区域尾端的单元格。 End(xlUp)等同于End mode下+UP键,或Ctrl+Up, 若活动单元格为空,其上一个单元格也为空,将会向上寻找该列第一次出现的非空单元格; 若活动单元格非空,其上一个单元格也非空,将会选中活动单元格所在列的最后一个非空单元格; 其上一个单元格为空,将继续向上寻找该列第一次出现的非空单元格,直到第一个单元格为止,如A1。 另外三个XlDirection常量为xlDown, xlToRight, xlToLeft 功能分别为 End+DOWN, END+RIGHT, END+LEFT. 这样Cells(Rows.Count, 1).End(xlUp)就是沿着单元格“A1048576”向上寻找第一列第一次出现的非空单元格。 连起来Cells(Rows.Count, 1).End(xlUp).Row,就是取第一列第一次出现的非空单元格的行号 ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1,自然就是取该非空单元格的下面的空单元格,以便进行输入等操作。 比如下面事例,将把数据插入到工作表中的系一个空白行,这里A7为下一个空白行。 补充内容 (2013-5-15 22:13): 上面有句话没说清楚,改一下: 若活动单元格非空,其上一个单元格也非空,将会向上选中活动单元格所在列的最后一个非空单元格; |
|