[算表] vba 合併工作表內容

看板Office作者 (Olive)時間9年前 (2016/12/25 02:32), 編輯推噓0(003)
留言3則, 1人參與, 最新討論串1/1
軟體: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

12/25 11:39, , 1F
1.開啟資料夾內檔案,可用迴圈配合dir()
12/25 11:39, 1F

12/25 11:43, , 2F
2.是否相符,則以判斷if配合instr,相符則worksheet.copy
12/25 11:43, 2F

12/25 11:53, , 3F
還有workbooks.open配合dir()取得檔名,和workbooks.close
12/25 11:53, 3F
文章代碼(AID): #1ONhz0pS (Office)
文章代碼(AID): #1ONhz0pS (Office)