贵州农业科学版面费:Excel里能做出类似sum ( )的自定义函数吗?

来源:百度文库 编辑:杭州交通信息网 时间:2024/04/29 04:37:50
怎么做的教教我吧!
我把我的70%家产都给你了!
我要自定义的谢谢你了

Function 税金(区域 As Range)
和 = 0
For Each 单元格 In 区域
税金 = 和 + WorksheetFunction.Sum(区域) * 0.05
Next 单元格
End Function
使用时直接用
=税金()即可。
当然可以换一个灵活一点的(当你的税金变化时不用再修改函数)
Function 税金(区域 As Range, N)
和 = 0
For Each 单元格 In 区域
税金 = 和 + WorksheetFunction.Sum(区域) * N
Next 单元格
End Function
此函数增加一个税率

这个函数不需要自定义的,excel里面的函数很多,如果经常要用到的,不妨自己多看看.用起来也比较简单的.

请参考:

http://office.microsoft.com/zh-cn/assistance/HA010548462052.aspx

Excel函数虽然丰富,但并不能满足我们的所有需要。我们可以自定义一个函数,来完成一些特定的运算。下面,我们就来自定义一个计算梯形面积的函数:
1.执行“工具→宏→Visual Basic编辑器”菜单命令(或按“Alt+F11”快捷键),打开Visual Basic编辑窗口。
2.在窗口中,执行“插入→模块”菜单命令,插入一个新的模块——模块1。
3.在右边的“代码窗口”中输入以下代码:
Function V(a,b,h)
V = h*(a+b)/2
End Function
4.关闭窗口,自定义函数完成。
以后可以像使用内置函数一样使用自定义函数。
提示:用上面方法自定义的函数通常只能在相应的工作簿中使用。

先别关闭问题~

有空我给你各VBA编写的类似sum函数

100分呀

留名先

呵呵。

我也不知道
唉~只知道又得了两分