책 내용 질문하기
프로시저 코드 좀 봐주세요 ㅠ
도서
[2012] 컴퓨터활용능력 1급 실기(엑셀, 액세스 2007 사용자용)
페이지
289
조회수
207
작성일
2013-11-20
작성자
첨부파일

2010년 2회 실기시험 문제중에

4번 기타작업에 프로시저 문제입니다.

프로시저 다 입력하고 디자인보기 해제 후 실행시켜봤는데,

목록상자에 목록이 전혀 안 뜨더군요...ㅜ

제가 책 처럼 들여쓰기를 안해서 그런가요...?

아니면 뭔가 엑셀 상의 설정문제인가...?

뭐가 잘 못 된 건지 모르겠습니다.

한번 봐주세요.

Private Sub 등록_Click()
학원생등록.Show
End Sub
------------------------------------------

Private Sub UserForm_Initialize()
With cmb분류
.AddItem "초등학생"
.AddItem "중학생"
.AddItem "고등학생"
End With

End Sub

-------------------------------------------

Private Sub cmb분류_Change()
Select Case cmb분류
Case "초등학생"
list강좌.RowSource = "j6:m8"
Case "중학생"
list강좌.RowSource = "j10:m22"
Case Else
list강좌.RowSource = "j17:m22"
End Select
End Sub

--------------------------------------------

Private Sub cmd입력_Click()

참조행 = list강좌.ListIndex
입력행 = [b4].Row + [b4].CurrentRegion.Rows.Count
Cells(입력행, 2) = txt이름
Cells(입력행, 3) = cmb분류
Cells(입력행, 4) = list작성.List(참조행, 0)
Cells(입력행, 5) = list작성.List(참조행, 1)
Cells(입력행, 6) = list작성.List(참조행, 2)
End Sub
-------------------------------------------
아 방금 확인했는데요!!
정답파일에도
목록상자의 목록이 안나오네요...;;;
설정의 문제인거 같은데 어떻게 해야되나요...?
답변
2013-11-20 11:32:40

질문 주신 코드를 입력하여 확인 해 보았는데

정상적으로 표시가 됩니다.

작성하신 엑셀 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.

좋은 하루 되세요.

"
  • *
    2013-11-20 11:32:40

    질문 주신 코드를 입력하여 확인 해 보았는데

    정상적으로 표시가 됩니다.

    작성하신 엑셀 파일을 첨부하여 다시 질문 주시면 확인 후 답변 드리겠습니다.

    좋은 하루 되세요.

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