02.
책에서 나온 대로 했는데요
버튼을 클릭하면 폼이 실행되는 것을 하고싶어서
책과는 별개로 제가
Private Sub 고객정보현황_Click()
.JPG)
1. Private Sub UserForm_Initialize()
With cmb조회구문
.AddItem "관리자"
.AddItem "일반사용자"
.AddItem "고객"
End With
lst등급종류.RowSource = "i4:i8"
End Sub
cmb조회구문이 아니라 cmb조회구분 입니다.
수정한 후 사용해 보세요.
2. 마지막 데이터 다음에 입력되어야함 이므로
기준행위치 = [d4]
기준범위행수 = [d4].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
이것이 마지막 데이터 다음에 입력되게 하는 것입니다.
기준행 위치를 d4로 지정 하면 4번째 행이므로 4값이 나오고
기준범위행수에서는 d4 부터 연결된 행의 개수를 셉니다. 만약 필드명 포함 4줄이면 4가 되는것이죠.(데이터는 7행까지 입력된 상태)
이것을 모두 더하면 4+4 이므로 8번째 행에서 부터 값을 표시하게 되는 것입니다.
좋은 하루 되세요.
"-
*2012-07-23 23:01:30
1. Private Sub UserForm_Initialize()
With cmb조회구문
.AddItem "관리자"
.AddItem "일반사용자"
.AddItem "고객"
End With
lst등급종류.RowSource = "i4:i8"
End Subcmb조회구문이 아니라 cmb조회구분 입니다.
수정한 후 사용해 보세요.
2. 마지막 데이터 다음에 입력되어야함 이므로
기준행위치 = [d4]
기준범위행수 = [d4].CurrentRegion.Rows.Count입력행 = 기준행위치 + 기준범위행수
이것이 마지막 데이터 다음에 입력되게 하는 것입니다.
기준행 위치를 d4로 지정 하면 4번째 행이므로 4값이 나오고
기준범위행수에서는 d4 부터 연결된 행의 개수를 셉니다. 만약 필드명 포함 4줄이면 4가 되는것이죠.(데이터는 7행까지 입력된 상태)
이것을 모두 더하면 4+4 이므로 8번째 행에서 부터 값을 표시하게 되는 것입니다.
좋은 하루 되세요.
"