作者：乔山办公网日期：
返回目录：excel表格制作
如图，获取I列最后一个单元格的数据，用公式就行了。
不知你想要在什么状况下获取行号和列号？一下几点或许能帮你。
1、在VBA中环境中
获取最后一行有数据的单元格的行号的代码如下
dim i as long
i=sheet1.range("a65536").end(xlup).row
获取最后一列有数据的单元格的列号的代码如下
dim i as long
i=sheet1.range("iv1").end(xlleft).column
2、想知道表格最多有多少行，在a1单元格输e799bee5baa6e59b9ee7ad94334入公式
=countblack(b:b)
想知道表格最多有多少列，在a1单元格输入公式
=countblack(2:2)
3、在工作表中，想取得一列或一行中最后一个有数据的单元格的行号或列号
如果单元格是连续的，中间没有空单元格，可以输入公式=counta(a:a)或=counta(1:1)
如果单元格区域中间有空单元格，可以输入公式，然后按下Ctrl+Shift+Enter键结束公
式编辑
=max(if(a1:a20000="",0,row(a1:a20000))
=max(if(1:1="",0,column(1:1))
1、首先打开数据，在数据工作表上，第一行百是日期，下面是数据，要求可以自动获取每一行最后一个数值的日期，如图。
2、首先在工作表上，找到下度方的工作表标签，这里是sheet5，在工作表标签上右键，而后在弹出的选项里面，找到查看代码选项。
3、点击查看代码，知而后进入VBA编辑窗口，在这里可以输入常用的命令，用来对前道台的工作表进行控制。
4、在VBA编辑窗口输入代码，值得说明的是没有用sub，因为sub开始的代码，要用按钮控制，这种事自动运行的。
5、输入代码后，点击关闭，关闭VBA的编辑窗口，而后返回到工作表界面，发现日期一列没有反应，这里是因为没有进版行任何操作或是刷新。
6、在工作表窗口任意一个地方双击一下，就相当于刷新工作表，而后可以看到，最后一次出现的数权据，全部加载完成。
获取A列最后1行
中间没有空行时
=INDEX(A:a,COUNTIF(A:a,"<>"))
或用代码