如何根據Excel中的條件輕松串聯文本？
假設我有一列ID號，其中包含一些重復項和一列名稱，現在，我想根據唯一ID號將名稱連接起來，如左圖所示，以便根據條件快速合并文本，我們如何在Excel中做？
根據條件使用用戶定義的功能連接文本
根據條件連接文本 Kutools for Excel
根據條件使用用戶定義的功能連接文本要將文本與唯一ID號組合在一起，可以先提取唯一值，然后創建用戶定義函數以根據唯一ID組合名稱。
1。 以以下數據為例，您需要首先提取唯一的ID號，請應用此數組公式： =IFERROR(INDEX($A:$A, MATCH(0,COUNTIF($D:D1, $A:$A), 0)),"")，將此公式輸入一個空白單元格（例如D2），然后按 Ctrl + Shift + Enter 鍵在一起，請參見屏幕截圖：
Tips:：在以上公式中， A2：A15 是您要從中提取唯一值的列表數據范圍， D1 是要提取結果的列的第一個單元格。
2。 然后向下拖動填充手柄以提取所有唯一值，直到顯示空白為止，請參見屏幕截圖：
3。 在此步驟中，您應該創建一個 用戶定義功能 要根據唯一ID號組合名稱，請按住 ALT + F11 鍵，然后打開 Microsoft Visual Basic應用程序 窗口。
4。 點擊 插頁 > 模塊，然后將以下代碼粘貼到 模塊 窗口。
VBA代碼：根據條件連接文本
Function ConcatenateIf(CriteriaRange As Range, Condition As Variant, ConcatenateRange As Range, Optional Separator As String = ",") As VariantUpdateby ExtendofficeDim xResult As StringOn Error Resume NextIf CriteriaRange.Count <> ConcatenateRange.Count ThenConcatenateIf = CVErr(xlErrRef)Exit FunctionEnd IfFor i = 1 To CriteriaRange.CountIf CriteriaRange.Cells(i).Value = Condition ThenxResult = xResult & Separator & ConcatenateRange.Cells(i).ValueEnd IfNext iIf xResult <> "" ThenxResult = VBA.Mid(xResult, VBA.Len(Separator) + 1)End IfConcatenateIf = xResultExit FunctionEnd FunctionCopy5. 然后保存并關閉此代碼，返回到工作表，并在單元格E2中輸入此公式， = CONCATENATEIF（$ A $ 2：$ A $ 15，D2，$ B $ 2：$ B $ 15，“，”） ，請參見屏幕截圖：
6。 然后將填充手柄向下拖動到要應用此公式的單元格上，并且所有相應的名稱都已根據ID編號組合在一起，請參見屏幕截圖：
提示：
1.在上式中 A2：A15 是您要基于合并的原始數據， D2 是您提取的唯一值，并且 B2：B15 是您要組合在一起的名稱列。
2.如您所見，我組合了用逗號分隔的值，可以根據需要更改公式的逗號“，”來使用其他任何字符。
根據條件連接文本 Kutools for Excel如果你有 Kutools for Excel，其 高級組合行 實用程序，您可以根據標準快速方便地連接文本。
Kutools for Excel : 帶有300多個便捷的Excel加載項，可以在內.前往下載購買貝寶/ MyCommerce安裝后 Kutools for Excel，請執行以下步驟：
1。 根據一列選擇要合并的數據范圍。
2。 點擊 Kutools > 合并與拆分 > 高級組合行，請參見屏幕截圖：
3。 在 根據列合并行 對話框中，單擊“ ID”列，然后單擊 首要的關鍵 將此列作為合并數據所基于的關鍵列，請參見屏幕截圖：
4。 然后點擊 Name 要合并值的列，然后單擊 結合 選項，然后為合并的數據選擇一個分隔符，請參見屏幕截圖：
5。 完成這些設置后，單擊 OK 退出對話框，并且B列中的數據已基于鍵A列合并在一起。請參見屏幕截圖：
使用此功能，將盡快解決以下問題：
如何將多行合并為一個并在Excel中匯總重復項？
下載并 Kutools for Excel 現在 ！
演示：將基于另一列中相同單元格的文本與 Kutools for ExcelKutools for Excel：具有300多個方便的Excel加載項，可以在內，沒有任何限制。 立即下載并！最佳辦公生產力工具
將小時轉化為分鐘 Kutools for Excel!準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！
為什么需要 Kutools for Excel
