Powered By Blogger

2020年2月16日 星期日

EXCEL VBA 將同一人的數筆資料合併成一筆資料(多列變一列)!

1.圖中的原始資料表格是貨運公司依日期每天建立每位司機出車的流水資料,包含出車日期、地點、項目及應收帳款等欄位。
2.每位司機的出勤資料會散布在不同列
3.若每個月結束後,要整理每個司機在該月份的出勤次數、地點、項目、金額等資料,那將其合併在同一列會比較恰當。
4.合併結果如圖中下方合併後資料表格。




這裡下載範例檔!(請不要在google雲端內執行,請下載後用office excel開啟)

5.下載後執行之,此時只有一個"原始資料"工作表(內有範例資料)。請按下"啟用內容"


6.(1)點選 "檢視"  =>  (2)選取 "巨集"  =>  (3)選取 "檢視巨集"


7.(1)選取 "arrangement"巨集程式  =>  (2)點選 "執行"鈕,開始跑程式


8.一段時間後程式跑完,跳出轉換完成對話框,請按"確定"鈕。此時產生另一"同人多列變一列"工作表。


9.完成結果如下


10.VBA程式請自行參閱檔案中VBA Project裡模組內的"Module 1"(密碼:108)
     其實裡面有些修飾性的程式碼並不是核心功能,是可以不要的,例如:"畫框線"功能、"調整版面"功能.......。


11.謝謝收看!歡迎批評、指教。











沒有留言:

張貼留言

本網誌其它"軌跡"

// 以下為新增的程式碼 FOR 文章分類 // 以上為新增的程式碼 FOR 文章分類