如何将两个不同的excel里相同的数据合并在一起?
不是单纯的两个表格的数据,是先将一个表格中相同的数据汇总,再与另一个表格中相同的内容相加。我之前用VLOOKUP可是这个只读汇总中的第一个数据,就是没办法关联同个数据的汇...
不是单纯的两个表格的数据,是先将一个表格中相同的数据汇总,再与另一个表格中相同的内容相加。我之前用VLOOKUP可是这个只读汇总中的第一个数据,就是没办法关联同个数据的汇总的总额。
如何将图一的数据,汇总放到图二对应的名称里(图二有些名称是图一没有的,不要直接将数据复制过去的那种)
我之前是先将图一的数据汇总,然后再用VLOOKUP公式把汇总的移到图二相同的名称里,但是这个公式只能只读汇总明细中的第一个数据,不能关联汇总的数据 展开
如何将图一的数据,汇总放到图二对应的名称里(图二有些名称是图一没有的,不要直接将数据复制过去的那种)
我之前是先将图一的数据汇总,然后再用VLOOKUP公式把汇总的移到图二相同的名称里,但是这个公式只能只读汇总明细中的第一个数据,不能关联汇总的数据 展开
3个回答
展开全部
Sub aa()
Dim i, k As Integer
Dim rng As Range
Set d = CreateObject("scripting.dictionary") '创建字典
For i = 2 To Range("b65535").End(3).Row
d(Sheet1.Cells(i, 2).Value) = d(Sheet1.Cells(i, 2).Value) + Sheet1.Cells(i, 3).Value '字典汇总
Next
m = d.keys
n = d.items '将字典赋给数组(这里建议二维数组更好)
For k = 0 To d.Count - 1
Set rng = Sheet2.Columns("a").Find(what:=m(k), lookat:=xlWhole) '查找数组值
If Not rng Is Nothing Then
rng.Offset(0, 1) = n(k) '将对应值写在后面
End If
Next
Set rng = Nothing
End Sub
给你参考 如果你懂vb的话 根据实际情况 稍微改一下可以直接使用
追问
这个我...看不懂
展开全部
最好将表截图上来看一下,利于理解帮忙,不然很难准确帮助你,还要猜呀猜,浪费你我的时间
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
用SUMIF或者SUMPRODUCT来汇总
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询