第一個工作簿:(每個月每天每間公司每個部門的用餐人數)
第二個工作簿:(每天每間公司每個部門的用餐人數的費用)
步驟:
(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)使用透視表
如果正常的話,合並后的效果
注意:做透視表的時候需要把重復的標題刪除【日期 序號 公司 部門 人數】這一行刪除