1.前言
這學期做了本科生的精密機械設計課的豬腳, 由於平時成績登記的時候採用的是5分制, 最後給平時成績需要換算成百分制, 就希望可以自定義一個轉換函數進行處理, 數據格式如下
2. 實現方式
- 由於excel 支持 vba 語法, 所以可以利用vba 定義一個函數, vba 相關教程可以參考 http://www.yiibai.com/vba/vba_functions.html
http://jingyan.baidu.com/article/39810a23c7b8a1b636fda68e.html - 首先點擊vb編輯器
- 插入模塊
- 輸入以下代碼,保存
這個代碼非常簡單, 沒有什麼需要多說的, 就是簡單的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
- 然後再需要統計數據的單元格內輸入
=(CONVERT520(D2)+CONVERT520(E2)+CONVERT520(F2)+CONVERT520(G2)+CONVERT520(H2)+CONVERT520(I2)+CONVERT520(J2)+CONVERT520(K2)+CONVERT520(L2)+CONVERT520(M2))/10
即可得到需要統計的平時成績的平均值了