책 내용 질문하기
엑셀 실전 J형 48쪽 2-2번입니다.
도서
2020 시나공 컴퓨터활용능력 1급 실기 [기본서]
페이지
48
조회수
193
작성일
2020-11-26
작성자
탈퇴*원
첨부파일

고생 많으십니다. 이번에도 같은 오류가 떠서 제가 푼 파일을 첨부하였습니다. 

사용자정의함수 문제인데요 해설에 있는 식대로 써도 NAME 오류가 뜹니다. 

이 이유가 무엇인지 궁금합니다. 

 

그리고 이 문제에서 SH판정을 작성할 때 해설식과는 조금 달리

평균 점수를 구할 때 AVERAGE함수를 사용해도 되는지 궁금합니다.

답변
2020-11-27 14:56:20

모듈을 추가한 후 작성하셔야 하는데 프로시저 창에 그냥 작성하셨네요. 

 

모듈을 추가한 후 다시 작성해 보시기 바랍니다. 

 

아래 그림에서 average 부분이 프로시저에서 작동이 되지 않기 때문에 

 

Public Function sh판정(국어, 영어, 수학, 결석, 평균)

If (국어 And 영어 And 수학) >= 60 And (결석 < 1) And (평균 >= 70) Then

sh판정 = "합격" & Int(Average(국어, 영어, 수학))

 

Else

sh판정 = "불합격" 

 

End If

 

 

 

End Function

 

 

아래 와 같이 변경 하여 사용하시기 바랍니다. 

 

Public Function sh판정(국어, 영어, 수학, 결석, 평균)

If (국어 And 영어 And 수학) >= 60 And (결석 < 1) And (평균 >= 70) Then

    sh판정 = "합격" & Int((국어 + 영어 + 수학) / 3)

 

Else

 

sh판정 = "불합격"

 

End If

 

 

 

End Function

 

 

좋은 하루 되세요. 

  • 관리자
    2020-11-27 14:56:20

    모듈을 추가한 후 작성하셔야 하는데 프로시저 창에 그냥 작성하셨네요. 

     

    모듈을 추가한 후 다시 작성해 보시기 바랍니다. 

     

    아래 그림에서 average 부분이 프로시저에서 작동이 되지 않기 때문에 

     

    Public Function sh판정(국어, 영어, 수학, 결석, 평균)

    If (국어 And 영어 And 수학) >= 60 And (결석 < 1) And (평균 >= 70) Then

    sh판정 = "합격" & Int(Average(국어, 영어, 수학))

     

    Else

    sh판정 = "불합격" 

     

    End If

     

     

     

    End Function

     

     

    아래 와 같이 변경 하여 사용하시기 바랍니다. 

     

    Public Function sh판정(국어, 영어, 수학, 결석, 평균)

    If (국어 And 영어 And 수학) >= 60 And (결석 < 1) And (평균 >= 70) Then

        sh판정 = "합격" & Int((국어 + 영어 + 수학) / 3)

     

    Else

     

    sh판정 = "불합격"

     

    End If

     

     

     

    End Function

     

     

    좋은 하루 되세요. 

· 5MB 이하의 zip, 문서, 이미지 파일만 가능합니다.
· 폭언, 욕설, 비방 등은 관리자에 의해 경고없이 삭제됩니다.