【VBA】콤보 박스의 값으로 버튼의 유효 무효를 바꾼다

버튼 사용 불가



버튼 속성(Enabled)을 값에 따라 True 또는 False로 전환합니다.
콤보 박스가 아닌 텍스트 박스와 체크 박스에서도 사용할 수 있지만 이번에는
【VBA】 유저 폼의 콤보 박스의 리스트에 중복을 생략해 값을 추가한다로 만든 콤보 박스를 사용하여 콤보 박스의 값이 비어있을 때 버튼을 누르지 못하게합니다.


사용자 폼에 다음 코드를 씁니다.
Private Sub cmbDate_Change()
    If cmbDate.Value <> "" Then   'コンボボックスの値が空白じゃないときは
        btnDone.Enabled = True '決定ボタン有効
    Else
        btnDone.Enabled = False '決定ボタン無効
    End If
End Sub

실행 결과


와타시 흐름 조건



고집이라고 말할지 버릇입니다만 If문서 올 때
If cmbDate.Value<>""Then
와 같이 「공백이 아닐 때는~」라고 하는 방법입니다.
Private Sub cmbDate_Change()
    If cmbDate.Value = "" Then   'コンボボックスの値が空白なら
        btnDone.Enabled = False '決定ボタン無効
    Else
        btnDone.Enabled = True '決定ボタン有効
    End If
End Sub

이쪽이 알기 쉬운 사람 많습니까?

좋은 웹페이지 즐겨찾기