Compartilhar via


Evento Form.CommandEnabled (Access)

Ocorre quando o componente Web do Microsoft Office especificado determina se o comando especificado está habilitado.

Sintaxe

expressão. CommandEnabled (Comando, Habilitado)

expressão Uma variável que representa um objeto Form.

Parâmetros

Nome Obrigatório/Opcional Tipo de dados Descrição
Comando Obrigatório Variant O comando que está sendo ativado.
Enabled Obrigatório Object Defina a propriedade Value deste objeto como False para desativar o comando.

Valor de retorno

Nada

Comentários

As constantes OCCommandId, ChartCommandIdEnum e PivotCommandId contêm listas dos comandos com suporte para cada um dos componentes Web do Microsoft Office.

Exemplo

O exemplo a seguir demonstra a sintaxe de uma sub-rotina que intercepta o evento 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

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.