프로시저 작성 문제 4와 문제 3의 차이가 궁금합니다
참조행을 작성할 때 문제 4는
Private Sub cmd입력_Click()
If IsNull(lst과목.Value) Then
lst과목.ListIndex = 0
txtID = "선택안함"
Else
기준행위치 = [a3].Row
기준범위행수 = [a3].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
참조행 = lst과목.ListIndex
Cells(입력행, 1) = UCase(txtID)
Cells(입력행, 2) = txt이름
Cells(입력행, 3) = lst과목.List(참조행, 0)
Cells(입력행, 4) = lst과목.List(참조행, 1)
Cells(입력행, 5) = lst과목.List(참조행, 2)
Cells(입력행, 6) = lst과목.List(참조행, 3) - (lst과목.List(참조행, 3) * 0.1)
txtID = ""
txt이름 = ""
txt날짜 = ""
txt과목 = ""
End If
End Sub
참조행 = lst과목.ListIndex // Cells(입력행, 3) = lst과목.List(참조행, 0) 이렇게 작성했고
문제 3은
Private Sub Cmd확인_Click()
기준행위치 = [a2].Row
기준범위행수 = [a2].CurrentRegion.Rows.Count
입력행 = 기준행위치 + 기준범위행수
참조행 = Cmb종류.ListIndex + 7
Cmb종류 = Cells(입력행, 1)
Cmb지점 = Cells(입력행, 2)
Txt성명 = Cells(입력행, 3)
Cells(입력행, 4) = Cells(참조행, 9)
Cells(입력행, 5) = Cells(참조행, 10)
Cells(입력행, 6) = Cells(참조행, 11)
End Sub
참조행 = Cmb종류.ListIndex + 7 // Cells(입력행, 4) = Cells(참조행, 9) 이렇게 입력했습니다.
문제 3은 listindex에 + 7 을 해서, 시트내에 입력된 행을 직접 참조해서 하는 것 같습니다.
문제 4와 문제 3의 방식이 달라지는 이유는 무엇인가요?
문제 4를 문제 3처럼 풀어보았는데 실행이 되지 않았습니다.
원래 되는데 제가 잘못풀어서 안되는건가요? 아니면 문제풀이상 잘못된 방식이라 안되는것인가요?
안녕하세요.
문제3번은 워크시트에서 참조표가 있는 곳의 위치를 지정하여 입력할 데이터를 확인하는 것입니다.
참조되는 행의 위치를 미리 7로 지정하는 것입니다.. 그리고 사용 할때는
cells(참조행,9), cells(참조행,10)과 같이 엑셀에서 위치하는 열을 미리 적어 둔 것입니다.
문제4번은 폼안의 list박스내의 자료를 찾아서 셀에 입력 하는 것입니다.
참조행에 lst과목.listindex 라고 정의해 두고 lst과목.list(참조행,0) 으로 사용하고 있습니다.
이것은 참조행이 어디인지 지정해 놓고 lst과목에서 참조행의 위치와 0인.. 그러니깐 참조행이 만약 2이고 찾고자하는 것이 0행에 있다는 그런 뜻이 됩니다.
.png)
좋은 하루 보내세요.
-
*2018-11-18 22:35:58
안녕하세요.
문제3번은 워크시트에서 참조표가 있는 곳의 위치를 지정하여 입력할 데이터를 확인하는 것입니다.
참조되는 행의 위치를 미리 7로 지정하는 것입니다.. 그리고 사용 할때는cells(참조행,9), cells(참조행,10)과 같이 엑셀에서 위치하는 열을 미리 적어 둔 것입니다.
문제4번은 폼안의 list박스내의 자료를 찾아서 셀에 입력 하는 것입니다.
참조행에 lst과목.listindex 라고 정의해 두고 lst과목.list(참조행,0) 으로 사용하고 있습니다.
이것은 참조행이 어디인지 지정해 놓고 lst과목에서 참조행의 위치와 0인.. 그러니깐 참조행이 만약 2이고 찾고자하는 것이 0행에 있다는 그런 뜻이 됩니다.
좋은 하루 보내세요.