vba 自定义函数 excel利用vba定义函数的教程

Excel中经常需要使用到vba进行自定义函数的技巧,自定义函数具体该如何用vba自定义呢?接下来是小编为大家带来的excel利用vba定义函数的教程,供大家参考。

excel利用vba定义函数的教程:

用vba定义函数步骤1:例:下面表格中需要计算一些三角形的面积

用vba定义函数步骤2:B列是底边长,C列是高,要求在D列通过公式计算三角形面积。

(通常我们会在D3单元格用公式 =B3*C3/2 来计算,然后把这个公式向D列下方拖动复制,得到其他公式。这只是一个简单的例子,通过它来学习编写简单的自定义函数)

用vba定义函数步骤3:打开VBA窗口

按ALT+F11调出VBA窗口,插入一个用户模块。

用vba定义函数步骤4:编写代码

通常自定义函数是用function命令开始的,在这个命令后面给它指定一个名字和参数

把下面这个自定义函数代码粘贴到刚插入的用户模块中就可以使用了。

Function sjxmj(di, gao)

sjxmj = di * gao / 2

End Function

这段代码非常简单只有三行,先看第一行,其中sjxmj是自己取的函数名字,括号中的是参数,也就是变量,di表示“底边长”,gao表示“高”,两个参数用逗号隔开。

再看第二行,这是计算过程,将di*gao/2这个公式赋值给sjxmj,即自定义函数的名字。

再看第三行,它是与第一行成对出现的,当你手工输入第一行的时候,第三行的end function就会自动出现,表示自定义函数的结束。

用vba定义函数步骤5:使用自定义函数

回到EXCEL窗口,我们在D3单元格中输入公式 =sjxmj(b3,c3) ,就会得到这一行的三角形面积了,它的使用方法同内置函数完全一样。

用vba定义函数步骤6:通过上面例子可以了解自定义函数的编写和使用方法,下面再介绍一个稍微复杂点的自定义函数。

经常对数据进行处理的朋友可以会遇到多条件查找某一个数据,一般这种情况需要编写“数组公式”来解决,公式较长,也不易理解。

比如下面统计成绩的表格,需要根据A1:D7的成绩表,统计出两门功能都在90分以上的学生人数。

大家可以看到在H3单元格中的公式比较长,理解起来也有一定难度。

我们通过自定义函数也可以得到正确结果,函数代码如下:

Function 统计(a, b, c, d, e)

For i = 1 To a.Rows.Count

If b = a.Cells(i, 1) And a.Cells(i, c) >= e And a.Cells(i, d) >= e Then

vba 自定义函数 excel利用vba定义函数的教程

统计 = 统计 + 1

End If

Next

End Function

这个函数用了五个参数(因为涉及到一个区域和四个条件)

参数a表示要统计的区域,在此例中为B2:E7

参数b表示要统计的是哪一个班级,在此例中为G3单元格

参数c表示数学成绩相对于区域第一列向右的列数,在此例中为3

参数d表示数学成绩相对于区域第一列向右的列数,在此例中为4

参数e表示分数,在此例中为90分

提示:要注意参数c和d“相对”于“区域”的列数,并非是从A列开始向右的列数。

把上面这段代码也粘贴到用户模块中就可以使用了

回到EXCEL窗口,在H3单元格中输入公式 =统计($B$2:$E$7,G3,3,4,90) 就可以显示正确结果了。

Function 统计2(a, b)

For i = 1 To a.Rows.Count

If b = a.Cells(i, 1) And a.Cells(i, 3) >= 90 And a.Cells(i, 4) >= 90 Then

统计 = 统计 + 1

End If

Next

End Function

在表格中的H3单元格中输入公式 =统计2($B$2:$E$7,G3) 就可以了。

从上面可以看出,自定义函数可以使用“汉字”做为函数的名字,方便记忆,也可以根据实际情况对参数进行简化。

用vba定义函数步骤7:通常这种时候需要在H3单元格使用数组公式 =SUM(IF(($B$2:$B$7=G3)*($D$2:$D$7>=90)*($E$2:$E$7>=90),1,0))

用vba定义函数步骤8:如果我们的成绩表格式是固定的,各科目成绩位置相对于区域也是固定的,而且要统计的分数也是固定的90分,就可以在自定义函数中将参数的数量减少到两个,如下:

看了excel利用vba定义函数的教程还看了:

1.excel中使用vba功能的方法

2.excel进行自定义函数操作的教程

3.excel中使用vba的方法

4.Excel函数教程

5.excel 自定义函数的教程

6.excel2007vba基本使用教程

7.excel创建自定义函数的教程

  

爱华网本文地址 » http://www.413yy.cn/a/251461/999179899.html

更多阅读

EXCEL自定义函数 2013excel自定义函数

在工作中有时会遇到在编写公式时,找不到适合的EXCEL内置函数,或者虽然可以使用内置函数,但会造成公式复杂不易理解,这时就可以考虑使用自定义函数了。 编写自定义函数需要一定的VBA基础,但完成后,就可以像使用内置函数一样方便了,任何人都

matlab中同一文件定义子函数的方法 matlab定义函数的方法

matlab中同一文件定义子函数的方法有时子函数可能很短,就几行,可能希望将多个函数定义放在同一个.m文件中,这里就存在一个子函数的定义问题。在matlab中一个.m文件中可以有多个的子函数,但仅能有一个主函数,并且M文件名必须和主函数相同

在excel中使用自定义函数 excel2013自定义函数

**ZxwLu**欢迎您在excel中使用自定义函数我们都知道,在Excel中,提供了很多常用的功能强大的内置函数,只要使用这些内置的函数,就能提高我们的工作效益。但是,提供的内置函数,毕竟都是常用的;可是,我们的工作问题,不可否认具有特殊性,因此,在某

Matlab自定义函数的几种方法 matlab自定义函数调用

Matlab自定义函数的几种方法1、函数文件+调用命令文件:需单独定义一个自定义函数的M文件;2、函数文件+子函数:定义一个具有多个自定义函数的M文件;3、Inline:无需M文件,直接定义;4、匿名函数;5、Syms+subs: 无需M文件,直接定义;6、字

声明:《vba 自定义函数 excel利用vba定义函数的教程》为网友江南未寒分享!如侵犯到您的合法权益请联系我们删除