시나공

시험에

나오는 것만

공부한다!

네 프로시저에서 숫자로 입력되게 설정 하지 않으 셨기 때문에 문자로 지정된 것입니다. 

별다른 지시사항이 없었다면 그대로 두셔도 상관 없습니다.

Private Sub cmd입력_Click()

입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count

    Cells(입력행, 1) = Val(txt번호)

    Cells(입력행, 2) = cmb콘도명

    Cells(입력행, 3) = Val(txt일수)

    Cells(입력행, 4) = Val(txt요금)

End Sub

와 같이 입력하시면 숫자 형식으로 입력할 수 있습니다. 

위의 코드는 입력 코드 이므로 

조회 프로시저 작성 방법인

Private Sub cmd조회_Click()

    입력행 = [a3].Row + [a3].CurrentRegion.Rows.Count - 1

    txt번호 = Cells(입력행, 1)

    cmb콘도명 = Cells(입력행, 2)

    txt일수 = Cells(입력행, 3)

    txt요금 = Cells(입력행, 4)

End Sub

로 작성하세요. 

빨간 색으로 표시된 부분이 입력과 조회는 반대로 작성 하셔야 합니다.  

좋은 하루 되세요.