Como executar a macro quando o valor da célula muda no Excel?
Normalmente, no Excel, podemos pressionar a tecla F5 ou o botão Executar para executar o código VBA. Mas, você já tentou executar o código de macro específico quando o valor de uma célula muda? Neste artigo, vou apresentar alguns truques rápidos para lidar com esse trabalho no Excel.
Executar ou chamar a macro quando um valor de célula específico for alterado com o código VBA
Executar ou chamar a macro quando qualquer valor de célula mudar em um intervalo com o código VBA
Executar ou chamar a macro quando um valor de célula específico for alterado com o código VBA
Para executar um código de macro alterando um valor de célula, o seguinte código VBA pode fazer um favor, faça o seguinte:
1. Clique com o botão direito na guia da planilha em que deseja executar a macro se o valor da célula mudar e, a seguir, Ver código a partir do menu de contexto, e no aberto Microsoft Visual Basic para aplicativos janela, copie e cole o seguinte código no módulo em branco:
Código VBA: execute a macro quando o valor da célula mudar:
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then
Call Mymacro
End If
End Sub
Note: No código acima, A1 é a célula específica na qual você deseja executar o código, Minha macro é o nome da macro que você deseja executar. Altere-os de acordo com sua necessidade.
2. E então salve e feche a janela de código, agora, ao inserir ou alterar o valor na célula A1, o código específico será acionado de uma vez.
Executar ou chamar a macro quando qualquer valor de célula mudar em um intervalo com o código VBA
Se você deseja executar ou acionar uma macro quando o valor de qualquer célula muda em um intervalo de células, o código a seguir pode ajudá-lo.
1. Clique com o botão direito na guia da planilha em que deseja executar a macro se o valor da célula mudar e, a seguir, Ver código a partir do menu de contexto, e no aberto Microsoft Visual Basic para aplicativos janela, copie e cole o seguinte código no módulo em branco:
Código VBA: execute a macro quando qualquer valor de célula for alterado em um intervalo:
Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A1:B100")) Is Nothing Then
Call Mymacro
End If
End Sub
Note: No código acima, A1: B100 são as células específicas nas quais você deseja executar o código, Minha macro é o nome da macro que você deseja executar. Altere-os de acordo com sua necessidade.
2. E então salve e feche a janela de código, agora, ao inserir ou alterar o valor em qualquer célula de A1: B100, o código específico será executado de uma vez.
Remova todas as macros de várias pastas de trabalho
Kutools for Excel's Remoção em lote de todas as macros O utilitário pode ajudá-lo a remover todas as macros de várias pastas de trabalho conforme necessário. Baixe e teste gratuitamente o Kutools para Excel agora!
Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora!
Artigos relacionados:
Como executar macro automaticamente antes de imprimir no Excel?
Como executar macro com base no valor da célula no Excel?
Como executar a macro com base no valor selecionado da lista suspensa no Excel?
Como executar macro clicando em hiperlinks no Excel?
Como executar macro quando a planilha é selecionada em uma pasta de trabalho?
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!