怎么在Excel中创建自定义函数
2016-07-31 · 知道合伙人互联网行家
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的安全级别为中
运行时需要手动确认“是”,否则无法使用
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
接着勾选“在功能区显示‘开发工具’选项卡”项即可。
按ALT+F11进行编程界面,在模块里面写代码即可,附件氏裂是我昨天回复一个帖孝核纯子写的自定义函数。巧咐
如果不会写 254103979