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

怎么在<em>Excel</em>中创建<em>自定义函数</em>-自

作者:乔山办公网日期:

返回目录:excel表格制作


用户自定义函数--如果要在公式或计算中使用特别复杂的计算,而工作表函数又无法满足需要,则需要创建用户自定义函数。
用户自定义函数,可以通过使用 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)

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

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

举例说明。

例如要做一个单元格求和的自copy定义函数,比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)。结果如图:


我的是office 2013,在VBE界面可以看到插入菜单中的【模块】
你确定是office excel?不是WPS吧?excel各种版本我都是完全安装的,没有碰到过不出现插入模块的情况。

能截图上来吗?插入菜单下整个界面的截图

函数都是预设的,要记住输入函数时一定要先输入一个等于号.如下:
举个最简单的例子,C1单元格要放A1说B1的总和数据,你可以在C1单元格内先输入等于号,再用鼠标单击A1再手动输入一个加号,再单击B1再回车,那么C1就有一个预设的函数了.你将鼠标指针指向C1单元格右下角直至它变成实心加号,按住不放往下拖,你想有多少行就有多少行.你想要求和的数据只要分zd别输入在A1于B1单元格内就OK了.

相关阅读

关键词不能为空
极力推荐
  • excel小技巧,快速制作斜线表头-excel表格斜线

  • excel表格斜线,表头办公职场白领会计划重点:方便大家在横竖表头中更清晰美观的呈现在表头输入月份然后alt+回车在输入姓名用空格调整位置右键设置单元格格式在边框选项中点击右下

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