Excel自定义函数——课程成绩等效分数函数sdust_score()

一、用于

xlsm文件(Microsoft Excel 启用宏的工作簿)

二、添加函数的方法

1.适用环境

文件类型：确认文件是xlsm文件。如果不是，可以将xls或xlsx文件另存为xlsm文件。

操作系统：Windows系统（其他电脑操作系统不知能不能）

2.步骤

依次点击打开：开发工具>>VB编辑器 （或：使用快捷键 alt+F11 ）>>插入(I)>>模块(M)>>

在弹出的窗口*.xlsm -模块1(代码)中输入函数定义：

以sdust大学课程成绩为例：

成绩 优---95

成绩 良---85

成绩 中---75

Function sdust_score(i)中，sdust_score是定义的函数名，i是输入的参数（介时可以是单元格数据）。（VB语言，不做解释了，其它函数类推）

Function sdust_score(i)
If i = "优" Then
    sdust_score = 95
ElseIf i = "良" Then
    sdust_score = 85
ElseIf i = "中" Then
    sdust_score = 75
Else
    sdust_score = i
End If
End Function

再点击：文件(E)>>*.xlsm保存(S)

完成后，即可在表格中使用sdust_score()函数。

效果：