excel表中怎么用函数求和?

如题所述

1、电脑打开Excel表格。

2、打开Excel表格后,按Alt+F11,调出VBA窗口,然后点击插入。

3、点击插入后,选中插入模块。

4、插入模块后,复制代码

Function abc(a As Range, b As Range, c As String)
Dim t As String
'如果a与b的区域大小不同,就显示“错误”
If a.Rows.Count <> b.Rows.Count Then abc = "错误": Exit Function
'在区域a是循环
For i = 1 To a.Rows.Count
'如果在a中找到与c相同的值,就把同一行中的b的内容提取出来,存入变量t中。
If a.Cells(i, 1) = c Then t = t & " " & b.Cells(i, 1)
Next
'将变量的值赋给自定义函数
abc = t
End Function

复制代码粘贴。

5、粘贴代码后,返回表格中输入公式=abc($A$1:$A$9,$B$1:$B$9,A1)。

6、输入公式后,回车就可以匹配多个结果了。

温馨提示:答案为网友推荐,仅供参考

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网