如何把多个相同格式的Excel表格数据快速的合并到一张表格中
5个回答
TableDI
2024-07-18 广告
2024-07-18 广告
作为上海悉息信息科技有限公司的一员,我们专注于提供高效的数据处理解决方案。对于多个文件表格的合并需求,我们通常采用专业的数据整合技术,确保数据的准确性和一致性。通过精确匹配表格字段和格式,我们能够快速、准确地将多个表格合并成一个,为用户提供...
点击进入详情页
本回答由TableDI提供
展开全部
使用方法:
1、新建一个工作薄,将其命名为你合并后的名字。
2、打开此工作薄。
3、在其下任一个工作表标签上点击右键,选择“查看代码”。
4、在打开的VBA编辑窗口中粘贴以下代码:
Sub 工作薄间工作表合并()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub
5、关闭VBA编辑窗口。
6、在excel中,工具---宏---宏,选“工作薄间工作表合并”,然后“执行”。
7、在打开的对话窗口中,选择你要合并的300个工作薄。
8、等待执行完毕后查看结果
1、新建一个工作薄,将其命名为你合并后的名字。
2、打开此工作薄。
3、在其下任一个工作表标签上点击右键,选择“查看代码”。
4、在打开的VBA编辑窗口中粘贴以下代码:
Sub 工作薄间工作表合并()
Dim FileOpen
Dim X As Integer
Application.ScreenUpdating = False
FileOpen = Application.GetOpenFilename(FileFilter:="Microsoft Excel文件(*.xls),*.xls", MultiSelect:=True, Title:="合并工作薄")
X = 1
While X <= UBound(FileOpen)
Workbooks.Open Filename:=FileOpen(X)
Sheets().Move After:=ThisWorkbook.Sheets(ThisWorkbook.Sheets.Count)
X = X + 1
Wend
ExitHandler:
Application.ScreenUpdating = True
Exit Sub
errhadler:
MsgBox Err.Description
End Sub
5、关闭VBA编辑窗口。
6、在excel中,工具---宏---宏,选“工作薄间工作表合并”,然后“执行”。
7、在打开的对话窗口中,选择你要合并的300个工作薄。
8、等待执行完毕后查看结果
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不太清楚你具体是什么情况,如图是VLOOKUP引用多表的例子。虽然逻辑性不是很强,但是能够达到目的
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
假设你要引用的是不同表中D4这个单元格。
1.新建表“汇总”,在A列输入“工作表名称”(A2至A…录入n个表的名字)。
2.第二列B2单元格输入公式:“=INDIRECT(CONCATENATE(A2,"!D4"))”,公式的意思是引用“汇总”表A2单元格相同的表中D4单元格的内容。(假设A2=王小明,则引用表“王小明”里的D4单元格的值)
3.拖拽B2的右下角自动生成一列对n个表对应单元格格的引用了,其他的引申就自己开发了,公式可以结合其他运算的。
我做了个演示,无法上传,你自己慢慢弄吧。
1.新建表“汇总”,在A列输入“工作表名称”(A2至A…录入n个表的名字)。
2.第二列B2单元格输入公式:“=INDIRECT(CONCATENATE(A2,"!D4"))”,公式的意思是引用“汇总”表A2单元格相同的表中D4单元格的内容。(假设A2=王小明,则引用表“王小明”里的D4单元格的值)
3.拖拽B2的右下角自动生成一列对n个表对应单元格格的引用了,其他的引申就自己开发了,公式可以结合其他运算的。
我做了个演示,无法上传,你自己慢慢弄吧。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询