作者olivefox (Olive)
看板Office
標題[算表] vba 合併工作表內容
時間Sun Dec 25 02:32:29 2016
軟體:excel
版本:excel2016
我有一個excel檔案(假設叫excelA)，包含很多個sheets(假設s1.s2,s3,s4)；
以及一個資料夾，底下有好幾個excel(假設叫excelB ,excelC, excelD)，
資料夾下的這些excel都只有一個名稱叫'details'的工作表，而且'details'的E2欄位，
都可以對得上excelA的其中一個工作表名稱
(比如: excelB的E2欄位值可能為s3, excelC的E2欄位值可能為s4)。
我要做的是合併工作表；合併的方式是這樣:
比對資料夾下的每個excel其E2欄位和excalA的sheet，
若有相符的話，將excelA的該sheet內容，貼至資料夾下的那個excel中；
比如打開excelB，發現其E2欄位值為s3，
我就找尋excelA中的工作表's3'，並將's3'工作表整頁貼到excelB中。
ExcelB會因此變成有兩個工作表在裡面，
一個是原來的'details'，一個是新增的's3'
希望可以有好心高手幫忙寫vba，因為我不大會...都只能一個一個貼..
感激不盡><
--
※ 發信站: 批踢踢實業坊(ptt.cc), 來自: 114.36.43.243
※ 文章網址: https://webptt.com/m.aspx?n=bbs/Office/M.1482604352.A.CDC.html
1F：→ soyoso: 1.開啟資料夾內檔案，可用迴圈配合dir() 12/25 11:39
2F：→ soyoso: 2.是否相符，則以判斷if配合instr，相符則worksheet.copy 12/25 11:43
3F：→ soyoso: 還有workbooks.open配合dir()取得檔名，和workbooks.close 12/25 11:53