在看一本書的時候沒搞明白例子上寫的一句話，如上。
經調試才搞明白。分享給大家。
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, x
lToRight,
xlToLeft
功能分別為 End+DOWN,
END+
RIGHT
,
END+
LEFT.
這樣
Cells(Rows.Count, 1).End(xlUp)就是沿着單元格“
A
1048576
”向上尋找第一列第一次出現的非空單元格。
連起來
Cells(Rows.Count, 1).End(xlUp).Row，就是取第一列第一次出現的非空單元格的行號
ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Row + 1，自然就是取該非空單元格的下面的空單元格，以便進行輸入等操作。
比如下面事例，將把數據插入到工作表中的系一個空白行，這里A7為下一個空白行。
