当前位置：首页>Excel>怎么在Excel中创建VBA自定义函数?

怎么在Excel中创建VBA自定义函数?

2026-09-28 02:38:15

VIDEO TUTORIAL

视频教程

关注

重播分享赞

视频详情

TEXT TUTORIAL

文字教程

Excel中有很多内置的函数，像SUM，IF函数，直接能在单元格里使用。但是如果Excel中的内置函数满足不了我们的需求时，就可以写一个VBA自定义函数，也就是让你按自己的计算逻辑造一个“新函数”。这一次咱们就讲一下如何在 Excel 中创建VBA自定义函数。

首先找到【开发工具】选项卡，如果没有开发工具选项卡怎么办呢？那就点击【文件】选项卡，从更多中单击选项，在弹出的Excel选项对话框中选择【自定义功能区】，在右侧找到【开发工具】这一选项，在其复选框前打勾。这样【开发工具】选项卡就出来了。

在【开发工具】中，找到【代码】功能区，点击Visual Basic。

在弹出的【Microsoft Visual Basic for Applications】窗口中，点击插入，下拉选项中选择模块，就可以在模块中写一些程序。

可以看到插入的模块中分成几个部分，下面这一部分是监视窗口，你在函数中写的表达式，在监视窗口可以看它的值、看它的类型，进行监视，用来调试（debug）。而上面这一部分，实际就是写函数体用的。怎么写函数体呢？

比如说咱们写一个 function。什么 function 呢？比如说：

“

Function AddOne(x As Range) As Double

AddOne = Val(x) + 1

End Function

”

但是你可能都不是很清楚什么意思，是吧？不要着急，咱们先把这段程序写完。

第一行的Function是函数的开始，End Function 是函数结尾，里面的东西是函数体。

这个“x”是什么呢？是一个参数。简单说就是‌你调用某个子程序或函数时，需要传给它的“输入值”‌，用来告诉这段代码“该处理什么数据”。

咱们写的这段函数里面只有一个参数，它是一个 Range 值，就是一个范围。比如说 A2:B4 是不是一个范围？是的，这就是一个Range。定义为Range后，程序就知道你是把 A1 当成参数给它，还是把 A2:B4 当成参数给它，对此做出相应的计算。

Function后面的这个AddOne是什么呢？是函数的名称。比如说做饭这个过程，起一个名字叫做饭，造火车这个过程，起个名字叫造火车，这两个过程是不同的名称。那这个函数要做的事情是什么呢？就是将x这个参数的值加一，所以咱们也给取了个名称，叫AddOne，当然也可以取别的名称，只要能表达这个函数要做的事情就行。

再看下“AddOne = Val(x) + 1”，这是什么意思？Val(x)表示x的值，比如x是A1单元格，A1单元格里面的数据是1，那么Val(x)就是1，Val(x) + 1后把值赋给了AddOne，所以AddOne就是2。那么这个函数的返回值是什么类型的呢？这里“As Double”进行了定义，是Double类型的，Double‌是一种数据类型，用来存小数。