Como exibir automaticamente um valor padrão ao excluir um valor na lista suspensa no Excel?
No Excel, usando a Validação de Dados, você pode criar uma lista suspensa para os usuários selecionarem valores. No entanto, você pode querer que um valor padrão, como “-Selecionar-”, apareça automaticamente quando o item selecionado for excluído da célula com a lista suspensa. Este artigo fornece uma solução passo a passo usando código VBA.
Exibir automaticamente um valor padrão ao excluir um valor na lista suspensa
Exibir automaticamente um valor padrão ao excluir um valor na lista suspensa
1. Clique com o botão direito na aba da planilha que contém a lista suspensa e, em seguida, selecione Visualizar Código no menu de contexto.
2. Na janela do Microsoft Visual Basic for Applications que aparece, copie e cole o código abaixo no editor de script.
VBA: Exibir valor padrão ao excluir item selecionado na lista suspensa
Private Sub Worksheet_Change(ByVal Target As Range)
Dim xObjV As Validation
On Error Resume Next
Set xObjV = Target.Validation
If xObjV.Type = xlValidateList Then
If IsEmpty(Target.Value) Then Target.Value = "-Select-"
End If
End Sub3. Salve o código. Após excluir um item selecionado, o valor padrão aparecerá na célula com a lista suspensa até que um novo item seja selecionado.
Melhores Ferramentas de Produtividade para Office
Impulsione suas habilidades no Excel com Kutools para Excel e experimente uma eficiência incomparável. Kutools para Excel oferece mais de300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para acessar o recurso que você mais precisa...
Office Tab traz interface com abas para o Office e facilita muito seu trabalho
- Habilite edição e leitura por abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie múltiplos documentos em novas abas de uma mesma janela, em vez de em novas janelas.
- Aumente sua produtividade em50% e economize centenas de cliques todos os dias!
Todos os complementos Kutools. Um instalador
O pacote Kutools for Office reúne complementos para Excel, Word, Outlook & PowerPoint, além do Office Tab Pro, sendo ideal para equipes que trabalham em vários aplicativos do Office.
- Pacote tudo-em-um — complementos para Excel, Word, Outlook & PowerPoint + Office Tab Pro
- Um instalador, uma licença — configuração em minutos (pronto para MSI)
- Trabalhe melhor em conjunto — produtividade otimizada entre os aplicativos do Office
- Avaliação completa por30 dias — sem registro e sem cartão de crédito
- Melhor custo-benefício — economize comparado à compra individual de add-ins