Excel VBA 统计一个文档中所有sheet的已用行数-白红宇的个人博客

发布日期：2021-06-29 01:08:02 浏览次数：4 分类：技术文章

本文共 266 字，大约阅读时间需要 1 分钟。

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

转载地址：https://blog.csdn.net/youxianzide/article/details/81713823 如侵犯您的版权，请留言回复原文章的地址，我们会给您删除此文章，给您带来不便请您谅解！

上一篇：增删改的SQL用法

下一篇：VBA excel中批量创建超链接代码（连接当前文档中的sheet）

发表评论

关于作者

喝酒易醉，品茶养心，人生如梦，品茶悟道，何以解忧？唯有杜康！

-- 愿君每日到此一游！

推荐文章

【vue系列】在Vue项目中使用Sass-----（scss）安装详解，新手跟着做即可 2019-04-29

elementui 表格上加小问号鼠标移入提示文字 2019-04-29

layui富文本编辑器的使用 2019-04-29

laydate日期插件时间 2019-04-29

h5页面微信分享代码 2019-04-29

phpqrcode生成二维码及使用方法 2019-04-29

php获取指定日期的上一个月和下一个月的日期 2019-04-29

jsp脚本、jsp表达式、jsp声明三者的区别。 2019-04-29

python网页解析器 2019-04-29

linux安装svn并设置自启动 2019-04-29

svn常用命令 2019-04-29

python2网页采集案例 2019-04-29

svn的服务端配置 2019-04-29

python3 urllib和requests模块 2019-04-29

Axure常见的几种原型图 2019-04-29

svn的checkout与export的区别与使用 2019-04-29

js实现点击复制功能 2019-04-29

phpquery采集案例 2019-04-29

jsp内置对象request的常用方法 2019-04-29

javascript 0和-0 2019-04-29

白红宇的个人博客 - 记录点点滴滴的事 - 您是第 309320469 位访客

发表评论

最新留言

关于作者

推荐文章