(十四)VBA常用基础知识：当前excel文件所有sheet循环，获取sheet名,获取最大行数最大列数

本文主要是介绍(十四)VBA常用基础知识：当前excel文件所有sheet循环，获取sheet名,获取最大行数最大列数，希望对大家解决编程问题提供一定的参考价值，需要的开发者们随着小编来一起学习吧！

1. 获取当前excel的所有sheet以及sheet名
   

Sub test()Dim ws As WorksheetFor Each ws In Worksheetsws.ActivateDebug.Print ws.NameNext ws
End Sub
输出结果：
Sheet1
Sheet2
Sheet3
Sheet4
Sheet5

2.获取最大行数
首先要明白取最大行的方式，为什么这样取
正常来说ctrl+下箭头，能够获得最大行，但是如果中间有空行就不好用了，所以大家都是反着来，取得是从1048576开始ctrl+上箭头所得到的行数就是最大行

Sub test()Dim lastrow As Longlastrow = Worksheets("Sheet5").Cells(Rows.Count, 1).End(xlUp).RowDebug.Print lastrow
End Sub
执行结果：16 

3.获取最大列数

Sub test()Dim lastcolumn As Longlastcolumn = Worksheets("Sheet5").Cells(1, Columns.Count).End(xlToLeft).ColumnDebug.Print lastcolumn
End Sub
执行结果：
6

这篇关于(十四)VBA常用基础知识：当前excel文件所有sheet循环，获取sheet名,获取最大行数最大列数的文章就介绍到这儿，希望我们推荐的文章对编程师们有所帮助！

---