Como adicionar um botão personalizado ao menu de contexto (clique com o botão direito) no Excel?
Como ilustram as imagens abaixo, muitas pessoas adicionam as suas funções mais utilizadas ao menu de clique com o botão direito do Excel para aceder rapidamente a elas com apenas um clique no futuro. Este artigo explica como adicionar um botão com código personalizado ao menu de contexto do Excel.
Adicionar um botão personalizado ao menu de contexto no Excel com código VBA
Adicionar um botão personalizado ao menu de contexto no Excel com código VBA
Imagine que criou um script VBA chamado MyMacro no Excel e agora pretende adicionar essa macro ao menu de contexto, para a executar com um simples clique. Siga estes passos:
1. Prima simultaneamente as teclas Alt + F11 para abrir a janela do Microsoft Visual Basic for Applications.
2. Na janela do Microsoft Visual Basic for Applications, faça duplo clique em EsteLivro no painel esquerdo do Projeto. Em seguida, copie e cole o código VBA seguinte na janela do EsteLivro (Código).
Código VBA: Adicionar um botão personalizado ao menu de contexto no Excel
Private Sub Workbook_Deactivate()
On Error Resume Next
With Application
.CommandBars("Cell").Controls("MyMacro").Delete
End With
On Error GoTo 0
End Sub
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, ByVal Target As Range, Cancel As Boolean)
Dim cmdBtn As CommandBarButton
On Error Resume Next
With Application
.CommandBars("Cell").Controls("MyMacro").Delete
Set cmdBtn = .CommandBars("Cell").Controls.Add(Temporary:=True)
End With
With cmdBtn
.Caption = "MyMacro"
.Style = msoButtonCaption
.OnAction = "MyMacro"
End With
On Error GoTo 0
End SubNota: No código, substitua todas as ocorrências de «MyMacro» pelo nome da macro que criou no seu Excel.
3. Prima as teclas Alt+Q para fechar a janela do Microsoft Visual Basic for Applications.
Agora, ao regressar à interface do Excel e clicar com o botão direito numa célula, verá que o novo botão com o nome especificado foi adicionado ao menu de contexto, tal como ilustrado na imagem seguinte. Ao clicar nesse botão, a macro correspondente será executada imediatamente.
Desbloqueie a Magia do Excel com KUTOOLS AI
- Execução Inteligente: Realize operações em células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
- fórmulas personalizadas: Crie fórmulas personalizadas para simplificar os seus fluxos de trabalho.
- Programação VBA: Escreva e implemente código VBA com facilidade.
- Interpretação de Fórmulas: Compreenda facilmente fórmulas complexas.
- Tradução de Texto: Elimine barreiras linguísticas nas suas folhas de cálculo.
Artigos relacionados:
- C omo inserir automaticamente uma nova linha em branco com um Botão de Comando no Excel?
- Como utilizar um Botão de Comando para guardar a folha de cálculo ativa como ficheiro PDF no Excel?
- Como guardar e fechar a pasta de trabalho atual sem aviso prévio através de um botão de comando no Excel?
- Como atualizar ou inserir a data e hora atuais utilizando um Botão de Comando no Excel?
- Como desativar um botão após ser clicado uma vez no Excel?
As Melhores Ferramentas de Produtividade para o Office
Potencie as suas competências no Excel com Kutools para Excel e experimente uma eficiência como nunca antes.Kutools para Excel Oferece mais de 300 funcionalidades avançadas para impulsionar a produtividade e Economizar Tempo.Clique aqui para obter a funcionalidade de que mais precisa...
Office Tab Traz uma interface com separadores para o Office e torna o seu trabalho muito mais fácil
- Ative a edição e leitura com separadores no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novos separadores da mesma janela, em vez de em janelas separadas.
- Aumente a sua produtividade em 50 % e elimine centenas de cliques do rato todos os dias!
Todos os suplementos Kutools — num único instalador.
Kutools for Office reúne suplementos para Excel, Word, Outlook e PowerPoint, além do Office Tab Pro, sendo a solução ideal para equipas que trabalham em várias aplicações do Office.
- Pacote tudo-em-um— suplementos para Excel, Word, Outlook e PowerPoint + Office Tab Pro
- Um instalador, uma licença— configuração em minutos (pronto para MSI)
- Funciona melhor em conjunto— produtividade simplificada em todas as aplicações do Office
- Teste gratuito de 30 dias com todas as funcionalidades— sem registo, sem cartão de crédito
- Melhor relação qualidade-preço— poupe face à compra individual dos suplementos