책 내용 질문하기
vba '검색단추 프로시저' 작성중 런타임오류발생
도서
2021 시나공 기출문제집 컴퓨터활용능력 1급 실기
페이지
91
조회수
142
작성일
2021-02-18
작성자
탈퇴*원
첨부파일
다른 종류버튼이나 콤보상자는 오류가 발생하지 않는데 계속 검색단추 푸로시저는 오류가 발생해요... 똑같이 적었다고 생각하는데 왜 안되는 걸까요???
답변
2021-02-18 21:30:37

Private Sub cmd검색_Click()

 

 참조행 = cmb가입자명.ListIndex + 4

 txt상품종료.Value = Cells(참조행, 3)

 txt지점명.Value = Cells(참조행, 4)

 txt성별.Value = Cells(참조행, 5)

 txt가입일.Value = Cells(참조행, 6)

 txt납입시점.Value = Cells(참조행, 7)

 txt연이율.Value = Format(Cells(참조행, 8), "0.0%")

 txt월불입액.Value = Format(Cells(참조행, 9), "#,###")

 

End Sub 

 

txt상품종류 로 입력하셔야 하는데 종료로 입력하셔서 오타 때문에 오류가 발생했네요. 

 

수정 후 확인 해 보세요. 

 

좋은 하루 되세요. 

  • 관리자
    2021-02-18 21:30:37

    Private Sub cmd검색_Click()

     

     참조행 = cmb가입자명.ListIndex + 4

     txt상품종료.Value = Cells(참조행, 3)

     txt지점명.Value = Cells(참조행, 4)

     txt성별.Value = Cells(참조행, 5)

     txt가입일.Value = Cells(참조행, 6)

     txt납입시점.Value = Cells(참조행, 7)

     txt연이율.Value = Format(Cells(참조행, 8), "0.0%")

     txt월불입액.Value = Format(Cells(참조행, 9), "#,###")

     

    End Sub 

     

    txt상품종류 로 입력하셔야 하는데 종료로 입력하셔서 오타 때문에 오류가 발생했네요. 

     

    수정 후 확인 해 보세요. 

     

    좋은 하루 되세요. 

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