[Excel VBA 學習筆記] 如何使用 Select Case 控制程式流程，使用方法及範例

在 Excel VBA 程式流程控制方法，有循序結構、選擇結構、重複結構三種，而選擇結構有 If Else、Select Case 兩種方法，今天就來學習 Select Case 這個方法，使用 Select Case  做流程控制語法如下：

Select Case (變數或運算式)
    Case 條件值1
        程式碼區段A
    Case 條件值2
        程式碼區段B
    Case 條件值3
        程式碼區段C
     …

    Case Else
        程式碼區段N
End Select

說明：

        程式會依變數或運算式的值與Case條件值一一作比較，直到找到符合條件值時，就會執行該程式碼區段，如果條件值都不成立，就執行程式碼區段N。


範例：當分數大於等於90時，就顯示A，分數大於等於80時，就顯示B，分數大於等於70時，就顯示C，分數大於等於60時，就顯示D，否則顯示E。

Sub CheckScore()

    Select Case Range("A2").Value
        Case 90 To 100
            Range("B2").Value = "A"
        Case 80 To 89
            Range("B2").Value = "B"
        Case 70 To 79
            Range("B2").Value = "C"
         Case 60 To 69
            Range("B2").Value = "D"
        Case Else
            Range("B2").Value = "E"
    End Select

End Sub