Съдържание
Можем лесно да намерим необходимите стойности за комбиниране на редове с еднакъв идентификатор в Excel. Днес ще се запознаем с извършването на този процес стъпка по стъпка в Excel.
Практическа работна тетрадка
Изтеглете следната работна тетрадка и упражнение.
Комбиниране на редове с еднакъв ID.xlsx3 прости метода за комбиниране на редове с еднакъв идентификатор в Excel
1. Комбиниране на редове с еднакъв идентификатор чрез VBA
Да предположим, че имам работен лист, съдържащ името и идентификационния номер на продавача и датите, на които му е платено. Сега трябва да ги обединя.
СТЪПКИ:
- Отидете в Таб Лист и щракнете с десния бутон на мишката.
- Изберете Вижте кода .
- Microsoft Visual Basic за приложения се появява прозорец.
♦ Забележка : Този прозорец можете да намерите и като натиснете бутона Alt+F11 ключове.
- Сега в прозорец на модула, поставете следното VBA кодове.
Sub Combine_Rows_with_IDs() Dim x1 As Range Dim x2 As Long Dim A As Long, B As Long, C As Long On Error Resume Next Set x1 = Application.InputBox("Select Range:", "Combine Rows with IDs", Selection.Address, , , , , 8) Set x1 = Range(Intersect(x1, ActiveSheet.UsedRange).Address) If x1 Is Nothing Then Exit Sub x2 = x1.Rows.Count For A = x2 To 2 Step -1 For B = 1 To A - 1 If x1(A, 1).Value = x1(B,1).Value And B A Then For C = 2 To x1.Columns.Count If x1(B, C).Value "" Then If x1(A, C).Value = "" Then x1(A, C) = x1(B, C).Value Else x1(A, C) = x1(A, C).Value & "," & x1(B, C).Value End If End If Next x1(B, 1).EntireRow.Delete A = A - 1 B = B - 1 End If Next Next ActiveSheet.UsedRange.Columns.AutoFit End Sub
- След това да стартирате този код VBA Кликнете върху на Изпълнявайте или натиснете клавиша F5 .
- Появява се диалогов прозорец, в който се избира обхватът от редове, които искаме да комбинираме.
- И накрая щракнете върху OK .
- И ще получим резултатните изходи, както е показано по-долу.
2. Използвайте инструмента Consolidate за сливане на редове в Excel
Консолидирайте Инструментът събира данни от различно място, за да обобщи, стойностите. Нека да помислим, че имаме работен лист, съдържащ името и заплатата на продавача. Ще използваме Консолидирайте инструмент за намиране на общия размер на заплатата чрез комбиниране на редовете.
СТЪПКИ:
- От Лентата с инструменти, изберете Данни > Консолидирайте .
- Появява се диалогов прозорец.
- Можем да изберем различни Функции.
- Сега изберете диапазона от данни, като запазите ключовата колона в най-лявата част.
- След това натиснете Добавяне на за да добавите препратките.
- Отбележете на Горен ред & Лява колона и натиснете OK .
- Накрая можете да видите обобщението на данните.
Прочетете повече: Как да слеете редове в Excel
3. Вмъкване на функцията IF за комбиниране на редове в Excel
Сайтът логическа функция IF оценява дадените условия и дава една стойност за true и друга за false. Можем да го използваме за комбиниране на редове, съдържащи текстови стойности. Тук имаме набор от данни ( B4:C10 ) трябваше да комбинират книгите от различни редове според автора.
СТЪПКИ:
- След като изберете таблицата, щракнете върху Данни > Сортиране .
- Сортиране таблицата от основната колона.
- Сега таблицата изглежда така, както е показано по-долу.
- След това ни трябват помощни колони, съдържащи формулата. Една формула обединява името на книгата.
- В Клетка D5 напишете формулата:
=IF(B5=B4,D4&", "&C5,C5)
- Хит Въведете и плъзнете курсора.
- Ето още една колона, в която използваме друга формула, която ще търси пълния списък с имената на книгите.
- В Клетка E5 , напишете формулата:
=IF(B6B5,"Merged","")
- Хит Въведете и го плъзнете надолу, ще видите резултата по-долу.
- В този момент копирайте резултатите и ги поставете в Клетка D5 като стойности.
- Отново Сортиране стойностите по последната помагаща колона в низходящ ред.
- По този начин можем да изведем всички обединени стойности на върха.
- Накрая можем да изтрием колоната, която не е необходима.
Заключение
Това е най-бързият начин за комбиниране на редове с един и същ ID в Excel . Има добавена работна тетрадка за упражнения. Опитайте я. Не се колебайте да попитате нещо или да предложите нови методи.