Compartilhar via


Propriedade CommandBarControl.OnAction (Office)

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 Descrição geral do friso do Office Fluent.

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 controlo de barra de comandos à barra de comando com o nome Personalizado. 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 controlo de barra de comandos à barra de comando com o nome Personalizado. O suplemento COM com o nome FinanceAddIn será executado sempre que o controlo 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.