컴퓨터활용능력 1급 실기 - 책 내용 질문하기 | 시나공

자료실 온라인 채점 동영상 강좌 커뮤니티

책 내용 질문하기

엑셀 426페이지 2-2문제 관련 질문입니다.

도서

2020 시나공 컴퓨터활용능력 1급 실기 [기본서]

페이지

427

조회수

138

작성일

2020-02-24

작성자

탈퇴*원

첨부파일

Private Sub UserForm_Initialize()

With cmb부서명

.AddItem = "영업1팀"

.AddItem = "영업2팀"

.AddItem = "영업3팀"

.AddItem = "영업4팀"

.AddItem = "영업5팀"

.AddItem = "영업6팀"

End With

End Sub

이렇게 입력했으나 컴파일 오류가 자꾸 뜨더라고요.

아무것도없이 저 프로시저만 작성해도 오류가 뜨는 것으로 보아, 위 프로시저에 문제가 있는 것은 확실한데,

답지와 똑같이 입력한 것이라 뭐가 문제인지 모르겠네요ㅠㅠ

답변

2020-02-25 22:52:16

Private Sub UserForm_Initialize()

With cmb부서명

.AddItem = "영업1팀"

.AddItem = "영업2팀"

.AddItem = "영업3팀"

.AddItem = "영업4팀"

.AddItem = "영업5팀"

.AddItem = "영업6팀"

End With

End Sub

.additem 뒤에 = 은 붙지 않습니다.

.AddItem "영업1팀"

와 같이 = 을 지우고 작성해 보세요.

좋은 하루 되세요.

관리자

2020-02-25 22:52:16

Private Sub UserForm_Initialize()

With cmb부서명

.AddItem = "영업1팀"

.AddItem = "영업2팀"

.AddItem = "영업3팀"

.AddItem = "영업4팀"

.AddItem = "영업5팀"

.AddItem = "영업6팀"

End With

End Sub

.additem 뒤에 = 은 붙지 않습니다.

.AddItem "영업1팀"

와 같이 = 을 지우고 작성해 보세요.

좋은 하루 되세요.

목록 질문하기