시나공

시험에

나오는 것만

공부한다!

문제 3번을 풀다가 

'438' 런타임 오류가 발생했습니다.

개체가 이 속성 또는 매서드를 지원하지 않습니다. 

라고 뜹니다. 어느 부분이 잘 못된건가요?

적은 프로시저들은 다음과 같습니다.

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

Private Sub Cmd종료_Click()

MsgBox Now, , "작업을 종료합니다."

Unload Me

End Sub

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

Private Sub Cmd확인_Click()

i = [a2].curretnregion.Rows.Count + 1

irow = Cmb종류.ListIndex + 7

Cells(i, 1) = Cmb종류

Cells(i, 2) = Cmb지점

Cells(i, 3) = Txt성명

Cells(i, 4) = Cells(irow, 9)

Cells(i, 5) = Cells(irow, 10)

Cells(i, 6) = Cells(irow, 11)

End Sub

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

Private Sub UserForm_Initialize()

   Cmb지점.AddItem "강원"

   Cmb지점.AddItem "서울"

   Cmb지점.AddItem "영남"

   Cmb지점.AddItem "호남"

   Cmb지점.AddItem "충청"

   Cmb종류.AddItem "건강저축보험"

   Cmb종류.AddItem "주택저축보험"

   Cmb종류.AddItem "목돈마련보험"

   Cmb종류.AddItem "연금저축보험"

   Cmb종류.AddItem "무지개저축보험"

  Cmb종류.SetFocus

End Sub