Question

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

Answer 1

EXCEL的自定义函数是在宏模块中添加的

工具原料：电脑+office2007

1、用快捷键alt+F11，打开VUSIAL BASIC编辑器

2、在VUSIAL BASIC编辑器中选择vbaproject（book1），右键选择插入，再选择模块，新建模块完成，如下图所示

3、在模块中键入如下代码，然后在表格中调用即可，如下图所示：

Dim a As Double

Function SUM_S(X, Y)

a = X * 0.7 + Y * 0.3

SUM_S = a

' X 专家评委分数

' Y 大众评委分数

End Function

打分表的要求是，（5个专家评委分求和*70%）+（10个大众评委分求和*30%）

假设X 专家评委分数   Y 大众评委分数

之前的求和用系统默认函数即可，但是接下来的X * 0.7 + Y * 0.3却不是系统所给出的函数，于是就需要自定义，

EXCEL宏与其他OFFICE宏一样，使用VBA作为编程语言，换句话说，就是一个嵌入版的VB。

由于所编辑列为数字列，所以不需要转换字符

4、、若为其他类别的话（比如货币或文本）请使用如下句式:

Dim a As Double

Function SUM_S(X, Y)

a = val(X) * 0.7 + val(Y) * 0.3

SUM_S = a

' X 专家评委分数

' Y 大众评委分数

End Function

完成后调用的时候，只需要在结果所在单元格上面的值栏中填入=SUM_S(B1,B2) (此处为例子）

此时B1就是X值所在单元格，B2为Y值所在单元格。

注意事项：

运行宏需要EXCEL的安全级别为中

运行时需要手动确认“是”，否则无法使用

Answer 2

方法/步骤

1
打开Excel程序，按键盘组合键“Alt+F11”或切换至“开发工具”功能区并点击“Visual Basic”按钮进入VBA环境。
有关开启“开发工具”功能区的方法请参考本经验最后部分的讲解。

2
在VBA环境下，右击“Microsoft Excel对象”，从弹出的菜单中选择“插入”->“模块”项。

3
在打开的模块窗口中，输入以下代码：
Function 三项合并计算(a, b, c)
三项合并计算 = a * b + c
End Function
该代码用于对提供的三个参数进行计算，结果返回函数本身。

4
接着返回Excel界面，在单元格中输入公式“=三项合并计算(2,3,5)”并按回车键即可得结果。

5
当然，我们还可以通过引用三个单元格数据来实现同样的计算功能：分别在A2、B2、C2单元格中输入2，3，5，在D2单元格中输入“”并按回车键即可得结果。

END
如何开启“开发工具”功能区

点击“Office按钮”，在打开的扩展面板中点击“Excel选项”。

2
接着勾选“在功能区显示‘开发工具’选项卡”项即可。

Answer 3

按ALT+F11进行编程界面，在模块里面写代码即可，附件是我昨天回复一个帖子写的自定义函数。

Answer 4

ALT+F11---插入---模块----插入----过程----选择函数----想写什么样的自己写内容就可以了！
如果不会写 254103979