首页

文章

excel怎么把多个表格合并成一个

发布网友 发布时间:2022-03-08 20:07

我来回答

3个回答

热心网友 时间:2022-03-08 21:53

我们需要把多个excel表都放在同一个文件夹里面,并在这个文件夹里面新建一个excel。如图所示:

用microsoft excel打开新建的excel表,并右键单击sheet1,找到“查看代码”,单击进去。进去之后就看到了宏计算界面。如图所示:

然后我们把下面这些宏计算的代码复制进去,然后找到工具栏上面的“运行”下的“运行子过程/用户窗体”,代码如下,如图所示:

Sub 合并当前目录下所有工作簿的全部工作表()
Dim MyPath, MyName, AWbName
Dim Wb As Workbook, WbN As String
Dim G As Long
Dim Num As Long
Dim BOX As String
Application.ScreenUpdating = False
MyPath = ActiveWorkbook.Path
MyName = Dir(MyPath & "\" & "*.xls")
AWbName = ActiveWorkbook.Name
Num = 0
Do While MyName <> ""
If MyName <> AWbName Then
Set Wb = Workbooks.Open(MyPath & "\" & MyName)
Num = Num + 1
With Workbooks(1).ActiveSheet
.Cells(.Range("B65536").End(xlUp).Row + 2, 1) = Left(MyName, Len(MyName) - 4)
For G = 1 To Sheets.Count
Wb.Sheets(G).UsedRange.Copy .Cells(.Range("B65536").End(xlUp).Row + 1, 1)
Next
WbN = WbN & Chr(13) & Wb.Name
Wb.Close False
End With
End If
MyName = Dir
Loop
Range("B1").Select
Application.ScreenUpdating = True
MsgBox "共合并了" & Num & "个工作薄下的全部工作表。如下:" & Chr(13) & WbN, vbInformation, "提示"
End Sub

运行之后,等待10秒针左右,等运行完毕,就是合并完成之后,会有提示,点确定就可以了。查看合并后的数据,有5000多行,就是同一个文件夹里面17个excel表数据合并后的结果。效果如图所示。

图解看百度经验http://jingyan.baidu.com/article/f0062228d16ba9fbd3f0c82b.html

热心网友 时间:2022-03-08 23:27

是相应单元格透视累计,还是逐一追加记录?

热心网友 时间:2022-03-09 01:35

上边菜单栏有一个合并单元格
手机导航地图语音怎么下载 如何分别真金和仿金首饰 怎样区分真金和仿金首饰呢 小学生新年晚会主持人的串词!!(不要太多)急 大大后天就需要了!!!_百度... 周年晚会策划公司 奥格瑞玛传送门大厅在哪 奥格瑞玛传送门大厅怎么走 锻炼颈椎的几个动作 水多久能结冰 冰能在多长时间内形成 请问水低于0度会结冰吗? 如何防止脱发严重 嘴唇上有黑印用蜜蜡和棉线去除了胡须 软柿子的热量 孕妇可以吃软柿子吗不是西红柿 脆柿子和软柿子的区别 脆柿子好还是软柿子好 软柿子可以多吃吗 “鱼悬洁白振清风”的出处是哪里 用大自然的声音评课好吗? 妇产科博士找超声科工作容易吗 怎能把微信6.2.0版本换回6.1.2版 微信群6.2.4怎么增加人数上限 微信6.2.2如何备份手机通讯录 电脑桌面图标不能放大? 有什么好用的识图软件 识图认人哪个软件最好 手机识图软件什么软件能识别图片位置 小米手机自动锁屏时间怎么修改 小米手机屏幕锁定时间设置教程 能举起100斤算大力吗 中医美容专业是什么 中医美容证有什么用 单声道音频什么意思(开启单声道音频有什么好处) 单声道音频是什么,有什么用处? 户口还未迁移到婆家 娘家户口怎么就没了呢 我结婚没有迁户口,现在娘家也没有怎么办 没领证生的孩子一般会判给谁 没领证生的孩子会判给谁 信用卡卡种有哪些 找一首古风歌曲 男声 低配电脑装w10还是w7流畅 电脑配置低装win7还是win10好 低配电脑适合装WIN7系统还是WIN10系统? ...500s-15isk这个联想笔记本的内存条尺寸是什么型号的有没有知道的... 越快越好.怎样减肥.而且胸部不缩水 请问徐闻县海安长途汽车客运站客服是多少? 过了平台期还会瘦吗 悦耳的意思悦耳的解释 重庆师范大学应用心理学专业的权威性如何? 打印机laserjetm1136mfp怎样设置无线打印 经典电影赏析之1:《精武英雄》 爆米花用的什么玉米 糯玉米哪个好 有机糯玉米的营养价值如何? 四大直辖市换帅原因 excel怎么将两个表格合并 excel怎么把两个表格合并成一个 怎么把excel表格合并 excel表格合并怎么弄 怎么把两个EXCEL文档合成一个 两个excel表格合并怎么弄 excel表格怎么把所有的表格合并成一个 excel怎么把表格合并 怎样将Excel表格合并 多个excel表格怎么合并在一起 电脑cpu占用过高怎么办win10 电脑显示cpu占用过高怎么办 电脑cpu突然占用过高怎么办 电脑CPU占用过高怎么办? 求PS的海报制作步骤及每一步骤的效果图 怎么做喷绘海报 微信H5怎么制作听说用PS可以实现,但不是GIF 微信订阅号如何插入动态海报? ps如何在静态图上添加gif 淘宝首页,我几张GIF的全屏海报做成了轮播怎么上传了不是动图啊, 两个单独excel表格合并一个怎么弄? 怎样让电脑系统更新? 如何给WINDOWS系统升级? 乱下东西,电脑中毒拉,杀毒软件自动关,怎么办.. 下载一个软件后电脑就中毒了怎么办? 电脑怎么下个软件就中毒了 也杀不好毒 该怎么办 电脑中毒文件都乱了怎么办? 软件设计师考试下午题评分 如何删除WORD中多余的页码? 怎么删除word的页码数 怎么把收藏的图片变成excel表格 怎么开启录屏功能啊 windows录屏功能怎么打开 电脑怎么开录屏功能 电脑自带录屏功能在哪 电脑录屏怎么打开 请问怎么使模糊的图片变清晰 《王者荣耀》二维码授权登录在哪? 微信登录王者荣耀,扫二维码时无法登录成功,怎么办? ipad2018录屏 怎么录屏
声明声明:本网页内容为用户发布,旨在传播知识,不代表本网认同其观点,若有侵权等问题请及时与本网联系,我们将在第一时间删除处理。E-MAIL:11247931@qq.com