怎么把一个excel里的多个表格数据弄在一起 如何将一个excel中的多个表格整合到一起

作者&投稿:鄹荣 (若有异议请与网页底部的电邮联系)

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

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

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

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

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



把问题作为内容(邮件主题一定要包含“excel”,本人以此为依据辨别非垃圾邮件,以免误删)、excel样表文件(请特别注意:要03版的(如果是03以后的,把文件“另存为”一下,类型框可以选择03的),把现状和目标效果表示出来)作为附件发来看下 yqch134@163.com

怎么弄一起,具体点?
选中多个格——合并单元格

excel里面有绝对引用功能,你看帮助就知道了

如何快速将多个excel表格数据合在一起~

快速把excel合并在一起,方便分析和统计可以利用excel表的宏计算就可以实现。方法如下:
1、我们需要把多个excel表都放在同一个文件夹里面,并在这个文件夹里面新建一个excel。如图所示:

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

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

4、运行之后,等待10秒针左右,等运行完毕,就是合并完成之后,会有提示,点确定就可以了。

5、查看合并后的数据,有5000多行,就是同一个文件夹里面17个excel表数据合并后的结果。效果如图所示。

1.工作簿中有多张工作表,A列和B列都有类似的数据,行数不同。
2.选中“汇总”表A1单元格,点击【数据】-【合并计算】。
3.左上角选择适当的运算方式,本例为“求和”。如下图所示点击选择按钮选择数据。
4.选中第一张工作表数据,并点击【添加】按钮。
5.顺序将其他工作表数据也添加进来。
6.由于原始数据第一行是标题,并且要以A列数据分类汇总,所以选中下面两个选项。
7.确定后就在“汇总”表生成了每个人的“数量”汇总求和数据。
8.如果勾选【创建指向源数据的链接】则最终返回链接数据并汇总。
9.完成汇总效果如下。
10.点击每个人旁边的加号就可以看到汇总数据是从哪张工作表的哪个单元格引用过来的。

怎么把excel表格里的数据拆分成多个工作表
答:1.打开Excel表格之后,我们首先在空白表格处依次将要创建的工作表名称按列输入。2.接着我们全选这部分内容,然后点击工具栏中的“插入”,在插入对应的页面内勾选“表格”-“数据透视表”。3.在弹出的创建数据透视表对话框,首先勾选页面中间的“现有工作表”,然后将位置定位到任一空白单元格内。4....

怎么把一个Excel文件中的几个工作表合并成一个工作表?
答:1、方法1 打开excel表格,用鼠标光标选中需要合并的单元格,在【开始】菜单栏中,单击【合并后居中】旁边的下拉图标,选择【合并单元格】即可。2、方法二 打开excel表格,用鼠标光标选中需要合并的单元格,右键单击它,选择【设置单元格格式】。弹出窗口,切换到对齐选项栏,勾选合并单元格,点击确定就可以...

假如我要从同一个excel表中的多个sheet表中提取同一个数据,该如何操作...
答:要从同一个Excel工作簿中的多个工作表中提取相同的数据,你可以使用以下几种方法:1. 使用公式:你可以在目标工作表中使用Excel的公式来提取数据。假设你要从不同的工作表中提取A列的数据,可以使用如下的=Sheet1!A1公式来提取Sheet1中的数据,然后拖动该公式到其他工作表中以获取相应的数据。2. 使用...

怎么将多个excel表合并在一个excel里呢?
答:1、先打开一个空的表格,点击选择数据,新建查询,选择从文件,从文件夹。2、查询编辑器会显示出文件夹下所有表格文件的信息,Content指内容,name是文件名。下一步把Content分解出来。添加列-添加自定义列-输入公式,公式中CONTENT用点插入插进去。3、点击确定后出现了一个新列(刚刚新增的custom),...

怎样快速地把一个EXCEL表格里的多个工作表分开成单个的文件
答:1、打开表格,可以看到一个工作簿中有多个工作表。2、右击工作表名称,点击查看代码(V)。3、显示如下页面。4、空白处,复制黏贴如下代码:Private Sub 分拆工作表()Dim sht As Worksheet Dim MyBook As Workbook Set MyBook = ActiveWorkbook For Each sht In MyBook.Sheets sht.Copy ActiveWorkbook....

一个Excel工作簿中的多个工作表怎么拆分成独立表格?
答:1、打开需要编辑的Excel文档。如图所示,工作簿下方有很多工作表。现在需要将这些工作表单独拆分开成一个个工作簿。2、右键任意一个工作表标签,在弹出的下拉列表中选择查看代码。即弹出代码窗口。如下图所示。3、点击菜单插入,模块在弹出的模块对话框中输入以下代码:Private Sub 分拆工作表()Dim sht ...

excel怎么把多个工作表数据合并到一个工作表?
答:1、首先打开任意一张Excel表格,点击数据,再点击新建查询,页面弹出选项,点击从文件,再点击从工作薄。2、页面跳转,选择需要合并工作表的第一张表格。3、选择好后,点击导入。4、进入导航器,勾选选择多项,再勾选弹出的Excel表格。5、最后点击页面右下方的编辑。6、进入查询编辑器,点击新建源,再...

如何将一个excel里面的多个sheet快速的合并到一个sheet里面?
答:1、首先,提前把所有录入的数据先输入工作表中。2、然后,新建一个sheet4工作表,目的是为了把前三个工作表的内容合并到表4中。3、接着,在工作表4中右键,点击查看代码。4、在代码窗口中,输入以下代码,然后点击工具栏上面的运行就会把三个工作表自动合成在工作表4中了。5、完成后效果如图所示,...

excel2007中如何在同一个窗口打开多个表格
答:1、打开EXCEL,单击【视图】——【切换窗口】,可以在多个文档之间相互切换,如图所示。2、可以点击【并排查看】,弹出选择并排比较的表格,可以对比两个表格 3、在任一个工作表中,操作“视图——全部重排——垂直并排”,也可以让工作簿在一个窗口中显示。4、点击【文件】——【选项】——【高级】—...

一个EXCEL表格中含有多个工作表,怎么分出来?
答:2、然后在下拉菜单中,选择拆分工作表的功能。3、在弹出的菜单中,根据自己需要设定拆分规则。这里进行关键字拆分。表头占据1行,拆分字在A列,然后点击确定。4、程序运行完成后,会弹出提示,点击确定关闭。5、这样在表格中就看到了拆分结果,如下图所示,一个工作表就拆分成多个工作表了。