excel-自定义函数及使用

我的环境是win10 + excel 2010

调出开发工具选项卡

导航栏文件-选项-自定义功能区-勾选开发工具

编写自定义函数

打开一个excel文件，在某个sheet上，选择Visual Basic

然后在新打开的vb页面上新建模块。这个test.xlsx就是我之前打开的excel文件。

函数编写规则

参考Office支持

1. 自定义函数以Function语句开始，以End Function结束
2. 可以指定0个或多个参数
3. 在函数中必须包含一个语句，该语句将值分配给与函数同名的变量，这个值就能被返回了
4. 不允许自定义函数执行除将值返回到工作表中的公式，或返回到其他 VBA 宏或函数中使用的表达式外的任何操作。 例如，自定义函数无法调整窗口大小、编辑单元格中的公式或更改单元格中文本的字体、颜色或图案选项。 如果在函数过程中包含此类的"action"代码，函数将返回#VALUE！ 错误。
5. 函数过程可以执行一个操作 (执行计算，) 显示一个对话框。 可以使用自定义函数 中的 InputBox 语句作为从执行函数的用户获取输入的方式。 可以使用 MsgBox 语句作为向用户传达信息的方式。

举例1

在vb窗口写这个

Function 加1(a)
加1 = a + 1
MsgBox ("ok")
End Function

然后在当前sheet下直接使用

报错：无法保存函数

那么点击否，另存为启用宏的类型（xlsm)