本文轉(zhuǎn)載自公眾號(hào):Excel學(xué)習(xí)營(yíng),作者:心電感應(yīng)。
1 IF函數(shù)
公式=IF(C2>=90,'優(yōu)秀',IF(C2>=80,'良好',IF(C2>=60,'及格','不及格')))
IF(C2>=90判斷C2大于等于90時(shí)返回優(yōu)秀,否則進(jìn)入第二個(gè)IF;
IF(C2>=80判斷C2大于等于80時(shí)返回良好,否則進(jìn)入第三個(gè)IF;
IF(C2>=60判斷C2大于等于60時(shí)返回及格,否則不及格。
2 LOOKUP函數(shù)
公式=LOOKUP(C2,{0,'不及格';60,'及格';80,'良好';90,'優(yōu)秀'})
使用LOOKUP數(shù)組用法,第一參數(shù)保持升序,查找C列成績(jī)時(shí),如果 LOOKUP 函數(shù)找不到 數(shù)組第一列中數(shù)字時(shí),則函數(shù)會(huì)與數(shù)組中小于或等于的最大值進(jìn)行匹配。
比如查找55,找不到,即返回0對(duì)應(yīng)的不及格,查找96,找不到,即返回90對(duì)應(yīng)的優(yōu)秀。
3 VBA代碼
Sub 判斷成績(jī)()
For i = 2 To 13
If Cells(i, 3) >= 90 Then
Cells(i, 4) = '優(yōu)秀'
ElseIf Cells(i, 3) >= 80 Then
Cells(i, 4) = '良好'
ElseIf Cells(i, 3) >= 60 Then
Cells(i, 4) = '及格'
Else
Cells(i, 4) = '不合格'
End If
Next
End Sub
代碼看著高大上,其實(shí)VBA很簡(jiǎn)單,其判斷原理和前面的IF如出一轍,只是原來(lái)的IF嵌套在代碼中用ElseIf,再加上一個(gè)For循環(huán),就可以從第2行到第13行數(shù)據(jù)做判斷返回結(jié)果了。
好了,今天的分享就到這里,小伙伴們下載示例文件練習(xí)一下吧。
示例文件下載鏈接: https://pan.baidu.com/s/13-OPb8eagAhcj8kCjiuK7g 提取碼: qyt4
圖文制作:心電感應(yīng)
聯(lián)系客服