看板 Office 關於我們 聯絡資訊
軟體: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