编写简单的EXCEL自定义函数.docVIP

下面通过一个例子来学习简单的编写自定义函数 例：下面表格中需要计算一些三角形的面积 B列是底边长，C列是高，要求在D列通过公式计算三角形面积。 （通常我们会在D3单元格用公式 =B3*C3/2 来计算，然后把这个公式向D列下方拖动复制，得到其他公式。这只是一个简单的例子，通过它来学习编写简单的自定义函数） 1、打开VBA窗口按ALT+F11调出VBA窗口，插入一个用户模块。 2、编写代码通常自定义函数是用function命令开始的，在这个命令后面给它指定一个名字和参数把下面这个自定义函数代码粘贴到刚插入的用户模块中就可以使用了。Function sjxmj(di, gao)sjxmj = di * gao / 2End Function 这段代码非常简单只有三行，先看第一行，其中sjxmj是自己取的函数名字，括号中的是参数，也就是变量，di表示“底边长”，gao表示“高”，两个参数用逗号隔开。再看第二行，这是计算过程，将di*gao/2这个公式赋值给sjxmj，即自定义函数的名字。再看第三行，它是与第一行成对出现的，当你手工输入第一行的时候，第三行的end function就会自动出现，表示自定义函数的结束。 3、使用自定义函数回到EXCEL窗口，我们在D3单元格中输入公式 =sjxmj(b3,c3) ，就会得到这一行的三角形面积了，它的使用方法同内