답에서는 end 밖에 case else를 사용하라고 나와있는데 사용시 오류가 발생합니다..
Public Function fn옵션비용(대여일, 옵션)
Select Case 옵션
Case "○"
Select Case 대여일
Case Is <= 2
fn옵션비용 = 5000
Case Is <= 4
fn옵션비용 = 9000
Case Is <= 6
fn옵션비용 = 13000
Case Else
fn옵션비용 = 17000
End Select
Case Else
fn옵션비용 = ""
End Select
End Function
굵게 표시된 부분의 select case 가 빠져있네요.
두개의 select case 가 있으므로 두개의 end select 가 나오는 것입니다.
확인 후 수정하여 사용하세요.
좋은 하루 되세요.
"-
*2012-07-25 07:16:10
Public Function fn옵션비용(대여일, 옵션)
Select Case 옵션
Case "○"
Select Case 대여일
Case Is <= 2
fn옵션비용 = 5000
Case Is <= 4
fn옵션비용 = 9000
Case Is <= 6
fn옵션비용 = 13000
Case Else
fn옵션비용 = 17000
End Select
Case Else
fn옵션비용 = ""
End Select
End Function굵게 표시된 부분의 select case 가 빠져있네요.
두개의 select case 가 있으므로 두개의 end select 가 나오는 것입니다.
확인 후 수정하여 사용하세요.
좋은 하루 되세요.
"