Como criar uma lista suspensa, mas mostrar valores diferentes no Excel?

Na planilha do Excel, podemos criar rapidamente uma lista suspensa com o recurso Validação de Dados, mas você já tentou mostrar um valor diferente quando clica na lista suspensa? Por exemplo, tenho os seguintes dados em duas colunas, Coluna A e Coluna B. Agora, preciso criar uma lista suspensa com os valores da coluna Nome, mas, ao selecionar o nome da lista suspensa criada, o valor correspondente na coluna Número é exibido, conforme mostrado na captura de tela a seguir. Este artigo apresentará os detalhes para resolver essa tarefa.

Criar lista suspensa, mas mostrar um valor diferente na célula da lista suspensa

Criar lista suspensa, mas mostrar um valor diferente na célula da lista suspensa

Para concluir esta tarefa, siga as etapas abaixo passo a passo:

1. Crie um nome de intervalo para os valores das células que deseja usar na lista suspensa; neste exemplo, vou inserir o nome dropdown na "Caixa de Nome" e, em seguida, pressionar a tecla "Enter", veja a captura de tela:

2. Em seguida, selecione as células onde deseja inserir a lista suspensa e clique em "Dados" > "Validação de Dados" > "Validação de Dados", veja a captura de tela:

3. Na caixa de diálogo "Validação de Dados", na guia "Configurações", escolha "Lista" no menu suspenso "Permitir" e, em seguida, clique no botão para selecionar a lista "Nome", que você deseja usar como valores suspensos na caixa de texto "Fonte do Link". Veja a captura de tela:

4. Após inserir a lista suspensa, clique com o botão direito na guia da planilha ativa e selecione "Visualizar Código" no menu de contexto. Na janela aberta "Microsoft Visual Basic for Applications", copie e cole o código a seguir no "Módulo" em branco:

Código VBA: Exibir um valor diferente da lista suspensa:

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice
    selectedNa = Target.Value
    If Target.Column = 5 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

Observação: No código acima, o número 5 dentro do script "If Target.Column = 5 Then" é o número da coluna onde sua lista suspensa está localizada. O "dropdown" neste código "selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)" é o nome do intervalo que você criou na etapa 1. Você pode alterá-los conforme necessário.

5. Em seguida, salve e feche este código. Agora, ao selecionar um item da lista suspensa, um valor diferente relacionado será exibido na mesma célula, veja a captura de tela:

Demonstração: Criar lista suspensa, mas mostrar valores diferentes no Excel