얼렁뚱땅 엑셀 VBA] 조건문(Select Case문)

Select Case

두 개의 조건을 처리할 때는 If ~ Then, 세 개 이상의 조건 중 하나를 처리할 때는 Select Case 구문을 사용하는 것을 권장한다고. 

(코드의 간결함? 가독성??)

Select Case 판단대상

[Case 조건 n]

[판단대상의 조건 n이 참일 때 실행할 명령]

[Case Else]

[디폴트 실행 명령문]

End Select

판단대상은 수식 또는 문자식으로 주어진다. 

Case문의 조건 처리 방법에 대해 알아보면

Case 1        ' Select Case 의 판단대상이 1이라면 아래 나오는 문장 처리

Case "OK"     ' 판단대상이 OK라는 문자열이라면 처리

Case 1,2,3     ' 쉼표로 구분된 값 중 하나와 일치하면 처리

Case 1 to 10    ' 1~10 사이의 값이라면 처리

Case Is > 10    ' 조건과 비교하려면 Is키워드 사용. 10보다 크면 처리

Sub 인사()
 
Dim Msg As String
 
 
Select Case Time
    Case Is < 0.5
        Msg = "Good Morning"
    Case 0.5 To 0.75
        Msg = "Good Afternoon"
    Case Else
        Msg = "Good Evening"
End Select
 
MsgBox Msg
 
End Sub