[스프레드시트] 컴활 실기 문제 풀어보기 (SELECT CASE, CASE IS < 숫자, CASE ELSE, END SELECT)

(문제 출처 : https://m.cafe.daum.net/hermingway/ZYwR/38 )

 

​​​​액셀 컴활 실기문제를 계속해서 풀어보자.

 

 

===

 

사용자 정의함수 만들기 문제다.

 

 

Alt+F11눌러 VB창 띄우고

[삽입]->[모듈]을 실행시킨다.

 

 

그리고 위의 인수가 들어간 함수를 만든다.

 

 

===

다음과 같이 계산을 만들되 계산의 결과값에 대한 조건문을 만든다.

 

 

select case를 이용할 경우는 다음과 같다.

 

 

SELECT CASE 구문에서

END SELECT로 종료시켜주는 것 외에도

CASE ELSE로 그 외의 값을 정의시켜주는 것,

IS를 써서 맨 위에 썼던 결과값에 대한 조건을 써주는 점

기억하자.

Public Function fn비고(출석일수, 결석일수)

    결과값 = 출석일수 / (출석일수 + 결석일수)
    
    Select Case 결과값
        Case 1
            fn비고 = "출석우수"
        Case Is < 0.8
            fn비고 = "재수강"
        Case Else
            fn비고 = ""
    End Select
    
End Function

 

 

 

 

테스트 해보자