Як об’єднати кожен другий рядок / комірку в Excel?
Якщо у вас є список даних, і ви хочете об’єднати кожен другий рядок або комірку з них, як показано нижче, чи знаєте ви, як це зробити? В Excel ви можете використовувати формулу або VBA для об'єднання всіх інших рядків або комірок.
Об’єднайте кожен другий рядок / комірку з формулою в Excel
Об’єднайте кожен другий рядок / комірку з VBA
Об’єднайте кожен другий рядок / комірку з формулою в Excel
Виділіть порожню комірку та введіть =OFFSET(A$1,(ROW()-1)*2,0)&" "&OFFSET(A$1,((ROW()-1)*2)+1,0) ($ 1 вказує на перші дані у вашому списку, ви можете змінити їх, як вам потрібно), і натисніть клавішу Enter. Потім перетягніть маркер заповнення, щоб заповнити діапазон, необхідний для застосування цієї формули. Дивіться знімок екрана:
Об’єднайте кожен другий рядок / комірку з VBA
Якщо ви звикли використовувати VBA, ви також можете запустити нижченаведений VBA, щоб об’єднати всі інші рядки.
1 Тримайся ALT і натисніть F11 на клавіатурі, щоб відкрити a Microsoft Visual Basic для програми вікна.
2. клацання Insert > Модуліта скопіюйте VBA в модуль.
VBA: Об’єднати кожен другий рядок / комірку
Sub CombineCells()
'Updateby20140314
Dim rng As Range
Dim InputRng As Range, OutRng As Range
xTitleId = "KutoolsforExcel"
Set InputRng = Application.Selection
Set InputRng = Application.InputBox("Range :", xTitleId, InputRng.Address, Type:=8)
Set OutRng = Application.InputBox("Out put to (single cell):", xTitleId, Type:=8)
For i = 1 To InputRng.Rows.Count Step 2
For j = 1 To InputRng.Columns.Count
OutRng.Value = InputRng.Cells(i, j).Value & InputRng.Cells(i + 1, j).Value
Set OutRng = OutRng.Offset(0, 1)
Next
Set OutRng = OutRng.Offset(1, (InputRng.Columns.Count * -1))
Next
End Sub
3. клацання прогін для запуску коду VBA, а Kutools для Excel спливає діалогове вікно для вибору діапазону комірок, які потрібно об’єднати з кожним другим рядком. Дивіться знімок екрана:
4. клацання OK, відобразиться інше діалогове вікно для вибору однієї комірки для виведення об’єднаного результату. Дивіться знімок екрана:
5. клацання OK, і ви можете побачити результат:
