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的已用行数的主要内容,如果未能解决你的问题,请参考以下文章

VBA excel中批量创建超链接代码(连接当前文档中的sheet)

Excel中如何用VBA判断行数?

在excel中用VBA如何实现对非空单元格行数的统计。

excel vba 不遵循保存路径并保存在我的文档中

如何在EXCEL软件里自动生成目录清单?

excel如何用vba批量提取指定工作表?