1

Тема: Check Box

Граждане, нуждаюсь в совете. Можно ли сделать так, чтобы check box становился виден при условии, что Value двух других чекбоксов = False. В какое событие стоит вставлять код?

If chGramota.Value = False And chPremiya.Value = False Then
chNapoddat.Visible = True
End If

Сам знаю только о возможности скрыть или отобразить элемент формы при CheckBox_Change для одного чекбокса.

Спасибо можно перевести на WebMoney-кошелёк R378231864568 или на Яндекс-деньги 410015093172871

2

Re: Check Box

Это в Экселе?

Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.

3

Re: Check Box

Private Sub chNapoddat01()
    If chGramota.Value = False And chPremiya.Value = False Then
        chNapoddat.Visible = True
    Else: chNapoddat.Visible = False
    End If
End Sub

Private Sub chGramota_Click()
    Call chNapoddat01
End Sub

Private Sub chPremiya_Click()
    Call chNapoddat01
End Sub

Private Sub UserForm_Initialize()
    Call chNapoddat01
End Sub

Файл прилагаю.

Post's attachments

Флажки.xlsm 22.58 Кб, 1 скачиваний с 2016-07-31 

You don't have the permssions to download the attachments of this post.
Удобной и приятной работы в Word!
Перевести спасибо на Яндекс кошелёк - 41001162202962; на WebMoney - R581830807057.

4

Re: Check Box

Можно немного проще

Private Sub chNapoddat01()
    chNapoddat.Visible = Not (chGramota.Value Or chPremiya.Value)
End Sub