使用VBS统计同一文件夹中多个excel表的行数


有多个excel表,需要统计出每个excel表中有多少行

VBS代码如下:

 

 1.在excel所在文件夹中新建文本,将代码粘贴到文本中,注意编码方式改为ANSI,否则运行时可能会报错。

2.将文件保存,文件名随意命名,将txt改为vbs。

3.确保所有excel文件都关闭,所有文件都在同一级目录

4.双击运行vbs文件,会弹出一个excel的界面,这个excel列出所有文件名、sheet名和每个sheet的行数。

注意:

  1.如果文件后缀为xls需要将况红位置做修改  If Right(fileName, 4) = ".xls" Then

  2.代码统计的为最后一行所在的行数,无论前面有多少空行

  3.excel文件需在同一个文件夹中

 ————欢迎大家沟通、指正---- QQ群:1071136320————


免责声明!

本站转载的文章为个人学习借鉴使用,本站对版权不负任何法律责任。如果侵犯了您的隐私权益,请联系本站邮箱yoyou2525@163.com删除。



 
粤ICP备18138465号  © 2018-2025 CODEPRJ.COM