Criar Tecla de Atalho Excel Vba

Para criar uma tecla de atalho no Excel VBA, siga as etapas abaixo:

  1. Abra o Editor do Visual Basic no Excel, pressionando Alt + F11.

  2. No menu superior, selecione "Inserir" e escolha "Módulo" para criar um novo módulo.

  3. Na janela de código do novo módulo, digite o seguinte código:

Sub Atalho()

'Insira o seu código aqui 

End Sub

Este é um exemplo básico de um sub-rotina. Sub-rotinas são usadas para agrupar instruções que serão executadas em conjunto.

  1. Adicione o código que você deseja executar com a tecla de atalho. Por exemplo, se você quiser exibir uma mensagem quando a tecla de atalho for pressionada, adicione o seguinte código ao corpo da sub-rotina:

MsgBox "Você pressionou a tecla de atalho!"

  1. Agora, precisamos definir a tecla de atalho que acionará o código. Para fazer isso, selecione "Ferramentas" no menu superior e escolha "Personalizar".

  2. Na janela "Personalizar", selecione a guia "Comandos" e clique no botão "Novo Menu" na parte inferior.

  3. Digite um nome para o seu menu (por exemplo, "Teclas de Atalho") e selecione o ícone desejado. Clique em "OK" para salvar o novo menu.

  4. No lado esquerdo da janela "Personalizar", selecione o menu recém-criado. No lado direito, selecione "Macro" e arraste-o para o novo menu.

  5. Na janela "Macro", selecione a sub-rotina que você criou anteriormente (no exemplo acima, "Atalho"). Clique em "OK" para salvar as alterações.

  6. Agora, selecione o novo menu na barra de ferramentas e escolha "Personalizar". Clique com o botão direito do mouse na sub-rotina que você selecionou (no exemplo acima, "Atalho") e escolha "Propriedades".

  7. Na janela "Propriedades", clique no campo "Tecla de atalho", pressione a tecla que deseja usar como atalho (por exemplo, "Ctrl + Alt + T") e clique em "OK" para salvar as alterações.

  8. Feche a janela "Personalizar" e teste o atalho pressionando a combinação de teclas que você definiu.

Pronto! Agora você tem uma tecla de atalho personalizada no Excel VBA.

Comentários