首页

51问答网 > 以下Excel VBA自定义函数如何编写？

以下Excel VBA自定义函数如何编写？

2025-03-12 19:44:15

推荐回答（4个）

回答1：

1.怎么判断这些不连续的列？无论是写function还是用原有的函数，这个你都得说清楚
2.=average(if(A1:F1<>0,A2:F2))
crtl+shift+enter结束公式

回答2：

=SUMPRODUCT(B1:B7,C1:C7) 这个可以满足吧

平均算法

Public Function AVERAGEx(x As Range, y As Range)
Dim m
For i = 0 To x.Count - 1
If Cells(y.Row + i, y.Column).Value <> 0 Then
m = m + Cells(x.Row + i, x.Column).Value
End If
Next
AVERAGEx = m
End Function
这是自定义函数，试试吧

回答3：

直接用函数比较简单：
=Sumproduct(A1:N1,B1:N1)/N

回答4：

什么东东哪里？

相关问答

最新问答

带正电的导体其电势一定是正值,对吗，为什么？

我有一套房子，按揭房，通过二手房介绍卖给了别人，签了买卖协议，他跟着我的分期走，现在乙方已经让我两

路虎极光轮胎规格尺寸是多少？

我的苹果4反应很慢卡怎么回事

2013新君威2、0排量，车跑3万公里，故障码p0016 p0017分别显示进气凸轮轴位置不合理和

因为遇见你的歌词是什么？

我今年24岁，男，血压平均就是81⼀136，算高血压不？我平时应该注意点啥？防止血压升高

电动车电机坏了保修换电机要收手工费怎么办？

从潍坊市到山东省菏泽市定陶县顺丰快递要几天可以到

罗马全面战争古典欧亚大地图怎么修改