peel在Linux生成excel,如何将多个Excel文件合并成一个且保留原有数据?
如何将多个Excel文件合并成一个且保留原有数据?事实上,我们可以借用Excel宏命令来处理该操作,并且保留原有数据,建立多个Sheet页,具体操作请看下文多个Excel文件合并成一个的方法。
如何将多个Excel文件合并成一个且保留原有数据?
1、将需合并的Excel文件放在同一个文件夹中,并这个文件中新建一个Excel文件。
2、打开新建的Excel文件,按 Alt + F11 键,打开宏,选择视图→代码窗口。
3、将下面的代码拷贝进去:
01Sub sheets2one()
02'定义对话框变量
03Dim cc As FileDialog
04Set cc = Application.FileDialog(msoFileDialogFilePicker)
05Dim newwork As Workbook
06Set newwork = Workbooks.Add
07With cc
08If .Show = -1 Then
09Dim vrtSelectedItem As Variant
10Dim i As Integer
11i = 1
12For Each vrtSelectedItem In .SelectedItems
13Dim tempwb As Workbook
14Set tempwb = Workbooks.Open(vrtSelectedItem)
15tempwb.Worksheets(1).Copy Before:=newwork.Worksheets(i)
16newwork.Worksheets(i).Name = VBA.Replace(tempwb.Name, ".xls", "")
17tempwb.Close SaveChanges:=False
18i = i + 1
19Next vrtSelectedItem
20End If
21End With
22Set cc = Nothing
23End Sub
复制代码
Sub sheets2one()
'定义对话框变量
Dim cc As FileDialog
Set cc = Application.FileDialog(msoFileDialogFilePicker)
Dim newwork As Workbook
Set newwork = Workbooks.Add
With cc
If .Show = -1 Then
Dim vrtSelectedItem As Variant
Dim i As Integer
i = 1
For Each vrtSelectedItem In .SelectedItems
Dim tempwb As Workbook
Set tempwb = Workbooks.Open(vrtSelectedItem)
tempwb.Worksheets(1).Copy Before:=newwork.Worksheets(i)
newwork.Worksheets(i).Name = VBA.Replace(tempwb.Name, ".xls", "")
tempwb.Close SaveChanges:=False
i = i + 1
Next vrtSelectedItem
End If
End With
Set cc = Nothing
End Sub
peel在Linux生成excel,如何将多个Excel文件合并成一个且保留原有数据?相关推荐
- linux下将多个文件去除文件头合并_Linux下把多个文件合并成一个文件 - 卡饭网...
互盾PDF分割合并工具将多个PDF文件合并成一个PDF文档 互盾PDF分割合并工具将多个PDF文件合并成一个PDF文档 互盾PDF分割合并工具将多个PDF文件合并成一个PDF文档 一.下载并安 ...
- 怎么让两个java文件关联,怎么把多个excel文件合并成一个【几个excle合并成一个】...
怎么把多个excel文件合并成一个 新建一个BOOK文件,按Alt F11这二个键,VBA编辑界面,点击编辑的菜单:"插入"--"",然后在里面完整复制下面的代 ...
- excel如何把多张表合并成一个表_如何将多个excel文件合并成一个文件-多个excel文件合并成一个excel表的方法 - 河东软件园...
Excel是我们最常用的数据处理软件,而在我们使用Excel时,常常会处理同一类的数据,例如,我们制作月度报表,那么在年末时我们共积累了1至12月的月度报表,这时我们的Excel的文档将多达12个,实 ...
- 将一个excel多个文件合并成一个文件的多个sheet
将一个excel多个文件合并成一个文件的多个sheet 1.在新建文件夹目录下,将需要合并的excel文档放到该目录下 2.新建一个空白文档,将鼠标移动到sheet工作表上,单击右键,选择" ...
- peel在Linux生成excel,zplane -
来自德国柏林的zplane development 发布了别名水果刀的频谱提取均衡插件PEEL.PEEL作为一款全新的插件,能让用户实时独放.静音.甚至单独处理音乐中的一个乐器. PEEL的灵感来自z ...
- 【excel表的按行转置,并合并成一列,整理面板数据】【python】
有时候回归分析常需要整理面板数据 就是把这样一行一行的数据 转化成这样一列一列的面板数据 我习惯用list的方法来整理,但是这样消耗的时间比较久. 好在只有1w条不到的数据,时间上不到1s,所以日常处 ...
- Excel函数——OFFSET函数将多列合并成一列
最近遇到一个问题,如图所示,每个表的字段分别一列展示,不同表有公共字段,也有独有的字段,现想统计这些表一共涉及到哪些字段.基本思路就是将这些表的字段合并为一列再去重.因为涉及到70多列,复制粘贴比较耗 ...
- 在EXCEL中怎么将多个CSV文件合并成一个文件
copy *.CSV all.csv https://jingyan.baidu.com/article/948f5924d44fa7d80ff5f909.html
- 〖Linux〗简单的将Shell和一些文件打包成一个单独的“可执行文件”
有时候给别人分享一个工具的时候,同时需要提供的文件比较多: 如果分享一个压缩包还得教会对方如何解压.执行哪个脚本,感觉需要传输的内容多了就不方便: 把几个Shell脚本和文件打包成一个"单独 ...
最新文章
- 只有20%的iOS程序员能看懂:详解intrinsicContentSize 及 约束优先级/content Hugging/content Compression Resistance
- C++ 莫队算法(转)
- visual studio如何中止正在运行的程序
- ux设计师薪水_我是如何从33岁的博物馆导游变成专业的Web开发人员和UX设计师的:我的…...
- ARM MMU工作原理剖析
- Ubuntu 安装 OpenCV 教程 【slam14讲行不通可以看看】
- Unity Easy AR
- AutoCAD Civil 3D-部件-部件编辑器自定义边坡与材质
- Ubuntu下装memcache
- 【图文】origin画图软件10分钟学会所有基本操作,画出精美图形
- 富士相机设置传原图_【富士 X-E3 无反相机使用体验】蓝牙|WIFI|连接|图像传输_摘要频道_什么值得买...
- 【移动网络】[5G 核心网络架构] 5GC: Architecture
- 面试总结+感悟+分享
- SAGAN: Self-attention GAN
- 少女口述:我跟一个小混混那不堪回首的感情
- esp8266介绍和使用
- SRS4.0源码分析-SrsRecvThread::cycle
- JVM堆大小与机器内存大小的一点探究
- 关于px/rem/vw 之间的换算关系
- 十一、Word参考文献的跳转引用