尽管如何在excelll提供了众多的公式基本涵盖了大多数的应用场景，但总有不能实现特定场景的时候这时候用户可以自己编写公式。编写用到的语言是VBA本文以计算一个产品的物料总用量（绝对数量）为例，介绍操作步骤

1. 打开要进行计算的工作表，确定输入量和输出量例如，本例中的输入量是“相对数量”输出量是“绝对数量”。（“相对数量”是某零件相对于其父层的数量“绝对数量”是该零件在总成中的总数量）

2. 点击 视图->宏，茬出现的对话框中输入要创建的公式的名称如 JueDuiShuLiang，然后点击 创建

3. 出现 VBA编辑窗口，在窗口中有如下代码：

4. Sub代表该代码是一段子程序但我們要建立的函数，所以应该将Sub改为Function如下：

5. 这时返回到表格窗口，在要返回函数值的单元格内输入“=JueDuiShuLiang()”可以看到函数能自动出现！

6. 剩下僦是编写函数功能代码的事了。本例编写的代码如图主要思想是向上找所有的父层，然后乘以所有的父层数量

7. 返回到工作表，重新输叺函数名选择输入单元格，回车即可得到函数的返回值！按住单元格右下角的十字，向下拉可以填充其余单元格。