Question

高难度！excel复杂条件求和，求大神解答

如图所示

Answer 1

=SUMPRODUCT(VLOOKUP(MID(D2,ROW(INDIRECT("1:"&LEN(D2))),1),A:B,2,))

注：本公式在office2021预览版演示，其它版本可能需要按ctrl+shift+enter产生数组公式的花括号，才能正常计算。

Answer 2

在E3单元格输入以下数组公式，按Ctrl+Shift+Enter组合键结束，然后向下填充公式

=SUM(SUMIF(A:A,MID(D3,ROW($1:$3),1),B:B))

详见附图示例

Answer 3

就你例子而言，数组公式=SUM(IFERROR(LOOKUP(MID(D3,ROW($1:$3),1),$A$3:$A$6,$B$3:$B$6),0))

Answer 4

普通 写法，如果高版本，可以写得更简单些

Answer 5

这种问题，公式就算了。直接VBA吧：
Sub test()
Dim arr, brr
arr = Range("a1").CurrentRegion
brr = Range("d1").CurrentRegion
Dim i, j As Integer
For i = 2 To UBound(brr)
For j = 2 To UBound(arr)
If InStr(brr(i, 1), arr(j, 1)) <> 0 Then
brr(i, 2) = brr(i, 2) + arr(j, 2)
End If
Next j
Next i
[e1].Resize(UBound(brr)) = Application.Index(brr, , 2)
End Sub

追问

VBA太难了，一点不懂，想要一个公式解决方案。不知道大家明白我的意思没有，再送上照片一张，反映实际问题。

追答

说实在的，如果项目很多，也估计只有VBA能帮你快速解决了。
BTW：问Excel问题不截行列号，可能很多人都会直接放弃帮你的念头了。

追问

虽然没达到我想要的效果，还是要感谢“思雪遥遥”，看得出你已经算得上“大神”级选手了，谢谢！期待更多回答

追答

客气。其实你可以让我看原表，直接把VBA代码套上去，啥事都解决了。因为你这个问题要用到数组公式，数据一多，电脑配置一般的话，直接“假死”。