作者：乔山办公网日期：
返回目录：excel表格制作
选择第一行向左的单zhidao元格版Cells(1, Columns.Count).End(xlToLeft)
如果想要该单元格的列数，可以在后面权添加.column
Cells(2, Columns.Count).End(xlToLeft).Column
意思:在多列中，求最后1个数据所在的列？
不想去看23对应字母，如下也能得到结果。
range("A65536").offset(0,22).end(xlup).row
1、首先打开数据，在数据工作表上copy，第一行是日期，下面是数据，要求可以自动获取每一行最后一个数值的日期，如图。
2、首先在工作表上，找到下方的工作表标签，这里是sheet5，在工作表标签上右键，而后在弹出的选项里面，找到查看代码选项。
3、点击查看代码，而后进入VBA编辑窗口，在这里可以输入常用的命令，用来对前台的工作表进行控制。
4、在VBA编辑窗口输入代码，值得说明的是没有用sub，因为sub开始的代码，要用按钮控制，这种事自动运行的。
5、输入代码后，点击关闭，关闭VBA的编辑窗口，而后返回到工作表界面，发现日期一列没有反应，这里是因为没有进行任何操作或是刷新。zd
6、在工作表窗口任意一个地方双击一下，就相当于刷新工作表，而后可以看到，最后一次出现的数据，全部加载完成。