Кнопка «Скрыть / Показать», если в VBA для доступа установлен флажок - PullRequest
0 голосов
/ 14 мая 2018

Имеется 4 флажка, и если любой из 2 флажков (checkA и checkB) установлен, то кнопка «Обоснование» не должна быть видна в форме.Аналогичным образом, если любой из двух других флажков (checkC и checkD) установлен, кнопка «обоснование» должна быть видна.

И еще есть поле со списком (Combo380), которое представляет собой раскрывающийся список с кодом макроса:

="[ID] = " & Str(Nz([Screen].[ActiveControl],0))

Наконец, я не могу использовать событие click или afterupdate для флажка и не могуЯ использую, если код VBA, который даст ошибку времени выполнения нет.2427. Я могу использовать только событие GotFocus или LostFocus.

Вот моя формула:

Private Sub CheckA_GotFocus()
    Me.Justification.Visible = False
End Sub
Private Sub CheckB_GotFocus()
    Me.Justification.Visible = False
End Sub
Private Sub CheckC_GotFocus()
    Me.Justification.Visible = True
End Sub
Private Sub CheckD_GotFocus()
    Me.Justification.Visible = True
End Sub

Может кто-нибудь, пожалуйста, помогите.

Заранее спасибо!

...