統計每個月每個部門每天的統計人數


第一個工作簿:(每個月每天每間公司每個部門的用餐人數)

 

 

 

第二個工作簿:(每天每間公司每個部門的用餐人數的費用)

 

 

步驟:

(1)把《2020年6月各部門每日報餐人數統計》拆分成多份

參考網址:https://www.jianshu.com/p/28a84500188a

 

打開【2020年6月各部門每日報餐人數統計】文件,然后按ctrl+F11,輸入代碼,最后按【運行】

Sub sheet轉獨立文件()
Dim sht As Worksheet
Application.ScreenUpdating = False
ipath = ThisWorkbook.Path & "\"
For Each sht In Sheets
sht.Copy
ActiveWorkbook.SaveAs ipath & sht.Name
ActiveWorkbook.Close
Next
Application.ScreenUpdating = True
End Sub

 

 

(2)把步驟(1)中多個xlsx文件的后綴名修改為 csv

首先創建一個《新建文本文檔.txt》,然后輸入 ren *.xlsx *.csv ,保存並修改文件的后綴名為bat,雙擊bat文件,運行

 

 

 (3)把步驟(2)的csv文件合並成一份

新建【文本文檔】,輸入copy *.csv 合並文件.csv ,保存並修改文件的后綴名為bat,雙擊bat文件,運行,這會生成一份《合並文件.csv》

 打開【合並文件】后,發現全部都素亂碼

 

 

 

(4)使用透視表

如果正常的話,合並后的效果

 

 

注意:做透視表的時候需要把重復的標題刪除【日期 序號 公司 部門 人數】這一行刪除

 

 

 

 


免責聲明!

本站轉載的文章為個人學習借鑒使用,本站對版權不負任何法律責任。如果侵犯了您的隱私權益,請聯系本站郵箱yoyou2525@163.com刪除。



 
粵ICP備18138465號   © 2018-2025 CODEPRJ.COM