来源:Win10系统之家2024-11-24
大家好,今天Win10系统之家小编给大家分享「如何将多个excel合并成一个」的知识,如果能碰巧解决你现在面临的问题,记得收藏本站或分享给你的好友们哟~,现在开始吧!
原始数据所在工作簿包含多个格式相同的工作表,只不过每个工作表内容不同,比如说不同人名的工作表数据或者不同部门填写的数据。
在原始数据同目录下新建一个工作簿,建立两个工作表,名称分别为"首页"和"合并汇总表"。
按Alt F11进入VBA代码编辑和调试界面。
根据下图提示,插入一个模块。
将下述代码粘贴到模块空白处:
子组合工作表单元格()
将ws新工作表尺寸作为工作表
Dim cel As范围
Dim DataSource,RowTitle,ColumnTitle,SourceDataRows,SourceDataColumns作为变量
将标题行、标题列作为范围变暗
尺寸编号为整数
将数据行调长
DataRows=1
Dim TitleArr()
模糊的选择
Dim MyName$,MyFileName$,ActiveSheetName$,AddressAll$,AddressRow$,AddressColumn$,FileDir$,数据表$,myDelimiter$ .
昏暗,我
n=1
i=1
申请。显示警报=假
工作表('合并汇总表').删除
设置wsNewWorksheet=Worksheets .添加(,after:=工作表(工作表。计数))
wsNewWorksheet .Name='合并汇总表'
我的文件名=应用程序GetOpenFilename('Excel工作薄(*.xls*),* .xls* ')
如果MyFileName='False ',则
' MsgBox '没有选择文件!请重新选择一个被合并文件!vbInformation,'取消'
其他
练习册Open Filename:=MyFileName
Num=ActiveWorkbook .床单,数数
MyName=ActiveWorkbook .名字
设置数据源=应用程序InputBox(prompt:='请选择要合并的数据区域:',类型:
=8)
AddressAll=DataSource .地址
活动工作簿.ActiveSheet。范围(AddressAll).挑选
SourceDataRows=选择。行数。计数
SourceDataColumns=Selection .列数
申请ScreenUpdating=False
申请EnableEvents=False
对于我=
一到数字
活动工作簿.床单(一)。使活动
活动工作簿.床单(一)。范围(地址全部).挑选
选择。复制
ActiveSheetName=ActiveWorkbook .ActiveSheet。名字
工作簿(此工作簿.姓名)。使活动
活动工作簿.工作表('合并汇总表').挑选
活动工作簿.工作表('合并汇总表').范围(' A '
菜单:数据--数据透视表和数据透视图
假设需要合并的表是:
表一、表二
在弹出的数据透视表和数据透视图向导3步骤之1中点选“多重合并计算数据区域”,然后点选下面的“数据透视表”,然后点按“下一步”,在下一个对话框中点选“创建单页字段”,然后继续点按“下一步”
在接下来弹出的数据透视表和数据透视图3步骤之2b中,点击“选定区域”框右侧带红色箭头的小按钮,再点击excel的“表一”工作表标签,然后用鼠标选定“表一”中有数据的“数据区域”,再点击“选定区域”框右侧小按钮,然后点按“添加”按钮,区域就被加入下面的大框中;同样地添加“表二”区域。将所有的几个工作表中的数据区域均添加完成后检查一下添加区域的顺序,然后点按“下一步”,然后在数据透视表和数据透视图向导3步骤之3中点选“新建工作表”,然后点按“完成”。
1、将鼠标光标移动到一个Excel文件图标上,双击鼠标左键打开文档。
2、将鼠标光标移动到另一个Excel文件图标上,双击鼠标左键打开文档。
3、打开两个Excel文件后电脑任务栏并排显示了两个文件。
4、鼠标左键单击任意一个Excel文件“WPS表格”的下三角符号。
5、将鼠标光标移动到“工具”。
6、鼠标左键单击“工具”菜单下的“选项”。
7、鼠标左键单击“在任务栏中显示所有窗口”前的方框,把“√”去掉。
8、鼠标左键单击“确定”。
9、得到两个工作表同时显示在Excel软件下。
注意事项:
1、上述步骤为软件WPS的Excel操作步骤,office的Excel操作步骤类似。
2、上述步骤可以把excel中多个工作簿合并成一个,若需把打开多个Excel文件由合并状态改成单个显示,只需在操作第七步时把“在任务栏中显示所有窗口”前方框的“√”加上即可。
1、首先打开任意一张Excel表格,点击数据,再点击新建查询,页面弹出选项,点击从文件,再点击从工作薄。
2、页面跳转,选择需要合并工作表的第一张表格。
3、选择好后,点击导入。
4、进入导航器,勾选选择多项,再勾选弹出的Excel表格。
5、最后点击页面右下方的编辑。
6、进入查询编辑器,点击新建源,再点击excel图标。
7、选择第二张需要合并的Excel表格,注意:需要合并多少张表格,就选择多少张表格。
8、选择好之后,在查询编辑器的左边,可以看到需要合并的Excel表格。
9、把编辑器关闭,页面弹出提示,点击保留。
10、页面返回到打开的Excel表格,在工作簿查询的下方,点击第一张Excel表格。
11、再次进入查询编辑器,点击追加查询。
12、页面弹出追加对话框,点击追加下拉框的另外一张Excel表格,需要合并多少张Excel表格就选择多少张Excel表格。
13、选择好之后,关闭编辑器,多个Excel表格就合并在一起了。
以上就是关于「如何将多个excel合并成一个」的全部内容,本文讲解到这里啦,希望对大家有所帮助。如果你还想了解更多这方面的信息,记得收藏关注本站~
【②本文来*源Win10系统之家,不得自行转载,违者必追究!】