如何将一个Excel工作表的数据按一列的关键字拆分成多个工作表？
如何根据表格中的订单号C列，将一张总表格拆分成不同的子工作表，每个子工作表的命名按照订单号命名？
VBA代码如下：
Sub 如何将一个Excel工作表的数据拆分成多个工作表()
&&& Dim Arr, Rng
As Range, Sht As Worksheet, Dic As Object
&&& Dim k, t,
Str As String, i As Long, lc As Long
Application.ScreenUpdating = False '关闭屏幕更新
Range("A1").CurrentRegion.Value
UBound(Arr, 2) '求取最后一列的列号
&&& Set Rng =
Rows(1) '标题行
&&& Set Dic =
CreateObject("Scripting.Dictionary") '创建字典
&&& For i = 2 To
UBound(Arr)
Str = Arr(i, 3) '订单号，关键字
If Not Dic.Exists(Str) Then '如果字典没有关键字
&&&&&&&&&&&
Set Dic(Str) = Cells(i, 1).Resize(, lc) '把当前行装入到字典中
Else '否则(字典中存在关键字)
&&&&&&&&&&&
Set Dic(Str) = Union(Dic(Str), Cells(i, 1).Resize(, lc))
'把行连合起来
&&& k = Dic.Keys
'字典关键字集合
Dic.Items '字典项目集合
&&& On Error
Resume Next
For i = 0 To Dic.Count - 1 '循环关键字的个数
&&&&&&&&&&&
Set Sht = .Item(k(i)) '给变量赋值(工作表名为关键字)
&&&&&&&&&&&
If Sht Is Nothing Then '该工作表不存在则插入一个空工作表
&&&&&&&&&&&&&&&
.Add(After:=.Item(.Count)).Name = k(i)
'新建的工作表将置于所有工作表之后，并命名为关键字
&&&&&&&&&&&&&&&
Set Sht = ActiveSheet '活动工作表给变量
&&&&&&&&&&&
Else '否则
&&&&&&&&&&&&&&&
Sht.Cells.Clear '清除工作中所有内容和格式
&&&&&&&&&&&
&&&&&&&&&&&
Rng.Copy Sht.Range("A1") '把标题写入第一行
&&&&&&&&&&&
t(i).Copy Sht.Range("A2") '写入其他内容
&&&&&&&&&&&
Sht.Cells.EntireColumn.AutoFit '自动调整全工作表单元格的列宽
&&&&&&&&&&&
Set Sht = Nothing '变量处于初始状态
Sheets(1).Activate '第1个工作表处于激活状态
Application.ScreenUpdating = True '打开屏幕更新
新浪博客:http://weibo.com/u/
百度空间:http://hi.baidu.com/
往期精彩在:
腾讯(QQ)微博:http://t.qq.com/huangshifang?preview
更多分享请关注微信号
微信号：Excel 或:
雪山飞狐Excel
喜欢本文，请点击右上角，分享本文。
或扫扫二维码
已投稿到：
以上网友发言只代表其个人观点，不代表新浪网的观点或立场。怎么将两个Excel用关键字相关联起来合成一张新表？ - 知乎3被浏览347分享邀请回答0添加评论分享收藏感谢收起查看: 3475|回复: 26
怎么将三个表格关联起来再乘起来
阅读权限10
在线时间 小时
1.jpg (18.2 KB, 下载次数: 1)
16:24 上传
sheet1是销售情况
2.jpg (16.92 KB, 下载次数: 0)
16:25 上传
sheet2是各个商品的情况
3.jpg (18.7 KB, 下载次数: 0)
16:25 上传
sheet3是最后清点商品的情况
想问的是：怎么将sheet1中销售的配方中的红豆或绿豆的量在sheet3中显示出来？求大神把函数写出来
(7.86 KB, 下载次数: 21)
16:31 上传
点击文件名下载附件
阅读权限100
在线时间 小时
你工作表：sheet3里 “原库存”、“进货量”的数据是怎么来的，而且你工作表：sheet1里的D列数量是对应工作表sheet3是放在哪列的？
########################################################################################
欢迎新会员： 加入EXCELHOME这个大家庭！
新人必读，在求助时，尽量对你上传的EXCEL附件进行简要的说明，并能通过手工做几个示例，这样更能方便他人理解与验证，你也就会更快捷得到解决问题的办法。
[新手必读]发帖须知、上传附件、截图动画、压缩解压、靓帖推荐：
Excel Home论坛学习及使用完全攻略(新人必读)：
EH技术论坛的最佳学习方法：
Excel免费培训：
关于实施普通会员可参与优秀帖子评分的说明：（在得帮助同时，别忘了对给予你帮助的人说声谢谢。并且能在给予你解决问题方法的帖子，进行确定或说明是否能满足你的要求。同时也别忘了对于那些给予你，好的解决问题方法的会员，送上鲜花！在对应帖子当前楼层右边偏下方有一个评分按钮，点击就可以送花了）
同时希望你常用论坛左上角的搜索功能进行搜索，也许你的问题都已经在论坛里得已解决。
阅读权限10
在线时间 小时
dengjq2000 发表于
你工作表：sheet3里 “原库存”、“进货量”的数据是怎么来的，而且你工作表：sheet1里的D列数量是对应工作 ...
也许是我没截好，我这个表是截了原表中的一些，进货量跟原库存与三个关联起来是没关系的，只要最后把卖掉的配方中的红豆或绿豆的量计算出来就行。。现在关键是怎么将三个表关联起来算出卖掉的配方中的红豆和绿豆的量。。sheet1中D列的数量是销售卖出去的数量。。主要目的是：卖的配方数量(sheet1中D列，单位是袋)乘以每袋配方中红豆或绿豆的量（sheet2中的E列）最后在sheet3中的“配方中”（及H列）显示，然后最后的总计就是现库存减去卖掉的配方中的量。。不知道我说清楚了没？
阅读权限100
在线时间 小时
可我看到你的工作表：“Sheet1”的E列红豆或绿豆单位是“g”，而不是“袋”呀？
做一个示例，你自己先理解一下公式吧，然后根据你自己的需要进行适当修改。注意：P列的公式，是针对红豆或绿豆单位为“袋”计算的
22:56 上传
点击文件名下载附件
8.56 KB, 下载次数: 11
阅读权限10
在线时间 小时
dengjq2000 发表于
可我看到你的工作表：“Sheet1”的E列红豆或绿豆单位是“g”，而不是“袋”呀？
做一个示例，你自己先理解 ...
是这样的，最后清点库存的时候，不会算卖了多少配方，是要算卖了的配方中的红豆或绿豆与单卖出去的红豆或绿豆总共是多少。。sheet1中的红豆或绿豆是单卖出去的，是以克为单位卖的，上面还有卖出去的配方，是以袋为单位卖的。。最后清点时，不是要算卖出去多少袋配方，而是要算卖出去的配方中红豆或绿豆总共多少克？然后再加上单卖出去的红豆或绿豆的量，就是我要求的结果。。。现在只要能计算出卖出去的配方中的红豆或绿豆的量就行，其他的我已经做出来了，只要求这一块的函数就行。。我看了你的表，貌似是用SUMPRODUCT这个函数，不过我不会用，谢谢你哈，能不能再按我的要求做一下
阅读权限100
在线时间 小时
你自己能不能你的附件进行示例操作，把你想的结果及你引用的数据，做一个简要说明（当然也可以通过引用的单元格区域其他着色处理，方便他人理解）
阅读权限10
在线时间 小时
dengjq2000 发表于
你自己能不能你的附件进行示例操作，把你想的结果及你引用的数据，做一个简要说明（当然也可以通过引用的单 ...
我根据你的要求把它简化了一下，用到的数据提亮并标示了一下。。
(11.63 KB, 下载次数: 13)
15:36 上传
点击文件名下载附件
阅读权限100
在线时间 小时
在你工作表：“sheet1”增加了两列辅助列，这样相对方便些。同时你的该工作表的内容可以继续往下增加，只需把E、F列辅助列一起往下拉即可。
19:56 上传
点击文件名下载附件
12.48 KB, 下载次数: 13
阅读权限10
在线时间 小时
dengjq2000 发表于
在你工作表：“sheet1”增加了两列辅助列，这样相对方便些。同时你的该工作表的内容可以继续往下增加，只需 ...
很清楚明了，还学习了不少函数的应用，谢谢版主哈
阅读权限10
在线时间 小时
dengjq2000 发表于
在你工作表：“sheet1”增加了两列辅助列，这样相对方便些。同时你的该工作表的内容可以继续往下增加，只需 ...
版主，我完整的写了一下库存清点表格，能不能重新帮我完善一下。。真心非常感谢。。
(26.87 KB, 下载次数: 9)
09:43 上传
点击文件名下载附件
最新热点 /1
ExcelHome每周都有线上直播公开课，
国内一流讲师真身分享，高手贴身答疑，
赶不上直播还能看录像，
关键居然是免费的！
厚木哥们都已经这么努力了，
你还好意思说学不好Office。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师如何用excel表格制作一个检索目录，按不同的分类，就会有不同的结果。
我的图书馆
如何用excel表格制作一个检索目录，按不同的分类，就会有不同的结果。
如何用excel表格制作一个检索目录，按不同的分类，就会有不同的结果。
从上面分类的结果中再按班级分，1班就有A比如说,E,G,B,K,J，不同的检索就有不同的结果出来，很急,K 想看什么，一群人，B，看什么都一目了然,2班就有E。谢谢了！，按男女分，男就有A，女就有F,C,D，而且都很全 请各位指教具体怎么做,H,J用超级链接功能：在一个工作薄中首先创建一个主表（所有检索工作在此表中进行），请研究帮助中的“超级链接”。“主表”也相当于是一个目录一样的效果。最后将主表中的文件名分别与对应的被检索表一一对应链接在一起即可，然后将你要被检索的其他内容分别放在本工作薄的其他表中（分别有相应的被检索名称）。即
用超级链接功能：在一个工作薄中首先创建一个主表（所有检索工作在此表中进行），请研究帮助中的“超级链接”。“主表”也相当于是一个目录一样的效果。最后将主表中的文件名分别与对应的被检索表一一对应链接在一起即可，然后将你要被检索的其他内容分别放在本工作薄的其他表中（分别有相应的被检索名称）。即
B,2班就有E这是个排序问题，1班就有A,E,K的问题也解决了,H，女就有F,K，其他类推，主要是排序关键字的选择,C,J.的问题就解决了,J，你先按性别排序,D，在上次排序的基础上，男就有A，在按班级排序，B,G
用excel如何制作表格?～～～
用鼠标选定你需要做的表格,单击右键,选择“设置单元格格式”,选择“边框”按扭,然后选择你所需要的线型...如何使用EXCEL制作表格～～～
用鼠标选定你需要做的表格,单击右键,选择“设置单元格格式”,选择“边框”按扭,然后选择你所需要的线型...怎么用excel制作表格～～～
1:样式里面的三种,你可以试一下,其中套用表格是现成的,可以直接用。 2:可以自己制作出来, a:出...如何用excel制作表格?～～～
EXCEL里本来就是表格,不用制作.至于如何做的好看 无非就是合并单元格,画框框(小技巧,可以中间是...怎么用excel制作表格～～～
新手入门电子档教程 wenku.baidu/search?word=excel...怎么用Excel制作表格?～～～
一、如何使用excel制作表格?用惯了word做表格的朋友们,初接触excel来做表格,可能有些无从...怎么用excel制作图表～～～
先选中要作图的区域 再在莱单栏中点插入-》要制作的类型(柱形图,饼图等)-》选择你需要的类型-》完成...怎么用excel或者Word制作表格～～～
在word中制作组织结构图 在菜单栏中选择插入—图示—组织结构图,框架就出来了,选择最下的框,右键下...如何用Excel制作报表～～～
按住ctrl 键的同时,去点选 你需要选择的那10列(从顶部单击列号,比如B、D……),然后到新的s...
答：excel公式一般情况下都是这样的格式:=函数(引用范围,参数) 例如求和函数:=sum(a1:a10),求出a1到a10这10个单...
答：此对话帮助你在 Excel 中完成加、减、乘、除计算。我刚开始使用Excel记录家庭开支,但是我不知道如何自动计算结余。 所以我现在...
答：1、先选择下拉菜单视图》编辑栏这样你在表格的上方就显示了:名称框及fx(插入函数) 2、点取要编辑公式的...　fx函数(如果点不出...
答：那么如果我们用Excel来看的话会比较的隐蔽,别人不会知道你在做什么。那么怎么做到这一点呢?首先我们必须要找到一个可以显示股票信息的...
答：销售量是呈年度增长趋势,并随季度周期性变化。 1.预测2010年总销售量 70 20...
答：Excel不能画这样的图像,但可以画t-x,t-y,都以t为横坐标,分别以x,y为纵坐标的图。一般数学上的图,也是这样的,同一个横坐...
答：假设E列是学生成绩,F列是学生成绩的名次,成绩高的为第1名,则可在F列输入公式: =rank(E2,E2:E400)再向下填充公式就...
答：不知道这组数据是否存在负数,若全部是大于0 的数,可以用下面公式完成: =COUNTIF(A2:A100,"&=1") 公式假设全部数据是...
答：绘制函数图象做教学工作的朋友们一定会遇到画函数曲线的问题吧!如果想快速准确地绘制一条函数曲线,可以借助EXCEL的图表功能,它能使你...
答：首先打开一个空白Excel,上方的 文件另存为网页 保存关闭Excel不保存打开我的文档找出刚才另存为的page文档在表格中找出20...
馆藏&47969
TA的最新馆藏[转]&[转]&[转]&[转]&[转]&[转]&[转]&
喜欢该文的人也喜欢如何在一个excel表格中关联到另一个excel表格中?_百度知道
如何在一个excel表格中关联到另一个excel表格中?
我做一个一个EXCEL总表。。但又用总表上的数据关联到其他的几个表格。现在总是变动其他的数据，但别的EXCLE也要改动。该怎么办啊？
我有更好的答案
对经常需要变动的表格的单元格进行关联。具体方法是：左键单击选中需要被关联的单元格——输入“=”——左键单击与之相关联的经常需要变动的表格的单元格——回车——完成了！例如：想要使表1中F1单元格数值变化时表2、3中的F1也随之变化，就要先选中表2的F1单元格，输入=，左键单击表1中F1，回车，这样当表1中F1更改时，表二也会跟着变化！表3亦如此！有点像绕口令啦！要是还不明白给我留言！
采纳率：36%
这样做：1.
选择 任意单元格（此格为链接
只要单击此格
就会 自动 链接到 你所设置 的 其他 表格）2.
插入——超链接。。。
选择 本文档中的位置
选择 你 所说的 其他 表格 的 位置
确定 即可。当然 也可以 链接 到 其他 文件 ，按你的要求设置 就可以了。
可以在同一个EXCEL 不同的SHEET之间取数
可以跨表引用的~
你可以在总表引用其他数字后不要再用公式，而是改成数字就可以了。
其他2条回答
为您推荐：
其他类似问题
您可能关注的内容
excel表格的相关知识
换一换
回答问题，赢新手礼包
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。