У Excel це типовий сценарій, коли набір даних містить повторювані записи. Часто ви можете зіткнутися з діапазоном даних, де ключове завдання полягає в тому, щоб ефективно поєднати ці повторювані рядки з одночасним підсумовуванням значень у відповідному стовпці, як показано на наступному знімку екрана. У цьому контексті ми розглянемо кілька практичних методів, які можуть допомогти вам консолідувати повторювані дані та агрегувати пов’язані з ними значення, підвищуючи чіткість і корисність ваших робочих книг Excel.

Об'єднайте повторювані рядки та підсумуйте значення

• З функцією Consolide
• З потужною функцією – Kutools
• Зі зведеною таблицею
• З кодом VBA

Об’єднайте повторювані рядки та підсумуйте значення за допомогою функції Consolidate

Консолідація — це корисний інструмент для об’єднання кількох робочих аркушів або рядків у Excel. За допомогою цієї функції ми можемо об’єднати повторювані рядки та швидко й легко підсумувати їхні відповідні значення. Виконайте наведені нижче дії.

Крок 1: виберіть клітинку призначення

Виберіть місце для відображення консолідованих даних.

Крок 2: Доступ до функції консолідації та налаштування консолідації

1. Натисніть дані > Консолідувати, див. скріншот:
   
2. У Консолідувати діалогове вікно:
   • (1.) Виберіть Сума від функція випадаючий список;
   • (2.) Клацніть, щоб вибрати діапазон, який потрібно консолідувати в Посилання коробка;
   • (3.) Перевірте Верхній ряд та Ліва колонка від Використовуйте ярлики в варіант;
   • (4.) Нарешті натисніть OK кнопки.
   • 

Результат:

Excel об’єднає будь-які дублікати, знайдені в першому стовпці, і підсумує їхні відповідні значення в сусідніх стовпцях, як показано на знімку екрана:

Об’єднайте повторювані рядки та підсумуйте значення за допомогою потужної функції – Kutools

Якщо ви встановили Kutools для Excel, його Розширені комбіновані ряди Функція дозволяє легко об’єднувати повторювані рядки, надаючи можливості підсумовувати, підраховувати, усереднювати або виконувати інші обчислення ваших даних. Крім того, ця функція не обмежується лише одним ключовим стовпцем, вона може працювати з кількома ключовими стовпцями, що значно полегшує складні завдання консолідації даних.

після установки Kutools для Excel, виберіть діапазон даних і натисніть Кутулс > Злиття та розділення > Розширені комбіновані ряди.

У Розширені комбіновані ряди у діалоговому вікні встановіть такі операції:

1. Клацніть ім’я стовпця, на основі якого потрібно об’єднати дублікати, тут я клацну «Продукт», а потім виберіть Первинний ключ зі спадного списку в операція стовпчик;
2. Потім виберіть назву стовпця, значення якого потрібно підсумувати, а потім виберіть Сума зі спадного списку в операція стовпчик;
3. Що стосується інших стовпців, ви можете вибрати потрібну операцію, наприклад, поєднати значення з певним роздільником або виконати певне обчислення; (цей крок можна проігнорувати, якщо у вас лише два стовпці)
4. Нарешті, ви можете переглянути комбінований результат, а потім клацнути OK кнопки.
5. 

Результат:

Тепер повторювані значення в стовпці ключа об’єднуються, а інші відповідні значення підсумовуються, як показано на знімку екрана:

Об’єднайте повторювані рядки та підсумуйте значення за допомогою зведеної таблиці

Зведена таблиця в Excel забезпечує динамічний спосіб перевпорядкування, групування та узагальнення даних. Ця функція стає неймовірно корисною, коли ви стикаєтеся з набором даних, заповненим повторюваними записами, і вам потрібно підсумувати відповідні значення.

Крок 1: Створення зведеної таблиці

1. Виберіть діапазон даних. А потім перейдіть до Insert та натисніть Зведена таблиця, див. скріншот:
   
2. У спливаючому діалоговому вікні виберіть місце для розміщення звіту зведеної таблиці, ви можете розмістити його на новому аркуші або на наявному аркуші, як вам потрібно. Потім натисніть OK. Дивіться знімок екрана:
   
3. Тепер зведену таблицю вставлено у вибрану комірку призначення. Перегляньте скріншот:
   

Крок 2. Налаштування зведеної таблиці:

1. У Поля зведеної таблиці перетягніть поле, що містить дублікати, до Рядок область. Це згрупує ваші дублікати.
2. Далі перетягніть поля зі значеннями, які потрібно підсумувати, до Цінності область. За замовчуванням Excel підсумовує значення. Дивіться демонстрацію нижче:
3. 

Результат:

Зведена таблиця тепер відображає ваші дані з об’єднаними дублікатами та підсумованими значеннями, пропонуючи чітке та стисле уявлення для аналізу. Перегляньте скріншот:

Об'єднайте повторювані рядки та підсумуйте значення за допомогою коду VBA

Якщо вас цікавить код VBA, у цьому розділі ми надамо код VBA для консолідації повторюваних рядків і підсумовування відповідних значень в інших стовпцях. Виконайте наведені нижче дії.

Крок 1. Відкрийте редактор аркушів VBA і скопіюйте код

1. Утримуйте клавішу ALT + F11 клавіші в Excel, щоб відкрити Microsoft Visual Basic для додатків вікна.
2. Натисніть Insert > Модуліта вставте наступний код у Модулі Вікно
   Код VBA: Об’єднайте повторювані рядки та підсумуйте значення

   Sub CombineDuplicateRowsAndSumForMultipleColumns()
   'Update by Extendoffice
       Dim SourceRange As Range, OutputRange As Range
       Dim Dict As Object
       Dim DataArray As Variant
       Dim i As Long, j As Long
       Dim Key As Variant
       Dim ColCount As Long
       Dim SumArray() As Variant
       Dim xArr As Variant
       Set SourceRange = Application.InputBox("Select the original range:", "Kutools for Excel", Type:=8)
       If SourceRange Is Nothing Then Exit Sub
       ColCount = SourceRange.Columns.Count
       Set OutputRange = Application.InputBox("Select a cell for output:", "Kutools for Excel", Type:=8)
       If OutputRange Is Nothing Then Exit Sub
       Set Dict = CreateObject("Scripting.Dictionary")
       DataArray = SourceRange.Value
       For i = 1 To UBound(DataArray, 1)
           Key = DataArray(i, 1)
           If Not Dict.Exists(Key) Then
               ReDim SumArray(1 To ColCount - 1)
               For j = 2 To ColCount
                   SumArray(j - 1) = DataArray(i, j)
               Next j
               Dict.Add Key, SumArray
           Else
               xArr = Dict(Key)
               For j = 2 To ColCount
                   xArr(j - 1) = xArr(j - 1) + DataArray(i, j)
               Next j
               Dict(Key) = xArr
           End If
       Next i
       OutputRange.Resize(Dict.Count, ColCount).ClearContents
       i = 1
       For Each Key In Dict.Keys
           OutputRange.Cells(i, 1).Value = Key
           For j = 1 To ColCount - 1
               OutputRange.Cells(i, j + 1).Value = Dict(Key)(j)
           Next j
           i = i + 1
       Next Key
       Set Dict = Nothing
       Set SourceRange = Nothing
       Set OutputRange = Nothing
   End Sub
   

Крок 2: Виконайте код

1. Після вставки цього коду, натисніть F5 ключ для запуску цього коду. У вікні підказки виберіть діапазон даних, який потрібно об’єднати та підсумувати. А потім натисніть OK.
   
2. У наступному вікні підказки виберіть комірку, у яку ви виведете результат, і натисніть OK.
   

Результат:

Тепер повторювані рядки об’єднано, а їхні відповідні значення підсумовано. Перегляньте скріншот:

Об’єднання та підсумовування повторюваних рядків у Excel може бути простим і ефективним. Виберіть одну з простих функцій Consolidate, вдосконалених Kutools, аналітичних зведених таблиць або гнучкого кодування VBA, щоб знайти рішення, яке відповідає вашим навичкам і потребам. Якщо вам цікаво ознайомитися з іншими порадами та підказками щодо Excel, будь ласка, наш веб-сайт пропонує тисячі посібників натисніть тут, щоб отримати до них доступ. Дякуємо, що прочитали, і ми з нетерпінням чекаємо надати вам більше корисної інформації в майбутньому!

Статті по темі: