多個(gè)表格合并到一個(gè)表格怎么操作 如何把一個(gè)工作簿里多個(gè)excel表格合并成一個(gè)?
如何把一個(gè)工作簿里多個(gè)excel表格合并成一個(gè)?如何使用:1。創(chuàng)建一個(gè)新工作簿并將其命名為合并名稱。2. 打開此工作簿。3. 在其下一個(gè)圖紙選項(xiàng)卡上單擊鼠標(biāo)右鍵,然后選擇“查看代碼”。4. 在打開的V
如何把一個(gè)工作簿里多個(gè)excel表格合并成一個(gè)?
如何使用:
1。創(chuàng)建一個(gè)新工作簿并將其命名為合并名稱。
2. 打開此工作簿。
3. 在其下一個(gè)圖紙選項(xiàng)卡上單擊鼠標(biāo)右鍵,然后選擇“查看代碼”。
4. 在打開的VBA編輯窗口中粘貼以下代碼:工作表之間的子工作表合并()dim FileOpen dim x As Integer應(yīng)用程序屏幕更新=假文件打開=Application.GetOpenFilename(filefilter:=”Microsoft Excel文件(。XLS),*。Xls“,multiselect:=true,Title:=“合并工作簿”)x=1,而x<=UBound(FileOpen)工作簿。打開文件名:=FileOpen(X)Sheets()。移到后面:=此工作簿。工作表( ThisWorkbook.Sheets.Count計(jì)數(shù))X=X 1出口:應(yīng)用程序屏幕更新=True Exit Sub errhadler:MsgBox錯(cuò)誤描述5關(guān)閉VBA編輯窗口。
6. 在Excel中,選擇“工具-宏-宏”,選擇“工作簿之間的工作表合并”,然后選擇“執(zhí)行”。
7. 在打開的對(duì)話框窗口中,選擇要合并的300個(gè)工作簿。