게시판 즐겨찾기
편집
드래그 앤 드롭으로
즐겨찾기 아이콘 위치 수정이 가능합니다.
엑셀 비주얼베이직 if 문 질문드려요
게시물ID : jisik_203612짧은주소 복사하기
작성자 : MC민지
추천 : 0
조회수 : 604회
댓글수 : 1개
등록시간 : 2016/09/14 16:02:34
아래와 같이 비주얼 베이직으로 if 문 구현했는데요.
 
실제로 아래와 같이 입력했을 때 출력값 처럼 나오게 하려고 합니다.
 
입력 값이 0과 1 사이 일경우 1에서 입력한 값을 나눠서 출력 값도 같은 비율로 나눌거구요..
 
근데 뭘 입력하던지간에... 출력이 0이 나오네요? ㅠㅠ
 
어느 부분을 수정해야 될까요?
 
입력 출력
0 0
1 0.00058
20 0.00984
40 0.01969
60 0.03019
80 0.04158
100 0.05417
120 0.0684
140 0.0846
 
 
 
Public Function 계산식(입력)
    If 입력 = 0 Then
        출력 = 0
       
    ElseIf 입력 = 1 Then
        출력 = 0.00058
       
    ElseIf 입력 = 20 Then
        출력 = 0.00984
       
    ElseIf 입력 = 40 Then
        출력 = 0.0969
       
    ElseIf 입력 = 60 Then
        출력 = 0.03019
       
    ElseIf 입력 = 80 Then
        출력 = 0.04158
       
    ElseIf 입력 = 100 Then
        출력 = 0.05417
       
    ElseIf 입력 = 120 Then
        출력 = 0.0684
       
    ElseIf 입력 = 140 Then
        출력 = 0.0846
       
    ElseIf 0 < 입력 < 1 Then
        출력 = (입력 / 1) * 0.00058
       
    ElseIf 1 < 입력 < 20 Then
        출력 = (입력 / 20) * 0.00984
       
    ElseIf 20 < 입력 < 40 Then
        출력 = (입력 / 40) * 0.01969
       
    ElseIf 40 < 입력 < 60 Then
        출력 = (입력 / 60) * 0.03019
       
    ElseIf 60 < 입력 < 80 Then
        출력 = (입력 / 80) * 0.04158
       
    ElseIf 80 < 입력 < 100 Then
        출력 = (입력 / 100) * 0.05417
       
    ElseIf 100 < 입력 < 120 Then
        출력 = (입력 / 120) * 0.0684
       
    ElseIf 120 < 입력 < 140 Then
        출력 = (입력 / 140) * 0.0846
   
    Else
        출력 = (입력 / 140) * 0.0846
       
    End If
       
End Function
 
전체 추천리스트 보기
새로운 댓글이 없습니다.
새로운 댓글 확인하기
글쓰기
◀뒤로가기
PC버전
맨위로▲
공지 운영 자료창고 청소년보호