动态的获取excel中最后一条数据所在的行数

来源:互联网 发布:电信网络诈骗50万以上 编辑:程序博客网 时间:2024/06/12 22:24

动态的获取excel中最后一条数据所在的行数

Sub Test ()

   Dim totalRow  As Integer

  '获取含有数据的最后一行行号

   totalRow = Worksheets("sheet1").UsedRange.Find(what:="*", searchorder:=xlByRows, searchdirection:=xlPrevious).Row

End Sub

0 0
原创粉丝点击