Office中国论坛/Access中国论坛

标题: 如何让文本参与计算而不出错 [打印本页]

作者: nnynxx 时间: 2008-2-23 09:41
标题: 如何让文本参与计算而不出错
我写个算工资的function如下
Function js(b)
If b > 8 Then
js = b - 8
Else
js = 0
End If
End Function
然后我在单元格内就
这么用=sum(js(a4),js(b4),js(c4),..........js(ad4))这个好麻烦!怎么简化这个过程呢??
还有就是如果c4内是文本的话,会出错,怎么能即让它参与到公式内来又避免错误??
急!!!!
新手!!
文字错误的问题我解决了,...
Function js(b)
If b = "休" Or b = "假" Then
b = 0
ElseIf b > 8 Then
js = b - 8
Else
js = 0
End If
End Function
但是....sum怎么去简化!!!

[ 本帖最后由 nnynxx 于 2008-2-23 09:50 编辑 ]

作者: pureshadow 时间: 2008-2-23 13:22
FUNCTION可以简化为函数：
=SUM(IF(IF(ISNUMBER(A1:A16),A1:A16,0)>8,IF(ISNUMBER(A1:A16),A1:A16,0)-8,0))，组合键结束
其中的ISNUMBER可以自定义函数名称。

作者: liwen 时间: 2008-2-23 13:44
=SUMIF(A4:AD4,">8",A4:AD4)-COUNTIF(A4:AD4,">8")*8

[ 本帖最后由 liwen 于 2008-2-23 13:58 编辑 ]

作者: pureshadow 时间: 2008-2-26 15:08
楼上的好思路，赞一个

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)