输入最后一个活动单元格

Question

我一直在COL中找到最后选择的答案，但我正在寻找的是如何让单元格在ROW中显示最后一个活动单元格

例如，您设置了某人购买东西的日期，并且您不希望一直看到最后一个活动单元格但是有一个单元格更新了最后一个活动单元格输入并且您立即知道该客户最后一次联系< / p>

http://i39.tinypic.com/2wnbrxy.jpg

Answer 1

FinalRow = Range("A65536").End(xlUp).Row
do While trim(cells(FinalRow,1)) = ""
FinalRow = FinalRow - 1
Loop

---

FinalColumn = Range("IV1").End(xlToLeft).Column
Do While trim(Cells(1,FinalColumn)) <> ""
FinalColumn = FinalColum - 1
Loop

Answer 2

假设所有数据都是连续的，您可以使用类似这样的公式：

=INDIRECT("A" & COUNTA(A:A))

否则你可以像这样在VBA中获取最后一行：

ActiveSheet.UsedRange.Rows.Count