Como limpar a célula da lista suspensa dependente após a alteração da seleção no Excel?

Para uma lista suspensa dependente, quando o valor da lista suspensa principal é alterado, o valor selecionado na segunda lista se tornará inválido. Você precisa remover manualmente o valor inválido da segunda lista suspensa após a alteração da seleção na primeira. Neste artigo, mostrarei um método para limpar automaticamente a célula da lista suspensa dependente após a alteração da seleção no Excel.

Limpar célula da lista suspensa dependente após alteração da seleção com código VBA

Limpar célula da lista suspensa dependente após alteração da seleção com código VBA

O seguinte código VBA ajuda você a limpar a lista suspensa dependente após a alteração da seleção no Excel.

1. Clique com o botão direito do mouse na aba da planilha que contém a lista suspensa dependente que deseja limpar automaticamente e, em seguida, selecione Visualizar Código no menu de contexto.

2. Na janela Microsoft Visual Basic for Applications que abrir, copie o seguinte código VBA para a janela.

Código VBA: limpar célula da lista suspensa dependente após alteração da seleção

Private Sub Worksheet_Change(ByVal Target As Range)
'Update by Extendoffice 2018/06/04
    Application.EnableEvents = False
    If Target.Column = 5 And Target.Validation.Type = 3 Then
        Target.Offset(0, 1).Value = ""
    End If
    Application.EnableEvents = True
End Sub

Observação: No código, o número 5 é o número da coluna que contém a lista suspensa principal. Nesse caso, minha lista suspensa principal está localizada na coluna E.

3. Pressione as teclas Alt + Q para fechar a janela Microsoft Visual Basic for Applications.

A partir de agora, quando forem feitas alterações na lista suspensa principal, os conteúdos da segunda lista suspensa serão limpos automaticamente. Veja a captura de tela:

Desbloqueie a Magia do Excel com o Kutools AI

• Execução Inteligente: Realize operações de células, analise dados e crie gráficos — tudo impulsionado por comandos simples.
• Fórmulas Personalizadas: Gere fórmulas sob medida para otimizar seus fluxos de trabalho.
• Codificação VBA: Escreva e implemente código VBA sem esforço.
• Interpretação de Fórmulas: Compreenda fórmulas complexas com facilidade.
• Tradução de Texto: Supere barreiras linguísticas dentro de suas planilhas.

Potencialize suas capacidades no Excel com ferramentas alimentadas por IA. Baixe Agora e experimente uma eficiência como nunca antes!

Artigos relacionados:

• Como criar listas suspensas dependentes em cascata no Excel?
• Como criar caixas de listagem dinâmicas em cascata no Excel?
• Como preencher automaticamente outras células ao selecionar valores na lista suspensa do Excel?
• Como autocompletar ao digitar na lista suspensa do Excel?
• Como criar um calendário em lista suspensa no Excel?