|
* 답변하시는 분들께 도움이 되도록 자신의 환경을 아래 항목 옆에 기재해 주세요.
- 엑셀 버전(95,97,2000,xp,2003,2007): 2019
* 아래줄에 질문을 작성하세요 >>
Private Sub edit_부서_Change()
Dim I As String
edit_소속 = ""
edit_사용자 = ""
edit_직급 = ""
edit_IP = ""
I = edit_부서
With edit_소속
Select Case edit_부서.Value
Case I
.RowSource = I
.ListIndex = -1
End Select
End With
End Sub
Private Sub edit_소속_Change()
Dim I As String
edit_사용자 = ""
edit_직급 = ""
edit_IP = ""
I = edit_소속
With edit_사용자
Select Case edit_소속.Value
Case I
.RowSource = I
.ListIndex = -1
End Select
End With
End Sub
이런식으로 콤보박스가 연동되어 목록 선택으로 하는건 잘 되지만
수동으로 입력할땐 정해진 rowsource를 벗어나서인지 바로 오류가 뜹니다.
수동으로도 입력할 수 있도록 할 수 있을까요? |
|