책 내용 질문하기
컴활실기1급 조회 코드에대해서 문의드립니다.
도서
2017 시나공 컴퓨터활용능력 1급 실기(엑셀,액세스 2010 사용자용)
페이지
225
조회수
79
작성일
2018-12-26
작성자
탈퇴*원
첨부파일

Private Sub cmd조회_Click()
    기준행위치 = [b3].Row
    기준범위행수 = [b3].CurrentRegion.Rows.Count - 1
    입력행 = 기준행위치 + 기준범위행수
    txt판매일자 = Cells(입력행, 2)
    txt제품명 = Cells(입력행, 3)
    txt수량 = Cells(입력행, 4)
    txt단가 = Cells(입력행, 5)
End Sub

 

이렇게 작성하면 제대로 조회가 되는대

 

코드를

 

 입력행 = range("b3").CurrentRegion.Rows.Count +2

txt판매일자 = Cells(입력행, 2)
    txt제품명 = Cells(입력행, 3)
    txt수량 = Cells(입력행, 4)
    txt단가 = Cells(입력행, 5)
End Sub 

할경우 제대로 안됩니다.

 

조회를 할때는 range를 쓰면 안되나요?

222페이지 시나공 Q&A 베스트에는 이렇게 해도된다고 나와있어서요
기준행 위치 및 기준범위행수를  range("b3").CurrentRegion.Rows.Count +2

이런식으로해도된다고하는데 조회문제에서 아무리해도 안됩니다.
 

답변
2018-12-27 09:30:45

안녕하세요.

 

해당 문제는 시트의 표에 입력된 제일 마지막 정보를 폼에 표시하는 것이므로

 

입력행 = range("b3").CurrentRegion.Rows.Count +2 로 입력하셔도 정상적으로 실행이 됩니다.

 

다시 확인해 보시구요. 그래도 해결이 되지 않는다면, 작업하신 파일을 첨부해서 재질문해 주세요.

 

좋은 하루 보내세요.​ 

  • 관리자
    2018-12-27 09:30:45

    안녕하세요.

     

    해당 문제는 시트의 표에 입력된 제일 마지막 정보를 폼에 표시하는 것이므로

     

    입력행 = range("b3").CurrentRegion.Rows.Count +2 로 입력하셔도 정상적으로 실행이 됩니다.

     

    다시 확인해 보시구요. 그래도 해결이 되지 않는다면, 작업하신 파일을 첨부해서 재질문해 주세요.

     

    좋은 하루 보내세요.​ 

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