VB怎样提取excel里的最后一个写入单元格的行列

如题

---

VB code:

'不知道你是不是要这个：
'vba代码如下：
行号 = ActiveCell.Row
列号 = ActiveCell.Column
'VB中用时，加上VB中创建excel的对象

'以下也是常用的:
'vba代码如下：
nLR = ActiveSheet.Cells.SpecialCells(xlLastCell).Row '最后一行（与连续与否无关）
nLC = ActiveSheet.Cells.SpecialCells(xlLastCell).Column '最后一列（与连续与否无关）
Nextcol = Cells(nLR, 1).End(xlToRight).Column '查找最后一行最后一列（与连续与否无关）
Nextrow = Cells(1, nLC).End(xlDown).Row '查找最后一列最后一行（与连续与否无关）
'VB中用时，同样加上VB中创建excel的对象

---

关注

---

我要的是，当有一个excel文件已经被写到第二行第三列了，那我要在下一次打开这个文件的时候接着对这个文件写。这时就得知道，这个文件写到哪了，也就是要清楚这个文件的上一次最后写入最后一格的行与列。

---

如果你的表格是矩形的，用以下语句可以完成：
nLR = ActiveSheet.Cells.SpecialCells(11).Row        '最后一行（与连续与否无关）
nLC = ActiveSheet.Cells.SpecialCells(11).Column      '最后一列（与连续与否无关）

---

如果你输入完最后一个单元格后，没有移动过活动单元格（即黑框套住的单元格）可以如下：
行号 = ActiveCell.Row
列号 = ActiveCell.Column

---

nLR = ActiveSheet.Cells.SpecialCells(xlLastCell).Row        '最后一行（与连