책 내용 질문하기
컴활1급 실기 엑셀 기본모의고사9회
도서
[2014] 컴퓨터활용능력 1급 실기(엑셀, 액세스 2007 사용자용)
페이지
조회수
48
작성일
2014-11-20
작성자
첨부파일
문제4번에 2.2
Private Sub UserForm_Initialize()
With 부서명
.AddItem = "영업1팀"
.AddItem = "영업2팀"
.AddItem = "영업3팀"
.AddItem = "영업4팀"
.AddItem = "영업5팀"
.AddItem = "영업6팀"
End With
End Sub
.AddItem = "영업1팀"
.AddItem = "영업2팀"
.AddItem = "영업3팀"
.AddItem = "영업4팀"
.AddItem = "영업5팀"
.AddItem = "영업6팀"
End With
End Sub
실행해보면 컴파일오류, 함수 또는 변수가 필요합니다 라는 창이 뜨면서
저렇게 되네요 뭐가 문제인건가요??
답변
2014-11-23 13:06:32
Private Sub UserForm_Initialize()
With 부서명
.AddItem "영업1팀"
.AddItem "영업2팀"
.AddItem "영업3팀"
.AddItem "영업4팀"
.AddItem "영업5팀"
.AddItem "영업6팀"
End With
End Sub
.AddItem "영업1팀"
.AddItem "영업2팀"
.AddItem "영업3팀"
.AddItem "영업4팀"
.AddItem "영업5팀"
.AddItem "영업6팀"
End With
End Sub
additem 뒤에는 = 이 없어야 합니다.
=을 삭제하고 실행해 보세요.
좋은 하루 되세요.
"
-
*2014-11-23 13:06:32
Private Sub UserForm_Initialize()
With 부서명
.AddItem "영업1팀"
.AddItem "영업2팀"
.AddItem "영업3팀"
.AddItem "영업4팀"
.AddItem "영업5팀"
.AddItem "영업6팀"
End With
End Subadditem 뒤에는 = 이 없어야 합니다.=을 삭제하고 실행해 보세요.좋은 하루 되세요."