利用記事本輔助將EXCEL大量工作表合併成一個表?

Tags: 作者, 記事本,

EXCEL大量工作表合併成一個表,又不會用巨集怎麼辦?用記事本吧,簡單易行

工具/原料

記事本 excel

方法/步驟

先開啟要合併的EXCEL表

利用記事本輔助將EXCEL大量工作表合併成一個表

開啟記事本,輸入以下內容:

Set book = GetObject(, "Excel.Application").ActiveWorkbook

For i = 2 To book.Sheets.Count

book.Worksheets(i).UsedRange.Copy book.Worksheets(1).Cells(book.Worksheets(1).UsedRange.Rows.Count + 1, 1)

Next

msgbox "ok!"

利用記事本輔助將EXCEL大量工作表合併成一個表

另存為 合併.vbs

利用記事本輔助將EXCEL大量工作表合併成一個表

執行這個檔案

利用記事本輔助將EXCEL大量工作表合併成一個表

檢視合併後的excel檔案

利用記事本輔助將EXCEL大量工作表合併成一個表

通過簡單賽選等操作,可以去掉重複表頭

利用記事本輔助將EXCEL大量工作表合併成一個表

注意事項

要處理的表應該是當前活動表

相關問題答案