在excel 中自定义函数进行数据处理

1.前言

这学期做了本科生的精密机械设计课的猪脚， 由于平时成绩登记的时候采用的是5分制， 最后给平时成绩需要换算成百分制， 就希望可以自定义一个转换函数进行处理， 数据格式如下

2. 实现方式

1. 由于excel 支持 vba 语法， 所以可以利用vba 定义一个函数， vba 相关教程可以参考 http://www.yiibai.com/vba/vba_functions.html
   http://jingyan.baidu.com/article/39810a23c7b8a1b636fda68e.html
2. 首先点击vb编辑器
   
3. 插入模块
   
4. 输入以下代码，保存
   这个代码非常简单， 没有什么需要多说的， 就是简单的5分制 到 百分制之间的转化

Function Convert520(str)
Dim res As Integer
If str = "5+" Then
    res = 100
ElseIf str = "5" Then
    res = 90
ElseIf str = "5-" Then
    res = 85
ElseIf str = "4+" Then
    res = 80
ElseIf str = "4" Then
    res = 75
ElseIf str = "4-" Then
    res = 70
ElseIf str = "3+" Then
    res = 65
ElseIf str = "3" Then
    res = 60
End If
Convert520 = res
End Function

1. 然后再需要统计数据的单元格内输入

=(CONVERT520(D2)+CONVERT520(E2)+CONVERT520(F2)+CONVERT520(G2)+CONVERT520(H2)+CONVERT520(I2)+CONVERT520(J2)+CONVERT520(K2)+CONVERT520(L2)+CONVERT520(M2))/10

即可得到需要统计的平时成绩的平均值了