乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > 怎么在Excel中创建自定义函数-excel怎么插入函数,excel怎么使用函数

怎么在Excel中创建自定义函数-excel怎么插入函数,excel怎么使用函数

作者:乔山办公网日期:

返回目录:excel表格制作




举例说明。

例如要做一个单元格求和的自定义函数zhidao,比sum函数增加一个条件,就是如果单元格有删除线标记,则不计入该单元格的数值。如图:

第一步:在visual basic模式下插入模块,并创建自定义函数。代码如下:

Public Function mysum(qu As Range)
Dim s As Double
Dim b
mysum = 0
For Each b In qu
If b.Font.Strikethrough = False Then
   mysum = mysum + b.Value
End If
Next
End Function

第二步:在c15单元格输入公式:=mysum(C4:C14)。结果如图:


用户自定义函数--如果要在公式或计算中使用特别复杂的计算,而工作表函数又无法满足需要,则需要创建用户自定义函数。
用户自定义函数,可以通过使用 Visual Basic for Applications 来创建。

举个简单的例子:

在上述Excel工作表中,选择菜单“工具→宏→Visual Basic编辑器”命令,打开Visual Basic窗口,然后选择菜单“插入→模块”命令,插入一个名为“模块1”的模块。
在新窗口中拷贝以下代码:

function v(a,b)
v=a*b
end function

关闭

回到EXCEL工作表界面,输入公式
=V(B1,C1)
如果B1=9,C1=9,则自定义函数执行结果为B1*C1=81(就是代码中的a*b)

完毕之后点文件-另存格式为-加载宏。
宏的保存与调用
菜单--文件--另存为 保存类型选-加载宏.xla
菜单--工具--加载宏,找出V

相关语法涉及VB内容,请参阅相关资料。

用户自定义函数--如果要在公式或计算中使用特别复杂的计算,而工作表函数又无法满足需要,则需要创建用户自定义函数。
用户自定义函数,可以通过使用 Visual Basic for Applications 来创建。

举个简单的例子:

在上述Excel工作表中,选择菜单“工具→宏→Visual Basic编辑器”命令,打开Visual Basic窗口,然后选择菜单“插入→模块”命令,插入一个名为“模块1”的模块。
在新窗口中拷贝以下代码:

function v(a,b)
v=a*b
end function

关闭

回到EXCEL工作表界面,输入公式
=V(B1,C1)
如果B1=9,C1=9,则自定义函数执行结果为B1*C1=81(就是代码中的a*b)

完毕之后点文件-另存格式为-加载宏。
宏的保存与调用
菜单--文件--另存为 保存类型选-加载宏.xla
菜单--工具--加载宏,找出V

相关语法涉及VB内容,请参阅相关资料。

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网