Como remover duplicatas, mas manter o restante dos valores da linha no Excel?
No Excel, ele removerá todos os valores duplicados e moverá para cima quando você aplicar a função Remove Duplicates conforme a captura de tela 1 mostrada. No entanto, em alguns casos, você pode querer remover duplicatas, mas manter o restante dos valores da linha conforme a captura de tela 2 mostrada. Agora, neste caso, vou apresentar alguns truques para excluir duplicatas, mas mantendo o resto no Excel.
Remova as duplicatas, mas mantenha o restante dos valores da linha com o Filtro (3 etapas)
Remova as duplicatas, mas mantenha o restante dos valores da linha com VBA (4 etapas)
Remova duplicatas, mas mantenha o restante dos valores das linhas com o Kutools para Excel (2 etapas)
Remova as duplicatas, mas mantenha o resto dos valores da linha com o Filtro
Com uma fórmula e a função Filtro, você pode remover rapidamente as duplicatas, mas não descanse.
1. Selecione uma célula em branco ao lado do intervalo de dados, D2 por exemplo, digite fórmula = A3 = A2, arraste a alça de preenchimento automático até as células de que você precisa. Veja a imagem:
2. Selecione todos os intervalos de dados, incluindo a célula da fórmula e clique em Data > filtros Para habilitar filtros função. Veja a imagem:
3. Clique no Ícone de filtro na coluna D (a coluna de fórmula) e verifique TURE na lista suspensa, veja a captura de tela:
4. Clique OK, e então todas as duplicatas foram listadas e selecione todos os valores duplicados, pressione Apagar chave para removê-los. Veja a imagem:
5. Clique Data > filtros desativar filtrose remova as fórmulas conforme necessário. Você pode ver que todas as duplicatas foram removidas e o resto dos valores são mantidos na linha.
Remova duplicatas, mas mantenha o resto dos valores da linha com VBA
No Excel, há um código VBA que também pode remover duplicatas, mas manter o restante dos valores da linha.
1. Pressione Alt + F11 chaves para mostrar Microsoft Visual Basic para Aplicações janela.
2. Clique inserção > móduloe, e cole o código abaixo no Módulo.
VBA: remove duplicatas, mas mantém os valores restantes da linha
Sub RemoveDuplicates()
'UpdatebyExtendoffice20160918
Dim xRow As Long
Dim xCol As Long
Dim xrg As Range
Dim xl As Long
On Error Resume Next
Set xrg = Application.InputBox("Select a range:", "Kutools for Excel", _
ActiveWindow.RangeSelection.AddressLocal, , , , , 8)
xRow = xrg.Rows.Count + xrg.Row - 1
xCol = xrg.Column
'MsgBox xRow & ":" & xCol
Application.ScreenUpdating = False
For xl = xRow To 2 Step -1
If Cells(xl, xCol) = Cells(xl - 1, xCol) Then
Cells(xl, xCol) = ""
End If
Next xl
Application.ScreenUpdating = True
End Sub
3. Pressione F5 para executar o código, uma caixa de diálogo aparece para lembrá-lo de selecionar um intervalo do qual remover os valores duplicados. Veja a imagem:
4. Clique OK, agora os valores duplicados foram removidos da seleção e deixam as células em branco.
Remova duplicatas, mas mantenha o restante dos valores das linhas com o Kutools para Excel
Se você tem Kutools para Excel - uma ferramenta de adição útil e poderosa instalada, você pode remover rapidamente duplicatas, mas manter o repouso ou os valores da linha de duas maneiras.
Kutools for Excel, com mais de 300 funções úteis, tornam seus trabalhos mais fáceis. |
Depois de instalar Kutools para Excel, faça o seguinte :(Baixe grátis o Kutools para Excel agora!)
Método 1 mesclar as mesmas células (2 etapas)
1. Selecione os valores duplicados, clique Kutools > Unir e dividir > Mesclar as mesmas células. Veja a imagem:
2. Em seguida, os valores duplicados foram mesclados em uma célula. E clique Início > Unir e centrar > Desfaça a mesclagem de células para dividi-las. Veja a imagem:
Agora, o resultado foi mostrado como este:
Método 2: Selecionar células duplicadas e únicas (4 etapas)
1. Selecione a lista de dados da qual deseja remover duplicatas e clique em Kutools > Selecionar > Selecione Células Duplicadas e Únicas. Veja a imagem:
2. No Selecione Células Duplicadas e Únicas diálogo, verificar Duplicados (exceto o primeiro) opção no Regra seção. Veja a imagem:
3. Clique Ok, uma caixa de diálogo aparecerá para lembrá-lo de quantas duplicatas foram selecionadas, clique OK para fechá-lo. Veja a imagem:
4. Em seguida, pressione Apagar para remover os valores duplicados selecionados.
Remova as duplicatas, mas mantenha o resto da linha
Melhores ferramentas de produtividade de escritório
Aprimore suas habilidades de Excel com o Kutools para Excel e experimente uma eficiência como nunca antes. Kutools para Excel oferece mais de 300 recursos avançados para aumentar a produtividade e economizar tempo. Clique aqui para obter o recurso que você mais precisa...
Office Tab traz interface com guias para o Office e torna seu trabalho muito mais fácil
- Habilite a edição e leitura com guias em Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Abra e crie vários documentos em novas guias da mesma janela, em vez de em novas janelas.
- Aumenta sua produtividade em 50% e reduz centenas de cliques do mouse para você todos os dias!