Excel VBA教程：使用If Then判斷按條件處理Excel表格資料

2021-03-01 21:30:11

今天給大家分享Excel VBA中If Then判斷的使用

第一步，看看If Then的語法結構

If 條件Then

執行程式碼1

執行程式碼2

執行程式碼N

End If

上述程式碼在執行的時候，先是判斷「條件」是否滿足

不滿足為假時，跳過If程式碼段，直接執行End If後的VBA程式碼

滿足為真時，執行If中的程式碼，直到End If

今天的業務需求

根據學生的成績資料，小於60分的為不及格，反之則為及格

還是開啟我們的學生英語成績表

資料表中不及格的同學只有兩位，已經紅框標出了！

使用VBA的If Then判斷實現的程式碼如下：

Sub jige()

For i = 2 To 10

'判斷成績小於60則為不及格

If Cells(i, 4) < 60 Then

Cells(i, 5) = "不及格"

End If

'判斷成績大於等於60則為及格

If Cells(i, 4) >= 60 Then

Cells(i, 5) = "及格"

End If

End Sub

這裡的For迴圈為了迴圈表中學生的成績資料。

Cells(i, 4)就是學生成績單元格資料

<60是判斷小於60分，滿足為真則 Cells(i, 5) = "不及格"，設定「是否及格」列對應行單元格值為不及格，不滿足跳出該If語句程式碼段。

>=60是判斷大於等於60分，滿足為真則 Cells(i, 5) = "及格"，設定「是否及格」列對應行單元格值為及格，不滿足跳出該If語句程式碼段。

話不多說，執行程式碼看看效果

哇曬，完美實現，你看懂了麼！

~如果你喜歡的話，歡迎關注+點贊+留言哦