Como permitir apenas valores únicos no Excel?
Se você deseja manter apenas valores únicos em uma coluna da planilha e evitar duplicatas, este artigo apresentará alguns truques rápidos para ajudá-lo a lidar com essa tarefa.
Permitir apenas valores únicos na planilha com Validação de Dados
Permitir apenas valores únicos na planilha com Kutools para Excel
Permitir apenas valores únicos na planilha com código VBA
Permitir apenas valores únicos na planilha com Validação de Dados
Na verdade, a função Validação de Dados do Excel pode ajudá-lo a resolver esse problema. Por favor, siga os passos abaixo:
1. Selecione as células ou coluna onde deseja que sejam inseridos apenas valores únicos e clique em Dados > Validação de Dados > Validação de Dados, veja a captura de tela:
2. Na caixa de diálogo Validação de Dados, por favor, faça as seguintes operações:
(1.) Clique na aba Configurações;
(2.) No menu suspenso Permitir, escolha Personalizado;
(3.) E insira esta fórmula: =CONT.SE($E:$E;E1)<2 (E é a coluna onde você quer permitir apenas valores únicos, E1 é a primeira célula da coluna que deseja usar) no campo de texto Fórmula.
3. Em seguida, clique no botão OK. A partir de agora, quando você inserir um valor duplicado na coluna específica configurada, uma mensagem de aviso será exibida para lembrá-lo, veja a captura de tela:
Permitir apenas valores únicos na planilha com Kutools para Excel
Os dois métodos acima só podem prevenir entradas duplicadas em uma coluna. Se você tiver o Kutools para Excel, sua ferramenta Prevenir Duplicados pode ajudá-lo a prevenir rapidamente duplicatas em um intervalo de células e apenas em uma coluna ou linha.
Após instalar o Kutools para Excel, por favor, faça o seguinte:
1. Selecione a coluna ou intervalo de células onde deseja prevenir valores duplicados, mas permitir apenas dados únicos.
2. Em seguida, clique em Kutools > Limitar entrada > Prevenir Duplicados, veja a captura de tela:
3. Uma mensagem de aviso será exibida para lembrá-lo de que a Validação de Dados será removida ao aplicar esse recurso, veja a captura de tela:
4. Em seguida, clique no botão Sim para continuar, e outra caixa de prompt será exibida para lembrá-lo quais células tiveram esse recurso aplicado. Veja a captura de tela:
5. Em seguida, clique no botão OK. Agora, quando você inserir alguns dados duplicados no intervalo A1:D15, uma caixa de prompt será exibida para lembrá-lo de que os dados duplicados não são válidos, e você precisa inserir apenas valores únicos. Veja a captura de tela:
Mais de 300 funções podem tornar seu trabalho mais eficiente. Você pode baixar o Kutools para Excel para teste gratuito.
Permitir apenas valores únicos na planilha com código VBA
Se você está interessado no código VBA, o seguinte código também pode ser útil.
1. Clique com o botão direito na guia da planilha onde deseja permitir apenas números negativos e escolha Visualizar Código no menu de contexto. Na janela Microsoft Visual Basic for Applications que aparecer, copie e cole o seguinte código no Módulo em branco:
Código VBA: Permitir apenas valores únicos na planilha:
Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20160829
Dim xRg As Range, iLong, fLong As Long
If Not Intersect(Target, Me.[A1:A1000]) Is Nothing Then
Application.EnableEvents = False
For Each xRg In Target
With xRg
If (.Value <> "") Then
If WorksheetFunction.CountIf(Me.[A:A], .Value) > 1 Then
iLong = .Interior.ColorIndex
fLong = .Font.ColorIndex
.Interior.ColorIndex = 3
.Font.ColorIndex = 6
MsgBox "Duplicate Entry !", vbCritical, "Kutools for Excel"
.ClearContents
.Interior.ColorIndex = iLong
.Font.ColorIndex = fLong
End If
End If
End With
Next
Application.EnableEvents = True
End If
End Sub
Observação: No código acima, A1:A1000 são as células da coluna onde você deseja prevenir duplicatas.
2. Em seguida, salve e feche este código. Agora, quando você inserir valores duplicados nas células A1:A1000, uma mensagem de aviso será exibida para lembrá-lo de que a entrada duplicada não é permitida, veja a captura de tela:
3. Em seguida, clique no botão OK, e o valor duplicado será excluído.
Melhores Ferramentas de Produtividade para Office
Potencialize suas habilidades no Excel com o Kutools para Excel e experimente uma eficiência sem igual. O Kutools para Excel oferece mais de300 recursos avançados para aumentar sua produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
O Office Tab traz interface com abas para o Office e facilita muito o seu trabalho
- Habilite a edição e leitura com abas no Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas abas na mesma janela, em vez de abrir novas janelas.
- Aumente sua produtividade em50% e reduza centenas de cliques do mouse todos os dias!