Excel VBA 统计一个文档中所有sheet的已用行数

Posted Willa.Wang

tags:

篇首语：本文由小常识网(cha138.com)小编为大家整理，主要介绍了Excel VBA 统计一个文档中所有sheet的已用行数相关的知识，希望对你有一定的参考价值。

Sub countrownum()

    Dim i, num, rownum
    
    num = Worksheets.Count
    
    For i = 2 To num
    
        ‘Worksheets(i).Select
    
        rownum = WorksheetFunction.CountA(Worksheets(i).Columns("a:a"))
    
        Sheets(1).Cells(i, 5) = rownum
    
    Next
    
End Sub

 

以上是关于Excel VBA 统计一个文档中所有sheet的已用行数的主要内容，如果未能解决你的问题，请参考以下文章