Страница 1 из 1
Скрытие или Блокировка выбора в ComboBox'e
Добавлено: 31 июл 2014, 15:03
kikim
Здравствуйте Уважаемые Форумчане! Не знаю как сделать так, чтобы при выборе в комбобоке "Предмета сертификации" - СЭА, исчезал или не давал возможность выбора атрибута в комбобоксах "DО" и "ARP". Файл-пример прикреплен.
Re: Скрытие или Блокировка выбора в ComboBox'e
Добавлено: 31 июл 2014, 18:54
pashulka
Код: Выделить всё
Private Sub PredmetSert_Change()
If UCase(PredmetSert.Value) = "СЭА" Then
swdo.Enabled = False 'swdo.Visible = False
sysARP.Enabled = False 'sysARP.Visible = False
Else
swdo.Enabled = True 'swdo.Visible = True
sysARP.Enabled = True 'sysARP.Visible = True
End If
End Sub
или
Код: Выделить всё
Private Sub PredmetSert_Change()
Dim iFlag As Boolean
iFlag = UCase(PredmetSert.Value) <> "СЭА"
swdo.Enabled = iFlag 'swdo.Visible = iFlag
sysARP.Enabled = iFlag 'sysARP.Visible = iFlag
End Sub
Re: Скрытие или Блокировка выбора в ComboBox'e
Добавлено: 01 авг 2014, 09:09
kikim
Спасибо большущее!!