excel里总表的人名、面积依次分到表2的每个个人表里。_百度知道
excel里总表的人名、面积依次分到表2的每个个人表里。
回答有福利的！
我有更好的答案
给你完成中！
教给我方法，谢谢， 还有好多名单呢
=INDEX(总表!C:C,MATCH(K20,总表!B:B,0))如果想学习，请私信留下你扣扣，我加你，给你讲解
采纳率：55%
可以分啊。
帮忙看一下附件具体怎么处理 ，谢谢啊
看一看附件中的黄色区域，里面都是给你编辑的公式。是否是你想要的效果，另行交流。
为您推荐：
其他类似问题
excel的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。查看: 1866|回复: 10
多个工作薄中的部分数据汇总为一个总表
阅读权限20
在线时间 小时
& & & & & & & &
如何将附件中1队~5队工作薄中的人员姓名及月度奖金这两列汇总到“汇总表”。
请高手帮忙！
15:11 上传
点击文件名下载附件
48.7 KB, 下载次数: 65
阅读权限20
在线时间 小时
你做的这表也太奇葩了吧 格式那么不规范 怎么汇总 编程都没法编 你得起码有一个稍微统一点的格式 才能考虑编程实现
阅读权限20
在线时间 小时
1、请统一每个子表中的Sheet“总表”格式，格式如下：部门姓名工资绩效工资月度奖金应付工资对比上月增减上月奖金说明2、操作时，需要打开所有需要汇总的子表和汇总表，点击按钮即可实现汇总，具体请参见附件附代码：
Sub 汇总数据到一个表中()
On Error Resume Next
Application.ScreenUpdating = False
Dim Workbook_name As String
Dim Sheet_name As String
Dim ActSheet_name As String
Dim sht As Worksheet
Dim wb As Workbook
Dim hmax As Integer
Workbook_name = ActiveWorkbook.Name
ActSheet_name = ActiveSheet.Name
Sheet_name = &总表&& &&&'每个Workbook中有一个&&Sheet（总表），程序会将其中的信息进行汇总
For Each wb In Workbooks
If Workbook_name && wb.Name Then
wb.Activate
For Each sht In Sheets
hmax = Workbooks(Workbook_name).Sheets(ActSheet_name).UsedRange.Rows.Count
If sht.Name = Sheet_name Then
ActiveSheet.Range(&A2&).Resize(ActiveSheet.Range(&A65535&).End(xlUp).Row - 1, ActiveSheet.UsedRange.Columns.Count).Copy Workbooks(Workbook_name).Sheets(ActSheet_name).Range(&A& & hmax + 1)
Workbooks(Workbook_name).Activate
Application.ScreenUpdating = True
23:10 上传
点击文件名下载附件
65.03 KB, 下载次数: 42
阅读权限20
在线时间 小时
更改了一下代码，可以实现要求，具体见附件
Sub 汇总数据到一个表中()
On Error Resume Next
Application.ScreenUpdating = False
Dim Workbook_name As String
Dim Sheet_name As String
Dim ActSheet_name As String
Dim sht As Worksheet
Dim wb As Workbook
Dim hmax As Integer
Dim cmax As Integer
Dim rng As Range
Dim i As Integer
Dim j1 As Integer
Dim j2 As Integer
Workbook_name = ActiveWorkbook.Name
ActSheet_name = ActiveSheet.Name
Sheet_name = &总表&& &&&'每个Workbook中有一个&&Sheet（总表），程序会将其中的信息进行汇总
For Each wb In Workbooks
If Workbook_name && wb.Name Then
wb.Activate
For Each sht In Sheets
hmax = Workbooks(Workbook_name).Sheets(ActSheet_name).UsedRange.Rows.Count
If sht.Name = Sheet_name Then
cmax = ActiveSheet.UsedRange.Columns.Count
For i = 1 To cmax
If ActiveSheet.Cells(1, i) = &姓名& Then
ElseIf ActiveSheet.Cells(1, i) = &月度奖金& Then
Set rng = Union(ActiveSheet.Cells(2, j1).Resize(ActiveSheet.Range(&A65535&).End(xlUp).Row - 1, 1), ActiveSheet.Cells(2, j2).Resize(ActiveSheet.Range(&A65535&).End(xlUp).Row - 1, 1))
rng.Copy Workbooks(Workbook_name).Sheets(ActSheet_name).Range(&A& & hmax + 1)
Set rng = Nothing
Workbooks(Workbook_name).Activate
Application.ScreenUpdating = True
00:19 上传
点击文件名下载附件
61.27 KB, 下载次数: 41
阅读权限20
在线时间 小时
cf7315752 发表于
更改了一下代码，可以实现要求，具体见附件
Sub 汇总数据到一个表中()
非常好用，十分感谢！
大侠，能否做到：只是将希望汇总的分表放到一个文件夹中，不用打开各分表即可汇总。就像附件那样。
09:15 上传
点击文件名下载附件
17.91 KB, 下载次数: 13
阅读权限20
在线时间 小时
KCCKSCF 发表于
非常好用，十分感谢！
大侠，能否做到：只是将希望汇总的分表放到一个文件夹中，不用打开各分表即可汇总 ...
联系QQ，我没太懂你的意思，我的理解是：
每个表中如果有数据，就把其中的A到I列汇总到一张表中，没有数据就跳过：
编号年度拨付单位姓名住址补助金额发放形式拨付时间区划简码
我第一次写的那段稍微改一下，就可以实现。
阅读权限20
在线时间 小时
KCCKSCF 发表于
非常好用，十分感谢！
大侠，能否做到：只是将希望汇总的分表放到一个文件夹中，不用打开各分表即可汇总 ...
已弄完，参见附件
Sub 汇总()
Dim myPath As String
Dim myFile As String
Dim wk As Workbook
Dim sht As Worksheet
Dim Workbook_name As String
Dim Sheet_name As String
Dim ActSheet_name As String
Dim hmax As Integer
Dim cmax As Integer
Dim rng As Range
Dim i As Integer
Dim j1 As Integer
Dim j2 As Integer
Application.ScreenUpdating = False
Workbook_name = ActiveWorkbook.Name
ActSheet_name = ActiveSheet.Name
Sheet_name = &总表&& &&&'每个Workbook中有一个&&Sheet（总表），程序会将其中的信息进行汇总
myPath = ThisWorkbook.Path & &\分表\&
myFile = Dir(myPath & &*.xls&)
Do While myFile && &&
If myFile && Workbook_name Then
Set wk = Workbooks.Open(myPath & myFile)
For Each sht In Sheets
hmax = Workbooks(Workbook_name).Sheets(ActSheet_name).UsedRange.Rows.Count
If sht.Name = Sheet_name Then
cmax = ActiveSheet.UsedRange.Columns.Count
For i = 1 To cmax
If ActiveSheet.Cells(1, i) = &姓名& Then
ElseIf ActiveSheet.Cells(1, i) = &月度奖金& Then
Set rng = Union(ActiveSheet.Cells(2, j1).Resize(ActiveSheet.Range(&A65535&).End(xlUp).Row - 1, 1), ActiveSheet.Cells(2, j2).Resize(ActiveSheet.Range(&A65535&).End(xlUp).Row - 1, 1))
rng.Copy Workbooks(Workbook_name).Sheets(ActSheet_name).Range(&A& & hmax + 1)
Set rng = Nothing
Workbooks(myFile).Close False
myFile = Dir
Application.ScreenUpdating = True
MsgBox &汇总完毕！&, 64, &提示&
11:41 上传
点击文件名下载附件
48.85 KB, 下载次数: 40
阅读权限20
在线时间 小时
cf7315752 发表于
已弄完，参见附件
Sub 汇总()
已接近完美了，多谢大侠帮助！
在演示中还是发现一个小问题：“5队”工作薄中，如果保存界面为“财务”SHEET时，汇总表中得到的是“财务”中的E列数值，而不是当月奖金的数值；也就是说，不能自动全部选取各工作薄中“总表”的奖金。能不能让汇总表只从各工作薄上“总表”上筛选汇总，不论各工作薄保存界面是哪个“SHEET &
阅读权限20
在线时间 小时
KCCKSCF 发表于
已接近完美了，多谢大侠帮助！
在演示中还是发现一个小问题：“5队”工作薄中，如果保存界面为“财务”S ...
变量没设置正确，已更正，你再试试。
(49.53 KB, 下载次数: 93)
12:53 上传
点击文件名下载附件
阅读权限20
在线时间 小时
非常完美，多谢大侠仗义相助！！！
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师excel如何把分类汇总把相同名字的数据相加_百度知道
excel如何把分类汇总把相同名字的数据相加
我有更好的答案
日常工作中经常接触到Excel二维数据表格，经常需要通过需要根据表中某列数据字段对数据进行整理汇总，此时可用到Excel的分类汇总 功能。如图所示，如何计算所有班级语数英的总和？ &&使用“数据”选项卡的“分级显示”组中的“分类汇总”命令，可以自动计算列表中列的分类汇总和总计。&图1 ：一，选中需要分类汇总的列：选择菜单的“数据”，单击升序排序。二，如上图1分类汇总：选择菜单的“数据”，单击“分类汇总”。三，在分类汇总对话框选择相应的项：分类字段选择要分类汇总的列名，这里选择“班级”；选定汇总项勾选“语数英”三列。如图所示。四，分类汇总图总览：按照如上步骤得出分类汇总后的界面图，如下图所示。单击左侧的1,2,3，可分别显示汇总的项目。
采纳率：56%
来自团队：
先把你的数据 按名字排序 然后使用分类汇总 并且一名字分类 汇总 就可以了…… excel 中的分类汇总 必须排序…… 也可以使用sumif 等公式 汇总到另外的地方……
为什么三个数据1,2，3.汇总后和是5呢
你的那个1 确定是数字 不是文本？重点查它的格式……双击一下那个单元格 看看……
是数字，算总和时第一个数总是没加进去
把你的文件发过来 给你看看 你的操作 问题出在哪里……
谢谢，可以了，我想问如果姓名和学号和分数一起，怎么把相同姓名的分数相加，要包括学号一起，怎么搞，只能搞两次吗
学好是唯一的 与姓名是一一对应的，而姓名 有时 有重复 所以只要 按着学号 来弄就可以了……姓名可以参与其中 啊一般情况下 如果你的数据没有错的话，一个学号 不可能有第二个姓名
学号排列后，姓名会自动和学号对应吗？还有一个排序问题，我学号是第二列，分数是第三列，一排序总是按分数去排序，怎么按学号来排序啊
哈哈！朋友！你先选中 学号 那个单元格 ……然后 数据 排序 ……选择 有标题行 主要关键字 选 学号……你在排序的时候 是整体数据排序 不要选中某一列 然后 点 排序……如果是这样 你要在随后的对话框中 选 扩展……
本回答被提问者采纳
上图或者是上附件
筛选筛选再筛选。
其他1条回答
为您推荐：
其他类似问题
您可能关注的内容
国家公园的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。按部门对Excel表格中数据进行分类汇总的方法_Office办公助手
分享高质量的原创Office教程、Word教程、Excel教程、PPT教程。
按部门对Excel表格中数据进行分类汇总的方法
发布时间：　来源：Office办公助手(www.officezhushou.com)
分类汇总是Excel的一项重要功能，它能快速以某一个字段为分类项，对数据列表中其他字段的数值进行统计计算。本文以在表格中按照部门来统计数据总和为例介绍Excel表格中数据进行分类汇总的方法的操作方法。
1、启动Excel并打开工作表，选择汇总时的分类字段所在的单元格区域，在&开始&选项卡的&编辑&组中单击&排序和筛选&按钮，在打开的菜单中选择&降序&命令对其进行排序操作，如图1所示。
图1　对数据进行排序操作
2、在工作表中选择任意一个单元格，在&数据&选项卡的&分级显示&组中单击&分类汇总&按钮打开&分类汇总&对话框，在对话框的&分类字段&下拉列表中选择&申请部门&选项，在&汇总方式&下拉列表中选择&求和&选项，在&选定汇总项&列表中勾选&采购金额&复选框，如图2所示。
图2　打开&分类汇总&对话框
3、单击&确定&按钮关闭&分类汇总&对话框，Excel将以&申请部门&字段进行分类，对&采购金额&的值进行求和汇总，如图3所示。
图3　对工作表进行分类汇总
更多相关阅读
上一篇：没有了 下一篇：
SUMIF函数强大的条件求和功能在多种工作场景中均有广泛应用。本文结合
本文详细讲解了Excel 2010工作表中以为一组数据插入一个分类汇总级别的
本文讲述了Excel 2010工作表中插入分类汇总及删除分类汇总的方法。
分类汇总是excel使用率很高的、用来分类汇总数据的基本功能，今天本文
专题教程推荐
(window.slotbydup=window.slotbydup || []).push({
id: '3577897',
container: s,
size: '300,450',
display: 'inlay-fix'
热门资源下载Excel汇总数据拆分多个工作表，哇，这么快！
有小伙伴留言说，汇总数据拆分多个工作表，今天小编就带来了干货，边吃边看，慢慢品味~
假设公司有150位员工，每位员工要有个人工资单，不就得复制粘贴300遍，算上新建工作表的时间……
其实，完成这项工作，也就是十分钟的事情，不信吗？
呐，今天教你~如何通过数据透视表把汇报数据拆分成多个工作表。
大家好，我是案例
首先需要把每位员工的基本信息单独存放到一张工作表里面，工作表以姓名命名。
1. 插入数据透视表，按顺序设置字段
1.1 全选数据，在现有工作表插入【数据透视表】
1.2 设置数据透视表字段，筛选增加【姓名】，行数据依次增加【工号】、【身份证号码】、【手机号码】
2. 优化数据透视表
1.1 选择透视表任意数据，菜单【设计】、分类汇总选择【不显示分类汇总】
1.2 选择透视表任意数据，菜单【设计】、报表布局选择【以表格形式显示】
3. 按姓名生成工作表，完成汇总数据拆分
选择透视表任意数据，点击菜单【分析】、【数据透视表】、【选项】，使用【显示报表筛选页】功能，以姓名生成工作表，完成汇总数据拆分。
做汇总数据的拆分，还能这么快……
--- E N D ---
「 改变自己从你的分享点赞开始」
本文转载自院长大大（教程基于Excel2016），由会计天下整理发布。我们尊重每位原创作者的心血，并认真的核对版权信息。如因我们的失误导致文章涉及版权问题，请作者与我们联系删除！
现在公众号有置顶功能了，大家把微信更新到最新版本，点开“会计天下”公众号，点“置顶公众号”键，就可以将我们置顶了。这样，您就可以第一时间收到我们发送的精彩内容了！
会计天下『KuaiJiSky』∣一个很实用的公众号
长按，识别二维码，加关注
责任编辑：
声明：该文观点仅代表作者本人，搜狐号系信息发布平台，搜狐仅提供信息存储空间服务。
今日搜狐热点