Como combinar linhas com o mesmo ID/nome no Excel?

Combinar linhas com o mesmo ID ou nome no Excel é uma tarefa comum para organizar e resumir dados. Se você está consolidando registros de vendas, resumindo resultados de pesquisas ou organizando conjuntos de dados, o processo pode ser simplificado usando as ferramentas internas do Excel. Aqui está um guia detalhado para ajudá-lo a combinar linhas com o mesmo ID ou nome de forma eficiente.
Combinar linhas com o mesmo ID/nome por VBA
Este método apresentará um VBA para combinar rapidamente todas as linhas com o mesmo ID ou nome na seleção especificada. Por favor, siga os passos abaixo:
1. Pressione as teclas "Alt + F11" para abrir a janela Microsoft Visual Basic for Applications.
2. Clique em "Inserir" > "Módulo", e depois cole o código VBA na janela Módulo.
VBA: Combinar Linhas com o Mesmo ID/nome no Excel
Sub Consolidate_Rows()
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Value
Else
xRg(I, K) = xRg(I, K).Value & "," & xRg(J, K).Value
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub
3. Pressione a tecla F5 ou clique no botão Executar para executar este VBA.
4. Na caixa de diálogo Kutools para Excel que aparece, selecione as linhas que deseja combinar e clique no botão OK. Veja a captura de tela:
Agora você verá as linhas no intervalo especificado combinadas com vírgulas pelo mesmo ID. Veja a captura de tela:
Combinar linhas com o mesmo ID/nome por Kutools para Excel
Não se preocupe se você não está familiarizado com codificação VBA — Kutools para Excel oferece um recurso "Mesclar Linhas Avançado" que simplifica o processo. Sem operações complicadas necessárias, apenas alguns cliques são suficientes para mesclar rapidamente linhas com o mesmo ID ou nome. Esta poderosa ferramenta também suporta mesclagem de colunas, soma, contagem, média e muito mais, tornando-a a solução perfeita para todas as suas diversas necessidades de processamento de dados.
1. Selecione o intervalo de dados que deseja combinar e clique em "Kutools" > "Mesclar e Dividir" > "Mesclar Linhas Avançado". Veja a captura de tela:
2. Na caixa de diálogo "Mesclar Linhas Avançado", especifique as seguintes operações:
- Selecione a coluna de ID ou nome com base na qual você combinará outros dados, então selecione "Chave Principal" no menu suspenso "Operação";
- Em seguida, selecione outro nome de coluna e clique na lista suspensa no campo "Operação", e escolha um delimitador na seção "Combinar". Repita este passo para outras colunas que deseja combinar;
- Clique no botão OK.Dica: Se você precisar manter a formatação da célula ao mesclar, marque a opção "Usar valores formatados".
Agora você verá as linhas selecionadas combinadas com base no ID do pedido. Veja a captura de tela:
Kutools para Excel - Potencialize o Excel com mais de 300 ferramentas essenciais. Aproveite recursos de IA permanentemente gratuitos! Obtenha Agora
Ao seguir esses métodos, você pode facilmente combinar linhas com o mesmo ID ou nome no Excel, economizando tempo e garantindo precisão. Escolha a abordagem que melhor se adapta aos seus dados e objetivos! Se você estiver interessado em explorar mais dicas e truques do Excel, nosso site oferece milhares de tutoriais para ajudá-lo a dominar o Excel.
Artigos relacionados:
Como concatenar mantendo a formatação de número/data no Excel?
Como concatenar células de outra planilha/diferentes planilhas no Excel?
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!