VBA – Modificar o Menu do Botão Direito do Mouse para Chamar uma Macro
Last updated on August 25, 2023
Clique com o Botão Direito do Mouse para Chamar uma Macro
Aqui está um código que permitirá que um usuário selecione sua macro no menu padrão que aparece depois que ele clica com o botão direito do mouse em uma célula.
1. Coloque o seguinte código na janela de código EstaPastaDeTrabalho:
Private Sub Workbook_Open()
Dim MeuMenu As Object
Set MeuMenu = Application.ShortcutMenus(xlWorksheetCell) _
.MenuItems.AddMenu("Meu Menu Personalizado", 1)
With MeuMenu.MenuItems
.Add "MinhaMacro1", "MinhaMacro1", , 1, , ""
.Add "MinhaMacro2", "MinhaMacro2", , 2, , ""
End With
Set MeuMenu = Nothing
End Sub2. Coloque o seguinte código em um módulo
Public Sub MinhaMacro1()
MsgBox "Macro1 de um menu de clique direito"
End Sub
Public Sub MinhaMacro2()
MsgBox "Macro2 de um menu de clique direito"
End Sub3. Feche a pasta de trabalho e abra-a novamente!
Codificação VBA facilitada
Pare de procurar códigos VBA on-line. Saiba mais sobre o AutoMacro – um construtor de código VBA que permite que os iniciantes codifiquem procedimentos do zero com o mínimo de conhecimento de codificação e com muitos recursos que economizam tempo para todos os usuários!
