Compartilhar via

Propriedade CommandBarControl.OnAction (Office)

  • Artigo

Obtém ou define o nome de um procedimento do Visual Basic que será executado quando o usuário clica ou altera o valor de um CommandBarControl. Leitura/gravação.

Observação

[!OBSERVAçãO] O uso de CommandBars em alguns aplicativos do Microsoft Office foi substituído pelo novo componente da faixa de opções da interface de usuário do Microsoft Office Fluent. Para obter mais informações, consulte Visão geral da faixa de opções fluente do Office.

Sintaxe

expressão. Onaction

Expressão Uma variável que representa um objeto CommandBarControl .

Valor de retorno

Cadeia de caracteres

Comentários

O aplicativo contêiner determina se o valor é um nome de macro válido.

Exemplo

Este exemplo adiciona um controle de barra de comandos à barra de comandos chamada Custom. O procedimento chamado MySub será executado sempre que o controle é clicado.

Set myBar = CommandBars("Custom") 
Set myControl = myBar.Controls _ 
    .Add(Type:=msocontrolButton) 
With myControl 
    .FaceId = 2 
    .OnAction = "MySub" 
End With 
myBar.Visible = True

Este exemplo adiciona um controle de barra de comandos à barra de comandos chamada Custom. O suplemento COM chamado FinanceAddIn será executado sempre que o controle for clicado.

Set myBar = CommandBars("Custom") 
Set myControl = myBar.Controls _ 
    .Add(Type:=msocontrolButton) 
With myControl 
    .FaceId = 2 
    .OnAction = "!<FinanceAddIn>" 
End With 
myBar.Visible = True

Confira também

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.