按单位汇总，在一个单元格输出所有汇总结果，结果依次按数量单位罗列出来 ...

唐山大兄

剪力墙

上传附件，说明需求
另外，扇 块盒之间有没有换算的必要？一起说明一下

做我老婆好不好

吉隆

这样？？
=SUMIF($A$1:$A$5,"扇",$B$1:$B$5)&"扇"&SUMIF($A$1:$A$5,"块",$B$1:$B$5)&"块"&SUMIF($A$1:$A$5,"盒",$B$1:$B$5)&"盒"

从无到有一直走

附件如下，单位之间没有换算关系，每次统计的单位都可能不一样
统计数量单位.zip (6.75 KB, 下载次数: 143)

2021-10-20 11:23 上传

点击文件名下载附件
统计数量单位.zip

几分之几

用自定义函数解决问题了，以下自定义函数代码供参考
Function myhz(ByVal rng As Range) As String
arr = rng
Dim d
Set d = CreateObject("scripting.dictionary")
For i = 1 To UBound(arr)
d(arr(i, 1)) = d(arr(i, 1)) + arr(i, 2)
Next
myhz = ""
If d.Count > 0 Then
k = d.Keys
t = d.Items
For i = 0 To d.Count - 1
If t(i) <> 0 Then
myhz = myhz & t(i) & k(i)
End If
Next
End If
End Function