Поделиться через


Событие Form.CommandEnabled (Access)

Происходит, когда указанный веб-компонент Microsoft Office определяет, включена ли указанная команда.

Синтаксис

expression. CommandEnabled (Command, Enabled)

выражение: переменная, представляющая объект Form.

Параметры

Имя Обязательный или необязательный Тип данных Описание
Команда Обязательный Variant Команда, которая была проверена как включенная.
Enabled Обязательный Object Чтобы отключить команду, задайте для свойства Value этого объекта значение False .

Возвращаемое значение

Отсутствует

Примечания

Константы OCCommandId, ChartCommandIdEnum и PivotCommandId содержат списки поддерживаемых команд для каждого веб-компонента Microsoft Office.

Пример

В следующем примере демонстрируется синтаксис подпрограммы, которая перехватывает событие CommandEnabled .

Private Sub Form_CommandEnabled( _ 
 ByVal Command As Variant, ByVal Enabled As Object) Dim intResponse As Integer 
 Dim strPrompt As String 
 
 strPrompt = "Disable the command?" 
 
 intResponse = MsgBox(strPrompt, vbYesNo) 
 
 If intResponse = vbYes Then 
 Enabled.Value = False 
 Else 
 Enabled.Value = True 
 End If 
End Sub

Поддержка и обратная связь

Есть вопросы или отзывы, касающиеся Office VBA или этой статьи? Руководство по другим способам получения поддержки и отправки отзывов см. в статье Поддержка Office VBA и обратная связь.