我们在实际的运用中，会遇见一些公式库中没有的公式，虽然能通过公式或是函数嵌套的方法能够实现，但是都过于麻烦。而Excel的VB编辑器就提供了这样的功能，自己写公式，今天我们就来写一个梯形的面积公式。工具/原料moreExcel2003方法/步骤1/6分步阅读

打开Excel菜单栏中的“工具”--“宏”--“visual basic编辑器”。

2/6

在弹出的VB编辑器中，在左边的工程项目出新建一个模块。

3/6

新建完毕后，在右面的代码编辑器输入如下代码：

Function S(a, b, h)

S = (1 / 2) * (a + b) * h

End Function

这就是梯形的面积公式：（上底+下底）*高/2，函数名称S。

4/6

代码输入完毕后，保存就行了，保存的的形式是以一工作簿的形式保存的，新建的这个公式只能在这个文件中使用。打开保存的这个工作簿，一般开始打开时候都会提示是否启用宏，一定要选择是，不然我们新建的公式是运行不了 的。打开之后，我们任意的输入几组验证数据，若觉得难得录的话，用rand函数生成一组数也行，只是数据会变化。

5/6

现在我们选中D5单元格，然后选择菜单栏上的插入--函数--自定义函数--S，然后分别将A,B,C所在的地址填在函数参数中，确定变可以出结果了。

6/6

然后再用自动填充分方法将余下的单元格进行填充，我们需要计算的面积就算完成。很显然，这种做法对于大批量的求同一种运算时候，会给我们的计算带来很大的帮助。

EXCEL自定义公式VB编辑新公式VB编辑器