如果Excel的另一列中存在相同的值,如何串聯單元格?
如下面的屏幕截圖所示,如果要根據第一列中的相同值連接第二列中的單元格,可以使用多種方法。 在本文中,我們將介紹三種方法來完成此任務。
如果單元格與公式和過濾器的值相同,則串聯它們如果值相同,只需單擊幾下即可輕松連接單元格 Kutools如果使用VBA代碼將值相同,則串聯單元格如果單元格與公式和過濾器的值相同,則串聯它們以下公式有助于根據另一列中的相同值連接一列中相應單元格的內容。
1.選擇第二列以外的空白單元格(此處選擇單元格C2),輸入公式 = IF(A2 <> A1,B2,C1&“,”&B2) 進入欄,然后按 輸入 鍵。
2.然后選擇單元格C2,并將“填充手柄”向下拖動到需要連接的單元格上。
3.輸入公式 = IF(A2 <> A3,CONCATENATE(A2,“,”“”,C2,“”“”),“”) 進入單元格D2,然后將“填充手柄”向下拖動到其余單元格。
4.選擇單元格D1,然后單擊 Data > 篩選器。 看截圖:
5.單擊單元格D1中的下拉箭頭,取消選中 (空白) 框,然后單擊 OK 按鈕。
如果第一列的值相同,則可以看到單元格是串聯的。
備注:要成功使用上述公式,A列中的相同值必須是連續的。
如果具有相同的值,則輕松連接單元格 Kutools for Excel (幾次點擊)上述方法需要創建兩個輔助列并且涉及多個步驟,這可能是不方便的。 如果您正在尋找更簡單的方法,請考慮使用 高級組合行 來自的工具 Kutools for Excel. 只需單擊幾下,此實用程序就可以讓您使用特定的分隔符連接單元格,從而使該過程快速而輕松。
Tips:: 在應用此工具之前,請先安裝 Kutools for Excel 首先。 立即前往.
1。 點擊 Kutools > 合并與拆分> 高級組合行 啟用此功能。2.在 高級組合行 對話框,你只需要:選擇要連接的范圍;將列設置為與 首要的關鍵 列。指定分隔符以合并單元格。點擊OK.結果
備注:要應用此功能,請 下載并安裝 Kutools for Excel 第一。要了解有關此功能的更多信息,請查看這篇文章: 在 Excel 中快速組合相同的值或重復的行如果使用VBA代碼將值相同,則串聯單元格如果另一列中存在相同的值,您還可以使用 VBA 代碼連接一列中的單元格。
1。 按 其他 + F11 鍵打開 Microsoft Visual Basic應用程序 窗口。
2.在 Microsoft Visual Basic應用程序 窗口中,單擊 插頁 > 模塊。 然后將以下代碼復制并粘貼到 模塊 窗口。
VBA代碼:如果值相同,則串聯單元格
Sub ConcatenateCellsIfSamevalues()Dim xCol As New CollectionDim xSrc As VariantDim xRes() As VariantDim I As LongDim J As LongDim xRg As RangexSrc = Range("A1", Cells(Rows.Count, "A").End(xlUp)).Resize(, 2)Set xRg = Range("D1")On Error Resume NextFor I = 2 To UBound(xSrc)xCol.Add xSrc(I, 1), TypeName(xSrc(I, 1)) & CStr(xSrc(I, 1))Next IOn Error GoTo 0ReDim xRes(1 To xCol.Count + 1, 1 To 2)xRes(1, 1) = "No"xRes(1, 2) = "Combined Color"For I = 1 To xCol.CountxRes(I + 1, 1) = xCol(I)For J = 2 To UBound(xSrc)If xSrc(J, 1) = xRes(I + 1, 1) ThenxRes(I + 1, 2) = xRes(I + 1, 2) & ", " & xSrc(J, 2)End IfNext JxRes(I + 1, 2) = Mid(xRes(I + 1, 2), 2)Next ISet xRg = xRg.Resize(UBound(xRes, 1), UBound(xRes, 2))xRg.NumberFormat = "@"xRg = xResxRg.EntireColumn.AutoFitEnd SubCopy:
1. D1 在線路 設置xRg = Range(“ D1”) 表示結果將從單元格 D1 開始放置。2。 “沒有“而 “組合顏色” 在線路 xRes(1,1)=“否”,xRes(1,2)=“組合顏色” 是所選列的標題。3。 按 F5 鍵運行代碼,那么您將獲得指定范圍內的串聯結果。
如果具有相同的值,則輕松連接單元格 Kutools for Excel最佳辦公生產力工具
將小時轉化為分鐘 Kutools for Excel!準備好增強您的 Excel 任務了嗎? 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel!
為什么需要 Kutools for Excel