本文作者:office教程网

excel利用vba定义函数的教程全解

office教程网 2024-11-05 21:00:19
后台-系统设置-扩展变量-手机广告位-内容正文顶部
摘要:   Excel中经常需要使用到vba进行自定义函数的技巧,自定义函数具体该如何用vba自定义呢?接下来是小编为大家带来的excel利用vba定义函数的教程,供大家参考。
  ...

  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)

wps表格求乘积的教程

wps中经常需要使用到求乘积的技巧,乘积具体该如何求出呢?下面是小编带来的关于wps表格求乘积的教程,希望阅读过后对你有所启发! wps表格求乘积的教程: 求乘积步骤1:首先应保证您的电脑上装有表格软件,我的这个版本是最新的 求乘积步骤2:点击进入表格界面 求乘积步骤3:我们今天要学习怎样用函数计算(就

  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中if公式的使用教程

Excel中经常需要使用到if公式进行判断数据,if公式具体该如何使用呢?下面是由小编分享的excel中if公式的使用教程,以供大家阅读和学习。 excel中if公式的使用教程: if公式使用步骤1:首先电脑上安装好OFFICE办公软件,打开一个空白表格,进行第2步 if公式使用步骤2:在A1\A2\A3分

后台-系统设置-扩展变量-手机广告位-内容正文底部
未经允许不得转载:

作者:office教程网,原文地址:excel利用vba定义函数的教程全解发布于2024-11-05 21:00:19
转载或复制请以超链接形式并注明出处 演示站

分享到:

觉得文章有用就打赏一下文章作者

支付宝扫一扫打赏

微信扫一扫打赏

留言与评论(共有 0 条评论)
   
验证码: