2021-02-05 VBA获取最大行列区域

最新推荐文章于 2025-02-19 11:29:38 发布

虾的哥哥

最新推荐文章于 2025-02-19 11:29:38 发布

阅读量1.9k

点赞数

分类专栏： VBA

本文链接：https://blog.csdn.net/yuzhongdexia/article/details/113705635

版权

VBA 专栏收录该内容

10 篇文章

订阅专栏

Sub 获取最大行列区域()

Dim i
Dim j

i = Range("A" & Rows.Count).End(xlUp).Row '通过A1,获得使用的最大行
' i=Cells(Rows.Count, 1).End(xlUp).Row  '上面也可以使用这样的写法获得最大行
j = Cells(1, Columns.Count).End(xlToLeft).Column '通过A1,获得使用的最大列

 Range(Cells(1, 1), Cells(i, j)).Select '选中最大行列所包含的区域

  
End Sub