【VBA】合并多个excel文件
2023-09-27 14:24:24 时间
From http://www.zhihu.com/question/20366713
VBA代码如下:
1 Sub 工作薄间工作表合并() 2 3 Dim FileOpen 4 Dim X As Integer 5 Application.ScreenUpdating = False 6 FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄") 7 X = 1 8 While X <= UBound(FileOpen) 9 Workbooks.Open Filename:=FileOpen(X) 10 Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count) 11 X = X + 1 12 Wend 13 ExitHandler: 14 Application.ScreenUpdating = True 15 Exit Sub 16 17 18 errhadler: 19 MsgBox Err.Description 20 End Sub
相关文章
- excel在一个图表内,显示折线图和柱状图
- Pandas实例|药品发放汇总与excel表数据回填
- 绘制Excel字符画
- 如何在 JavaScript 中使用SpreadJS导入和导出 Excel 文件
- PHP读取Excel文件内容
- 将execl文件拆分为多个excel文件
- C#【文件操作篇】一种提高C#实时存储excel文件速度的方法
- JavaScript - 本地上传 Excel 文件页面表格预览(不可编辑)
- [转] JAVA读取excel数据(插入oracle数据库)
- php Excel 导入
- 使用JAVA读取和写入EXCEL文件
- SwiftUI 如何编程打开Office Word PPT Excel PDF PNG iWork等文件 (QLPreviewController QuickLook教程含源码)
- Flutter DataGrid教程之表格图标日历Excel完整App源码(教程含源码)
- Python Excel自动化之 Openpyx如何Python程序读取和修改 Excel电子表格文件
- Python Excel教程之如何将多个 excel 文件合并为一个文件(教程含源码)
- 支持IE浏览器下载文件--转成zip,excel,pdf
- Excel自动化之使用 Pandas 比较不同 Excel 文件中的列值
- Python使用故事之 超过 Excel文件大小限制时推荐使用 SQLite
- Excel 数据透视表教程大全之 06 数据透视表八大优势,辅助列用途
- java下载excel模板文件
- PostMan测试接口-----上传文件、导出excel
- 利用os和pandas来合并当前目录下所有excel文件
- 【工具excel 问题】新建xls,xls的文件格式和扩展名不匹配。文件可能已损坏或不安全。