有多個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————