Achar celulas iguais em mesma coluna no EXCEL

[Budrick]

É possivel, por exemplo que na coluna A eu preencha celulas de 1 a 90 com numeros de 5 digitos em cada celula e tenha como identificar se há algum repetido automaticamente ?

Exemplo:

12121

13333 *

12345

12355

13333 *

Obrigado !

[Visitante]

Sim...

Basta selecionar a coluna e coloca-la em ordem Alfanumérica, assim você irá perceber se existem números repetidos. Como de 0 a 90 não é tanta coisa, acho que é a maneira mais rápida.

[Budrick]

Postado Originalmente por Jose@12 nov 2004, 12:18

Sim...

Basta selecionar a coluna e coloca-la em ordem Alfanumérica, assim você irá perceber se existem números repetidos. Como de 0 a 90 não é tanta coisa, acho que é a maneira mais rápida.

Ah sei, voce diz classificar a coluna né ?

Então, mas 90 numeros foi apenas um exexmplo e essa já é a maneira que eu procuro celulas repetidas (olhando de uma em uma após colocar em ordem).

Não existe outra maneira ?

Obrigado mesmo assim !

[Visitante]

Acredito que só fazendo uma MACRO para isso... mas neste caso não posso ajudá-lo, você precisaria de conhecimentos em Vbscript ou conhecimento de ASP e/ou PHP e montar um script que usasse a planilha do Excel como Bando de dados, e então que te mostrasse as duplicações.

[olliver.master]

Este código filtra os valores colore as células e copia a lista para outra coluna se os valores forem diferente de azul.

Dim WkSheet As Worksheet

Dim Area1 As Range

Dim Area2 As Range

Dim I As Integer

Dim J As Integer

Sub Main()

Call ColorirValorRepetido(Range("A1:A40"), 3, 5)

Call CopiarValor(Range("A1:A40"), 5, 1, 2)

End Sub

Sub ColorirValorRepetido(Area As Range, Cor1 As Integer, Cor2 As Integer)

Set WkSheet = ActiveSheet

Set Area1 = WkSheet.Range(Area.Address)

I = 0: While I < Area1.Count: I = I + 1

For Each Area2 In Area1

If Area2 = Area1.Cells(I) And Area2.Row <> Area1.Cells(I).Row Then

Area1.Cells(I).Interior.ColorIndex = Cor1

Area2.Interior.ColorIndex = Cor2

End If

Next Area2

Wend

End Sub

Sub CopiarValor(Area As Range, Cor2 As Integer, _

Linha As Integer, Coluna As Integer)

Set WkSheet = ActiveSheet

Set Area1 = WkSheet.Range(Area.Address)

J = -1

For Each Area2 In Area1

If Area2.Interior.ColorIndex <> Cor2 Then

J = J + 1

Cells(Linha + J, Coluna) = Area2

End If

Next Area2

End Sub

[jefrock_jeff]

Ha uma maneira um pouco mais simples !

1º ordene os dados de A para Z.

2º Utilize a função SE.

Então ficaria assim.

=se( A2=A1;"REPETIDO";"NAO REPETIDO")

Puxe a formula para a céluas até onde tiver dados.

Espero ter ajudado.

abraços

[Lucas Brum]

Ha uma maneira um pouco mais simples !

1º ordene os dados de A para Z.

2º Utilize a função SE.

Então ficaria assim.

=se( A2=A1;"REPETIDO";"NAO REPETIDO")

Puxe a formula para a céluas até onde tiver dados.

Espero ter ajudado.

abraços

O Office 2007/2010 tem esta função automatizada. Na guia "Dados" você clica em "Remover Duplicatas". Divirta-se.

[HANDREHZAO]

=se( A2=A1;"REPETIDO";"NAO REPETIDO")

AINDA HÁ OUTRA MANEIRA SEM PRECIDAR ORDENAR.

MAS VAI DEPENDER SE SUA NECESSIDADE.

CASO QUEIRA ELIMINAR OS REPETIDOS PODE USAR AS FUNÇÕES DA SEGUINTE MANEIRA.

NA COLUNA AO LADO DIGITE;

=SE(CONT.SE(A1:A40;A1)>1;"REPETIDO";"NÃO REPETIDO")

EXTENDA A FORMULA PARA O FINAL DA PLANILHA ONDE TENHA DADOS.

DESSE MODO APENAS AS CÉLULAS EXCEDENTES SÃO IDENTIFICADAS POR EXEMPLO:

| A | B | C |

1 | 13548 |NÃO REPETIDO | |

2 | 18365 |NÃO REPETIDO | |

3 | 14956 |NÃO REPETIDO | |

4 | 18365 |REPETIDO | |

5 | 11523 |NÃO REPETIDO | |

APENAS ACÉLULA A4 FOI MARCADA COM "REPETIDO" EMBORA A OUTRA OCORRENCIA DELA Á A CÉLULA A2.

MAS CASO QUEIRA APENAS IDENTIFICAR AMBAS AS OCORRENCIAS DA REPETIÇÃO, ENTÃO FIXE O INTERVALO DAS CÉLULAS USANDO $.

VEJA COMO:

=SE(CONT.SE($A$1:$A$40;A1)>1;"REPETIDO";"NÃO REPETIDO")

LOGO:

| A | B | C |

1 | 13548 |NÃO REPETIDO | |

2 | 18365 |REPETIDO | |

3 | 14956 |NÃO REPETIDO | |

4 | 18365 |REPETIDO | |

5 | 11523 |NÃO REPETIDO | |

AMBAS AS CÉLULAS SÃO IDENTIFICADAS COM "REPETIDO".

=se( A2=A1;"REPETIDO";"NAO REPETIDO")

AINDA HÁ OUTRA MANEIRA SEM PRECIDAR ORDENAR.

MAS VAI DEPENDER SE SUA NECESSIDADE.

CASO QUEIRA ELIMINAR OS REPETIDOS PODE USAR AS FUNÇÕES DA SEGUINTE MANEIRA.

NA COLUNA AO LADO DIGITE;

=SE(CONT.SE(A1:A40;A1)>1;"REPETIDO";"NÃO REPETIDO")

EXTENDA A FORMULA PARA O FINAL DA PLANILHA ONDE TENHA DADOS.

DESSE MODO APENAS AS CÉLULAS EXCEDENTES SÃO IDENTIFICADAS POR EXEMPLO:

| A | B | C |

1 | 13548 |NÃO REPETIDO | |

2 | 18365 |NÃO REPETIDO | |

3 | 14956 |NÃO REPETIDO | |

4 | 18365 |REPETIDO | |

5 | 11523 |NÃO REPETIDO | |

APENAS ACÉLULA A4 FOI MARCADA COM "REPETIDO" EMBORA A OUTRA OCORRENCIA DELA Á A CÉLULA A2.

MAS CASO QUEIRA APENAS IDENTIFICAR AMBAS AS OCORRENCIAS DA REPETIÇÃO, ENTÃO FIXE O INTERVALO DAS CÉLULAS USANDO $.

VEJA COMO:

=SE(CONT.SE($A$1:$A$40;A1)>1;"REPETIDO";"NÃO REPETIDO")

LOGO:

| A | B | C |

1 | 13548 |NÃO REPETIDO | |

2 | 18365 |REPETIDO | |

3 | 14956 |NÃO REPETIDO | |

4 | 18365 |REPETIDO | |

5 | 11523 |NÃO REPETIDO | |

AMBAS AS CÉLULAS SÃO IDENTIFICADAS COM "REPETIDO".

[edu.filipe]

Olá tem uma maneira muito simples que acredito te ajudará.

1. Selecione a coluna que desejas procurar células com valores repetidos.

2. Clique em formatação condicional + nova regra + formatar apenas valores exclusivos ou duplicados.

3. Selecione valores duplicados + formatar.

4. Destaque essa palavra usando algum tipo de formatação de texto, seja por cor, tipo de fonte, cor de célula ou alguma outra maneira.

5. Clique em ok.

6. Clique em ok novamente.

Pronto.

Acredito que isso te ajude.

Abraços