我们都知道当数据过多的时候,我们制作Excel图表就会显得非常的复杂,图表上面的内容就会特别多。Excel老玩家就会想到用切片器制作动态可变化的图表来显示。今天我们就来学习一下一个比......
2023-01-08
Excel中经常需要使用到vba进行自定义函数的技巧,自定义函数具体该如何用vba自定义呢?接下来是小编为大家带来的excel利用vba定义函数的教程,供大家参考。
excel利用vba定义函数的教程
用vba定义函数步骤1:例:下面表格中需要计算一些三角形的面积
用vba定义函数步骤2:B列是底边长,C列是高,要求在D列通过公式计算三角形面积。
excel利用vba定义函数的教程 图1
(通常我们会在D3单元格用公式 =B3*C3/2 来计算,然后把这个公式向D列下方拖动复制,得到其他公式。这只是一个简单的例子,通过它来学习编写简单的自定义函数)
用vba定义函数步骤3:打开VBA窗口
按ALT+F11调出VBA窗口,插入一个用户模块。
excel利用vba定义函数的教程 图2
用vba定义函数步骤4:编写代码
通常自定义函数是用function命令开始的,在这个命令后面给它指定一个名字和参数
把下面这个自定义函数代码粘贴到刚插入的用户模块中就可以使用了。
Function sjxmj(di, gao)
sjxmj = di * gao / 2
End Function
这段代码非常简单只有三行,先看第一行,其中sjxmj是自己取的函数名字,括号中的是参数,也就是变量,di表示“底边长”,gao表示“高”,两个参数用逗号隔开。
再看第二行,这是计算过程,将di*gao/2这个公式赋值给sjxmj,即自定义函数的名字。
再看第三行,它是与第一行成对出现的,当你手工输入第一行的时候,第三行的end function就会自动出现,表示自定义函数的结束。
excel利用vba定义函数的教程 图3
用vba定义函数步骤5:使用自定义函数
回到EXCEL窗口,我们在D3单元格中输入公式 =sjxmj(b3,c3) ,就会得到这一行的三角形面积了,它的使用方法同内置函数完全一样。
excel利用vba定义函数的教程 图4
用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
统计 = 统计 + 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))
excel利用vba定义函数的教程 图5
用vba定义函数步骤8:如果我们的成绩表格式是固定的,各科目成绩位置相对于区域也是固定的,而且要统计的分数也是固定的90分,就可以在自定义函数中将参数的数量减少到两个,如下:
excel利用vba定义函数的教程 图6
相关文章
我们都知道当数据过多的时候,我们制作Excel图表就会显得非常的复杂,图表上面的内容就会特别多。Excel老玩家就会想到用切片器制作动态可变化的图表来显示。今天我们就来学习一下一个比......
2023-01-08
在工作中,可能许多朋友都会碰到一个情况,那就是工作簿和工作表数据的合并操作。如何将上百个工作簿快速合并到一个表格中,许多朋友可能会觉得不可思议。今天我们就来教大家学习一......
2023-01-08
今天在这里为你分享5个Excel文本函数,这些拆分和组合函数,你一定会用上的。①LEFT函数公式:=LEFT(A2,1)在Excel表格中,需要想要拆分汉字,想从哪里开始就从那哪里开始。首先选定单元格......
2023-01-08
相信大家也和我一样,才开始看到Excel可以当做翻译软件的时候会很好奇,这究竟是怎样做到的?其实,这个方法并不是很难,它是由一个函数公式而制作出来的,好了,首先我们一起来看看成......
2023-01-08
函数可以说是所用快捷方法中最为简单的一种方法,为什么很多人认为函数用起来很难了?主要是因为它拥有很长的函数公式,记不住。其实不管是学Excel函数,还是学习其他的一些快捷方法......
2023-01-08