2012-10-18 4 views
0

내가 만든 VBA 양식을 모두 지우는 재설정 버튼을 만들었습니다. 그러나 전체 양식을 지우고 "CO - Computer Science"에 cbo_deptCode이라는 드롭 다운 값을 설정하는 것이 좋습니다. 이 일을 어떻게 성취 할 수 있습니까?양식 재설정 하나의 필드를 특정 값으로 설정

이 내 코드는 지금까지 있습니다 :

Private Sub btn_Reset_Click() 

    ' Reset form 
    Dim ctl As MSForms.Control 
    For Each ctl In Me.Controls 
     Select Case TypeName(ctl) 
      Case "TextBox" 
       ctl.Text = "" 
      Case "CheckBox", "OptionButton", "ToggleButton" 
       ctl.Value = False 
      Case "ComboBox", "ListBox" 
       ctl.ListIndex = -1 
     End Select 
    Next ctl 

End Sub 

답변

1

왜 그냥 추가하지 :

cbo_deptCode.Value = "CO - Computer Science" 

를 루프 후?

+0

런타임 오류 '380' – methuselah

+0

'cbo_deptCode = "CO - Computer Science"를 입력했는데 이제 작동합니다. 나를 올바른 방향으로 가리켜 주셔서 감사합니다. – methuselah

+1

콤보 박스의 특정 속성은 무엇입니까? MatchEntry를 true로 설정 했습니까? 그렇다면 목록의 텍스트입니까? 목록 전용 모드로 설정 했습니까? 트리거 할 수있는 변경 이벤트의 코드가 있습니까? – SWa

관련 문제