乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > <em>Excel</em> 如何通过<em>VBA</em>找出最后一

<em>Excel</em> 如何通过<em>VBA</em>找出最后一

作者:乔山办公网日期:

返回目录:excel表格制作


Excel中可以利用公式得到一个Sheet中有内容的最后一行

软件版本:Office2007

方法如下:

1.得到下表中有内容的最后一行行数:

2.输入公式如下:

公式解释:将区域内的单元格用if做判断,如果不为空,就返回它对应的行号,然后利用max函数就可以得到最大行

3.Ctrl+Shift+Enter三键结束数组公式,即得到最大行数:



1、首先打开数据,在数据工作表上,第一行是日期,下面是数据,要求可以自动获取每一行最后一个数值的日期,如图

2、首先在工作表上,找到下方的工作表标签,这里是sheet5,在工作表标签上右键,而后在弹出的选项里面,找到查看代码选项。

3、点击查看代码,而后进入VBA编辑窗口,在这里可以输入常用的命令,用来对前台的工作表进行控制。

4、在VBA编辑窗口输入代码,值得说明的是没有用sub,因为sub开始的代码,要用按钮控制,这种事自动运行的。

5、输入代码后,点击关闭,关闭VBA的编辑窗口,而后返回到工作表界面,发现日期一列没有反应,这里是因为没有进行任何操作或是刷新。

6、在工作表窗口任意一个地方双击一下,就相当于刷新工作表,而后可以看到,最后一次出现的数据,全部加载完成。


以下是以A列作为copy参照,另代码可简化,不需要用selection

Private Sub CommandButton1_Click()
row1 = Range("a65536").End(xlUp).Row
Range("k1:k" & row1).FillDown
End Sub 

或直接写成以下这样都可以,一句代码搞定:
Private Sub CommandButton1_Click()
Range("k1:k" & Range("a65536").End(xlUp).Row).FillDown
End Sub


1、打开数据表。

2、选中一个单元格,同时按键盘上的Ctrl+↓。

3、选中的单元格迅速就到了最后一行,同时按键盘上的Ctrl+↑。

4、选中一个单元格回到了首行,同时按键盘上的Ctrl+→。

5、选中一个单元格迅速到了最后一列,同时按键盘上的Ctrl+←。

6、又可以迅速回到首列。

7、还可以将鼠标移动到单元格下边框上,鼠标变成上下左右箭头时,双击。

8、选中单元格迅速跳到最后一行,将鼠标移动到单元格上边框上,鼠标变成上下左右箭头时,双击。

9、选中单元格迅速回到首列。

相关阅读

  • <em>Excel</em> <em>2013</em>不能在本地查&l

  • 乔山办公网excel表格制作
  • 如果是安装了帮助文件的话Alt+F11,然后按下F1即可调出VBA帮助文件我当年就是靠这个学习VBA的,2007版本不过现在多数都精简了,没有帮助文件了而2013版本都是联网帮助EXCEL没有VBA功能
关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网