作者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://www.ptt.cc/bbs/Office/M.1482604352.A.CDC.html
→ soyoso: 1.開啟資料夾內檔案,可用迴圈配合dir() 12/25 11:39
→ soyoso: 2.是否相符,則以判斷if配合instr,相符則worksheet.copy 12/25 11:43
→ soyoso: 還有workbooks.open配合dir()取得檔名,和workbooks.close 12/25 11:53