Note: The other languages of the website are Google-translated. Back to English
Log in  \/ 
x
or
x
Inscreva-se  \/ 
x

or

Como combinar linhas duplicadas e somar os valores no Excel?

doc-combine-sum1 -2 doc-combine-sum2

No Excel, você sempre pode encontrar este problema, quando você tem um intervalo de dados que contém algumas entradas duplicadas, e agora você deseja combinar os dados duplicados e somar os valores correspondentes em outra coluna, conforme as imagens a seguir mostradas. Como você resolveria esse problema?

Combine linhas duplicadas e some os valores com a função Consolidar

Combine linhas duplicadas e some os valores com o código VBA

Combine linhas duplicadas e some os valores com Kutools para Excel

Combine as linhas correspondentes com base em valores duplicados em outra coluna com o Kutools para Excel


seta azul bolha direita Combine linhas duplicadas e some os valores com a função Consolidar

O Consolidate é uma ferramenta útil para consolidarmos várias planilhas ou linhas no Excel, portanto, com esta função, também podemos resumir várias linhas com base nas duplicatas. Execute as seguintes etapas:

1. Clique em uma célula onde deseja localizar o resultado em sua planilha atual.

2. Clique em Dados > Consolidar, veja a captura de tela:

doc-combine-sum3

3. No Consolidar caixa de diálogo:

  • (1.) Selecione Soma de função lista suspensa;
  • (2.) Clique doc-combine-sum5botão para selecionar o intervalo que deseja consolidar e clique em Adicionar botão para adicionar a referência a Todas as referências caixa de listagem;
  • (3.) Verifique Linha superior e Coluna esquerda de Use rótulos em opção. Veja a imagem:

doc-combine-sum4

4. Depois de terminar as configurações, clique OK, e as duplicatas são combinadas e somadas. Veja a imagem:

doc-combine-sum6

Importante: Se o intervalo não tiver a linha de cabeçalho, você precisará desmarcar Linha superior de Use rótulos em opção.


Combine linhas duplicadas e soma / média dos valores correspondentes em outra coluna

Kutools for Excel's Linhas Combibe Avançadas ajuda você a combinar várias linhas duplicadas em um registro com base em uma coluna-chave e também pode aplicar alguns cálculos como soma, média, contagem e assim por diante para outras colunas. Clique para baixar o Kutools para Excel!


seta azul bolha direita Combine linhas duplicadas e some os valores com o código VBA

O código VBA a seguir também pode ajudá-lo a consolidar linhas duplicadas na planilha, mas, ao mesmo tempo, os dados originais serão destruídos, você precisa fazer backup de uma cópia dos dados.

1. Segure o ALT + F11 chaves, então ele abre o Microsoft Visual Basic para Aplicações janela.

2. Clique inserção > Móduloe cole o seguinte código no Janela Módulo.

Código VBA: Combine linhas duplicadas e some os valores

Sub CombineRows()
'Updateby Extendoffice
Dim WorkRng As Range
Dim Dic As Variant
Dim arr As Variant
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Set Dic = CreateObject("Scripting.Dictionary")
arr = WorkRng.Value
For i = 1 To UBound(arr, 1)
    Dic(arr(i, 1)) = Dic(arr(i, 1)) + arr(i, 2)
Next
Application.ScreenUpdating = False
WorkRng.ClearContents
WorkRng.Range("A1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.keys)
WorkRng.Range("B1").Resize(Dic.Count, 1) = Application.WorksheetFunction.Transpose(Dic.items)
Application.ScreenUpdating = True
End Sub

3. Então aperte F5 para executar este código e você precisa selecionar o intervalo que deseja consolidar na caixa de prompt exibida. Veja a imagem:

doc-combine-sum7

4. E, em seguida, clique em OK, as linhas duplicadas foram combinadas e os valores somados.

Importante: Se você quiser usar este código, é melhor fazer uma cópia do arquivo para evitar a destruição dos dados, e este código é aplicado apenas a duas colunas.


seta azul bolha direita Combine linhas duplicadas e some os valores com Kutools para Excel

Aqui, apresento a ferramenta útil - Kutools for Excel para você é Combinar linhas avançadas também pode rapidamente fazer um favor para resolver este problema.

Kutools for Excel : com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Get it Now .

Depois de instalar Kutools for Excel, faça o seguinte:

1. Selecione o intervalo de que você precisa e clique Kutools > Unir e dividir > Combinar linhas avançadas. Veja a imagem:

2. No Combinar linhas avançadas diálogo, verificar Meus dados têm cabeçalhos se o seu intervalo tiver cabeçalhos, selecione o nome da coluna com a qual deseja combinar as duplicatas e clique Chave primária, veja a captura de tela:

doc-combine-sum7

3. Em seguida, selecione o nome da coluna com a qual deseja somar os valores e clique calculado > Soma ou outros cálculos, conforme necessário. Veja a imagem:

doc-combine-sum7

4. Clique Ok para fechar a caixa de diálogo, você pode ver que as duplicatas são combinadas e os dados correspondentes em outra coluna são somados. Veja as capturas de tela:

doc-combine-sum1 -2 doc-combine-sum2

Clique aqui para saber mais sobre Combinar Linhas Avançadas.


seta azul bolha direita Combine as linhas correspondentes com base em valores duplicados em outra coluna com o Kutools para Excel

Às vezes, você deseja combinar as linhas com base em valores duplicados em outra coluna, o Combinar linhas avançadas of Kutools for Excel também pode fazer um favor para você, faça o seguinte:

1. Selecione o intervalo de dados que deseja usar e clique em Kutools > Unir e dividir > Combinar linhas avançadas para habilitar o Combinar linhas avançadas caixa de diálogo.

2. No Combinar linhas avançadas caixa de diálogo, clique no nome da coluna na qual deseja combinar outros dados e clique em Chave primária, veja a captura de tela:

doc-combine-sum7

3. Em seguida, clique em outro nome de coluna com a qual deseja combinar os dados e clique em Combinar para escolher um separador para separar seus valores combinados, consulte a captura de tela:

doc-combine-sum7

4. Então clique Ok, todos os valores com a mesma célula na coluna A foram combinados, consulte as capturas de tela:

doc-combine-sum1 -2 doc-combine-sum2

seta azul bolha direita Combine linhas duplicadas e some os valores com Kutools para Excel

Kutools for Excel: com mais de 300 suplementos úteis do Excel, grátis para testar sem limitação em 30 dias. Baixe e teste grátis agora!

Artigo relacionado:

Combine várias linhas em uma com base em valores duplicados


As melhores ferramentas de produtividade para escritório

O Kutools for Excel resolve a maioria dos seus problemas e aumenta sua produtividade em 80%

  • armadilha para peixes: Insira rapidamente fórmulas complexas, gráficos e qualquer coisa que você tenha usado antes; Criptografar células com senha; Criar lista de discussão e enviar emails ...
  • Super Formula Bar (edite facilmente várias linhas de texto e fórmula); Layout de leitura (ler e editar facilmente um grande número de células); Colar na faixa filtrada...
  • Mesclar células / linhas / colunas sem perder dados; Dividir o conteúdo das células; Combinar linhas / colunas duplicadas... Evite células duplicadas; Comparar intervalos...
  • Selecione Duplicado ou Único Linhas; Selecione linhas em branco (todas as células estão vazias); Super Find e Fuzzy Find em muitos livros; Seleção aleatória ...
  • Cópia exata Várias células sem alterar a referência da fórmula; Criação automática de referências para várias folhas; Inserir marcadores, Caixas de seleção e mais ...
  • Extrair Texto, Adicionar texto, remover por posição, Remover Espaço; Criar e imprimir subtotais de paginação; Converter entre conteúdo de células e comentários...
  • Super Filtro (salvar e aplicar esquemas de filtro a outras planilhas); Classificação Avançada por mês / semana / dia, frequência e mais; Filtro Especial por negrito, itálico ...
  • Combine pastas de trabalho e planilhas; Mesclar tabelas com base em colunas-chave; Divida os dados em várias folhas; Conversão em lote de xls, xlsx e PDF...
  • Mais de 300 recursos poderosos. Suporta Office / Excel 2007-2019 e 365. Suporta todos os idiomas. Fácil implantação em sua empresa ou organização. Teste gratuito de 30 dias com recursos completos. Garantia de devolução do dinheiro em 60 dias.
guia kte 201905

Guia do Office 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!
officetab bottom
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    Chandra · 8 months ago
    SN SAD No Unit Item No Description Qty CIF_Value ID_EXD AID CSF ARF ECS RCF RDF IFT IDP AIT VAT
    1 M200 UNT 1 Pen 194 500 50 0 0 0 0 0 0 0 0 0 65
    2 M200 UNT 2 Pencil 241 250 25 0 0 0 0 0 0 0 0 0 32.5
    3 M200 UNT 3 Cutter 204 400 40 0 0 0 0 0 0 0 0 0 52
    4 M200 UNT 4 Copy 171 600 60 0 0 0 0 0 0 0 0 0 78
    5 M300 KGM 1 Cup 220 250 25 0 500 0 0 0 0 0 0 0 32.5
    6 M300 KGM 2 Plate 40 350 35 155 0 0 0 0 0 0 0 0 45.5
    7 M300 UNT 3 Bottle 2 150 15 131 0 0 0 0 0 0 0 0 19.5
    8 M300 UNT 4 Glass 2 90 9 34 0 0 0 0 0 0 0 0 11.7
    9 M400 null 1 Shirt 20 800 80 0 0 0 0 0 0 0 0 0 104
    10 M400 KGM 2 Pant 5 5000 500 0 0 0 0 0 0 0 0 0 650
    11 M400 null 3 Shoe 12 7200 720 0 0 0 0 0 0 0 0 0 936
    12 M400 MTR 4 Sandle 40 1600 160 0 0 0 0 0 0 0 0 0 208
    13 M400 UNT 5 Belt 100 2000 200 0 0 0 0 0 0 0 0 0 260
    how to sum cif value and remove duplicate No. (SAD No.) Please help me.
  • To post as a guest, your comment is unpublished.
    Tuhin · 11 months ago
    I am sooooo happy & glad with your tips.
    Allah bless you.
  • To post as a guest, your comment is unpublished.
    blazeruz003@gmail.com · 2 years ago
    Sub MergeSameCells()
    Application.DisplayAlerts = False

    Dim rng As Range

    MergeCells:

    For Each rng In Selection
    If rng.Value = rng.Offset(1, 0).Value And rng.Value <> "" Then
    Range(rng, rng.Offset(1, 0)).Merge
    GoTo MergeCells
    End If
    Next

    End Sub
  • To post as a guest, your comment is unpublished.
    Alex Lesyk · 2 years ago
    An absolute mess of an explantation. Thanks for the effort but it did nothing to help.
  • To post as a guest, your comment is unpublished.
    andreaB · 2 years ago
    LOVE IT!!! YOUR SAVE MY LIFE!!
  • To post as a guest, your comment is unpublished.
    sarah · 2 years ago
    Ifsum=(columns include,start point row,sum column)
    Example ifsum=(A:D,B:2,D:D)
    WAY EASIER!
  • To post as a guest, your comment is unpublished.
    vchinna.mech205@gmail.com · 3 years ago
    Hi Am chinnaraju

    can u please assist for this. Any one?

    =VLOOKUP(M5,E:F,2,)


    Thanks in advance.
  • To post as a guest, your comment is unpublished.
    vchinna.mech205@gmail.com · 3 years ago
    Hi,
    Can you please explain or share the Formula for below
    A5 A6 A7
    i want answer for KTO as Transpose Rice Biryani Prawns

    Left coloumn Right Coloumn
    KTO Rice
    Office Tab Curd Rice
    KTO Biryani
    Ranjith Chiken
    KTO Prawns

    Thanks,
    Chinnaraju
    9849212552
  • To post as a guest, your comment is unpublished.
    Chinnaraju · 3 years ago
    Hi,
    A5 A6 A7
    i want answer for KTO as Transpose Rice Biryani Prawns

    Left coloumn Right Coloumn
    KTO Rice
    Office Tab Curd Rice
    KTO Biryani
    Ranjith Chiken
    KTO Prawns

    Thanks,
    Chinnaraju
    9849212552
  • To post as a guest, your comment is unpublished.
    Chris · 4 years ago
    what if I want to do a customer math equation with the duplicates instead of sum? For example I want my duplicates to calculate overall electrical resistance.
  • To post as a guest, your comment is unpublished.
    Joshua · 4 years ago
    You guys are awesome! You have saved me so much productivity. Cant thank you guys enough
  • To post as a guest, your comment is unpublished.
    Raghu · 4 years ago
    How to make VBA code to add totals for 12 columns
  • To post as a guest, your comment is unpublished.
    Mostafa · 4 years ago
    Really Thank you your explain realy helpful
  • To post as a guest, your comment is unpublished.
    Ahmed SAmir · 4 years ago
    as usual perfect Ideas and Projects , thank you all :-)
  • To post as a guest, your comment is unpublished.
    Neelesh Sonekar · 5 years ago
    Dear Sir

    What if i have 3 Cloumns ?

    Node1 Node2 Length
    R1 J1 30 J1=113
    J1 J2 29
    J1 J3 54
    J3 J4 47
    J3 J5 27
    J5 J6 19
    J5 J7 17
    J7 J8 10
    J7 J9 56
    J9 J10 96
    J9 J11 29
    J11 J12 34
    J12 J13 10
    J12 J14 49

    Can i use this for 3 columns.
  • To post as a guest, your comment is unpublished.
    Remo · 5 years ago
    This consolidate tool is so useful.
    Many thanks for sharing the info :)
  • To post as a guest, your comment is unpublished.
    Ben · 5 years ago
    Seems like a good spot for a pivot table.
  • To post as a guest, your comment is unpublished.
    Jon · 5 years ago
    How do you make that column where the sums are to update automatically when you change the original data?
  • To post as a guest, your comment is unpublished.
    Maria · 5 years ago
    Could do find hwo to to exactly the same thing but in Google Docs? I really need it!
  • To post as a guest, your comment is unpublished.
    Sha · 6 years ago
    Thank you so much for great tips. Fantastic.
  • To post as a guest, your comment is unpublished.
    Lars · 6 years ago
    The VBA macro works well, but how should I change it if I want to delete the entire row rather than just clearing contents? I have other columns I want to keep linked to that data.
  • To post as a guest, your comment is unpublished.
    stan · 6 years ago
    VBA code does not work. Combines first column but 2nd column data is all gone
  • To post as a guest, your comment is unpublished.
    stan · 6 years ago
    VBA code breaks when more rows added, not really sure why
  • To post as a guest, your comment is unpublished.
    ND · 7 years ago
    Worked fantastically! Thanx! :-)
  • To post as a guest, your comment is unpublished.
    B · 7 years ago
    Couldn't get this to work for more than one column of data - any tips?
  • To post as a guest, your comment is unpublished.
    Ed · 7 years ago
    Your first example is pretty good but it is missing one step. Prior to clicking OK the cursor needs to be in a blank area for the consolidation to export. If you have not selected a blank cell area after adding the range you will get a "source overlaps destination" error.