Як поєднати повторювані рядки та підсумувати значення в Excel?

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

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

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

Поєднайте повторювані рядки та підсумуйте значення за допомогою Kutools для Excel

Поєднайте відповідні рядки на основі повторюваних значень в іншому стовпці з Kutools для Excel

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

Консолідація - це корисний інструмент для консолідації кількох аркушів або рядків у Excel, тому за допомогою цієї функції ми також можемо підсумувати кілька рядків на основі дублікатів. Будь ласка, виконайте такі дії:

1. Клацніть клітинку, де потрібно знайти результат на поточному аркуші.

2. Перейдіть до клацання дані > Консолідувати, див. скріншот:

3, в Консолідувати діалогове вікно:

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

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

примітки: Якщо в діапазоні немає рядка заголовка, вам потрібно зняти прапорець Верхній ряд від Використовуйте ярлики в варіант.

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

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

1. Утримуйте клавішу ALT + F11 клавіші, потім відкриється Microsoft Visual Basic для додатків вікна.

2. Клацання Insert > Модуліта вставте наступний код у Вікно модуля.

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

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. Потім натисніть F5 для запуску цього коду, і вам потрібно вибрати діапазон, який потрібно консолідувати, у спливаючому вікні запиту. Дивіться знімок екрана:

4. А потім клацніть OK, повторювані рядки були об’єднані і значення складені.

примітки: Якщо ви хочете використовувати цей код, краще скопіюйте файл, щоб уникнути знищення даних, і цей код застосовується лише до двох стовпців.

Поєднайте повторювані рядки та підсумуйте значення за допомогою Kutools для Excel

Тут я представляю зручний інструмент - Kutools для Excel для вас, його Розширені комбіновані ряди також може швидко зробити послугу для вирішення цієї проблеми.

після установки Kutools для Excel, будь ласка, виконайте наступне:

1. Виберіть потрібний діапазон і натисніть Кутулс > Злиття та розділення > Розширені комбіновані ряди. Дивіться знімок екрана:

2, в Розширені комбіновані ряди діалогове вікно, перевірте Мої дані мають заголовки якщо у вашому діапазоні є заголовки, виберіть ім'я стовпця, яке потрібно об'єднати, і натисніть Первинний ключ, див. скріншот:

3. А потім виберіть ім'я стовпця, для якого потрібно підсумувати значення, і натисніть Обчислювати > Сума або інші розрахунки, як вам потрібно. Дивіться знімок екрана:

4. Клацання Ok щоб закрити діалогове вікно, ви можете побачити, що дублікати об’єднані, а відповідні дані в іншому стовпці складені. Дивіться скріншоти:

Клацніть тут, щоб дізнатись більше про розширені рядки комбайнів.

Поєднайте відповідні рядки на основі повторюваних значень в іншому стовпці з Kutools для Excel

Іноді потрібно поєднати рядки на основі повторюваних значень в іншому стовпці - Розширені комбіновані ряди of Kutools для Excel також може зробити для вас послугу, будь ласка, зробіть наступне:

1. Виберіть діапазон даних, який потрібно використовувати, а потім клацніть Кутулс > Злиття та розділення > Розширені комбіновані ряди щоб включити Розширені комбіновані ряди діалогове вікно.

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

3. А потім клацніть інше ім’я стовпця, яке потрібно об’єднати, і натисніть Поєднувати щоб вибрати роздільник для розділення об’єднаних значень, див. знімок екрана:

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

Поєднайте повторювані рядки та підсумуйте значення за допомогою Kutools для Excel

Пов'язана стаття:

Об’єднайте кілька рядків в один на основі повторюваних значень

---

Найкращі інструменти для підвищення продуктивності офісу

Kutools для Excel вирішує більшість ваших проблем і збільшує продуктивність на 80%

• Повторне використання: Швидко вставте складні формули, діаграми і все, що ви використовували раніше; Шифрувати комірки з паролем; Створити список розсилки та надсилати електронні листи ...
• Супер формула бар (легко редагувати кілька рядків тексту та формули); Макет читання (легко читати та редагувати велику кількість комірок); Вставте у відфільтрований діапазон...
• Об’єднати клітинки / рядки / стовпці без втрати даних; Вміст розділених комірок; Об'єднати повторювані рядки / стовпці... Запобігання дублюючим клітинам; Порівняйте діапазони...
• Виберіть Повторюваний або Унікальний Рядки; Виберіть Пусті рядки (усі клітинки порожні); Супер знахідка та нечітка знахідка у багатьох робочих зошитах; Випадковий вибір ...
• Точна копія Кілька клітинок без зміни посилання на формулу; Автоматичне створення посилань на кілька аркушів; Вставте кулі, Прапорці та інше ...
• Витяг тексту, Додати текст, Видалити за позицією, Видаліть пробіл; Створення та друк проміжних підсумків підкачки; Перетворення вмісту комірок та коментарів...
• Супер фільтр (зберегти та застосувати схеми фільтрів до інших аркушів); Розширене сортування за місяцем / тижнем / днем, частотою та іншим; Спеціальний фільтр жирним, курсивом ...
• Поєднайте робочі зошити та робочі аркуші; Об’єднати таблиці на основі ключових стовпців; Розділіть дані на кілька аркушів; Пакетне перетворення xls, xlsx та PDF...
• Понад 300 потужних функцій. Підтримує Office / Excel 2007-2021 і 365. Підтримує всі мови. Легке розгортання на вашому підприємстві чи в організації. 30-денна безкоштовна пробна версія повних функцій. 60-денна гарантія повернення грошей.

Детальніше ... Завантажити безкоштовно... Придбати ... 

---

Вкладка Office забезпечує інтерфейс з вкладками для Office і значно спрощує вашу роботу

• Увімкніть редагування та читання на вкладках у Word, Excel, PowerPoint, Publisher, Access, Visio та Project.
• Відкривайте та створюйте кілька документів на нових вкладках того самого вікна, а не в нових вікнах.
• Збільшує вашу продуктивність на 50% та зменшує сотні клацань миші для вас щодня!

Детальніше ... Завантажити безкоштовно... Придбати ...