此方法將引入VBA，以快速組合指定選擇中具有相同ID或名稱的所有行。 請執行以下操作：

1。 按 其他 + F11 鍵以打開“ Microsoft Visual Basic應用程序”窗口。

2。 點擊 插入 > 模塊，然後將VBA代碼粘貼到“模塊”窗口中。

VBA：在Excel中合併具有相同ID /名稱的行

Sub Consolidate_Rows()
Dim xRg As Range
Dim xRows As Long
Dim I As Long, J As Long, K As Long
On Error Resume Next
Set xRg = Application.InputBox("Select Range:", "Kutools For Excel", Selection.Address, , , , , 8)
Set xRg = Range(Intersect(xRg, ActiveSheet.UsedRange).Address)
If xRg Is Nothing Then Exit Sub
xRows = xRg.Rows.Count
For I = xRows To 2 Step -1
For J = 1 To I - 1
If xRg(I, 1).Value = xRg(J, 1).Value And J <> I Then
For K = 2 To xRg.Columns.Count
If xRg(J, K).Value <> "" Then
If xRg(I, K).Value = "" Then
xRg(I, K) = xRg(J, K).Value
Else
xRg(I, K) = xRg(I, K).Value & "," & xRg(J, K).Value
End If
End If
Next
xRg(J, 1).EntireRow.Delete
I = I - 1
J = J - 1
End If
Next
Next
ActiveSheet.UsedRange.Columns.AutoFit
End Sub

3。 按 F5 鍵或單擊 跑 按鈕以運行此VBA。

4。 在彈出的Kutools for Excel對話框中，請選擇要合併的行，然後單擊 OK 按鈕。 看截圖：

現在，您將看到指定範圍內的行由相同的ID加上逗號。 看截圖：

備註：此VBA只能按第一列中的值組合行。 例如，要合併具有相同名稱的行，必須將名稱列移動到指定範圍的第一列。

輕鬆合併行並根據Excel中另一列中的值進行計算

Kutools for Excel的 高級合併行 實用程序可以幫助您基於anohter列中的值組合行，並同時求和，計數，平均值等！

如果您已安裝Kutools for Excel，則可以應用它 高級合併行 功能可以快速組合指定範圍內具有相同ID或名稱的行。

1。 選擇要合併的行，然後單擊 庫工具 > 內容 > 高級合併行。 看截圖：

2。 在“高級合併行”對話框中，選擇要合併的ID或名稱列，然後單擊 首要的關鍵，然後根據需要為其他列指定組合規則。

就我而言， （1） 我選擇 訂單號 列，然後單擊 首要的關鍵; （2） 選擇 日期 列，然後單擊 計算 > 計數; （3） 選擇 推銷員 列，然後單擊 結合 > 逗號; （4） 選擇 金額 列，然後單擊 計算 > 總和。 看截圖：

3。 點擊 OK 按鈕。
現在，您將看到根據訂單ID組合選定的行。 看截圖：

如何在Excel中串聯保持數字/日期格式？

如何在Excel中連接另一個工作表/不同工作表中的單元格？