用自定义函数吧
Function Q(rng)
For Each x In rng
If Left(x, 1) = "Q" Then
Q = Q + Val(Right(x, Len(x) - 1))
End If
Next
End Function
图解如下:
1。ALT+F11,在左上角空白处,单击右键,添加模块,在模块中复制上述代码
2.关闭,返回Excel,在要求和的单元格中,直接输入=Q(求和区域),就可以得到结果了
本文如未解决您的问题请添加抖音号:51dongshi(抖音搜索懂视),直接咨询即可。