Observação
O acesso a essa página exige autorização. Você pode tentar entrar ou alterar diretórios.
O acesso a essa página exige autorização. Você pode tentar alterar os diretórios.
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.