快速把多个excel表合并成一个excel表

Excel多个文件格子如何合并？ 非常好用

1.先把所有要合并的EXCEL放到同一目录下.

2。在当前目录下新建一个 EXCEL

3。打开新建的EXCEL 按ALT+F11

4.在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 =

Num = 0

Do While MyName <> ””

If MyName <〉 AWbName Then

Set Wb = Workbooks.Open（MyPath ＆ "\” & MyName)

Num = Num + 1

With Workbooks（1）.ActiveSheet

.Cells(.Range(”A65536”).End（xlUp）。Row + 2, 1） = Left（MyName, Len（MyName) -

4)

For G = 1 To Sheets。Count

Wb.Sheets(G）.UsedRange.Copy .Cells(.Range("A65536").End（xlUp).Row + 1, 1)

Next

WbN = WbN & Chr（13） ＆

Wb.Close False

End With

End If

MyName = Dir

如何将⼀个Excel⼯作簿中的多个⼯作表合并成⼀个⼯作表？

多重透视表，我的最爱！

都知道，透视表统计分析数据，那是Excel⼀绝。只是碰到多表合并，很多表亲都直接蒙圈！

好吧，这⾥有个⼩技巧，很多⼈不知道，那就是多重透视表，⽤起来和透视表⼀样，简单！

按下 D，松开再按P，看看，透视表向导就出来了，这个默认菜单上找不到哦！

然后，跟着向导，⼀步⼀步往下⾛就OK啦，如下动画演⽰：

是不是很简单啊！

强⼤的SQL，效率，那是杠杠的！

好吧，这⾥需要⼀点点的SQL只是，当然，简单的汇总，SQL也很简单，⽆⾮就是select语句。

如下⽅式，建⽴⼯作表连接

数据-现有链接-

在连接属性中，输⼊SQL语句，即可轻松合并多张⼯作表。Sum函数还能这样汇总？

对于格式相同的多张⼯作表，也还可以使⽤SUM汇总求和。

这三种汇总多张⼯作表的⽅法，希望能帮到

你！

excel多个表格数据合并到一张表格的方法

Excel中具体该如何把多个数据表合并到一个工作表呢?接下来是店铺为大家带来的excel多个表格数据合并到一张表格的方法，供大家参考。

excel多个表格数据合并到一张表格的方法：

多表数据合并一表格步骤1：下面来介绍一下要合并的数据。我们有12张工作表，每个工作表是一个月份的数据。其中A列是客户名称，B列和C列分别是两个产品的销售数量。每个表格里A列的客户名称是一样的(可以类比财务报表的固定科目)。

多表数据合并一表格步骤2：首先，建立一个汇总表，把客户名称复制到汇总表的A列。

多表数据合并一表格步骤3：从B1开始，将工作表名称顺序填充在汇总表第一行。

注意：工作表名称可以用其他Excel小插件取得，转置粘贴到B1开始的单元格区域。

多表数据合并一表格步骤4：我们先来汇总产品一各月的销售数量。

双击B2单元格，输入公式：=INDIRECT("'"&B$1&"'!B"&ROW(A2))，返回1月份A客户产品一的销售数量，我们可以查看原始数据表验证一下。

多表数据合并一表格步骤5：注意：上面INDIRECT函数生成单元格地址引用部分用了公式，B1代表月份，!B代表取每个表B列数据。row(A2)先返回A2单元格的行数2，然后下拉会变成3,4……等，也就可以顺序取得每个工作表其他客户的销售数据。

将B2单元格公式右拉，下拉填充满数据区域就可以方便的查看各月份各客户产品一的销售金额了。我们也可以查看原始数据表验证一下。

多表数据合并一表格步骤6：如果要查看产品二的数据，可以修改B2的公式，将!B改成!C，右拉下拉即可。也可以用查找替换的方法一次性完成该转换。 易错点提示：这种替换时不要只将B替换成C，因为公式中包含的所有字母B都会被替换成C，导致发生不可预期的错误。比如说ISBLANK函数的B替换成C后，excel就无法识别并运算了。

多表数据合并一表格步骤7：替换完成后，也可以查看一下原始数据表产品二的销售量，看是否正确返回了结果。

如何快速的合并多个 Excel 工作簿成为一个工作簿？

用一个VBA就可以实现的。

使用方法：

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、等待。。。。ok！

如何快速的合并多个 Excel 工作表成为一个工作表（同一个工作薄中）？

Sub 汇总数据()

Sheets.Add

With ActiveSheet

.Name = "汇总表" & Format(Now, "hhmmss")

For Each s In ThisWorkbook.Sheets