Jak zřetězit buňky, pokud stejná hodnota existuje v jiném sloupci v aplikaci Excel?
Jak je znázorněno na obrázku níže, pokud chcete zřetězit buňky ve druhém sloupci na základě stejných hodnot v prvním sloupci, můžete použít několik metod. V tomto článku představíme tři způsoby, jak tento úkol splnit.
Zřetězte buňky, pokud mají stejnou hodnotu, pomocí vzorců a filtru
Následující vzorce pomáhají zřetězit obsah odpovídajících buněk ve sloupci na základě stejné hodnoty v jiném sloupci.
1. Vyberte prázdnou buňku vedle druhého sloupce (zde vybereme buňku C2), zadejte vzorec = IF (A2 <> A1, B2, C1 & "," & B2) do řádku vzorců a poté stiskněte vstoupit klíč.
2. Poté vyberte buňku C2 a přetáhněte rukojeť výplně dolů do buněk, které potřebujete zřetězit.
3. Zadejte vzorec = IF (A2 <> A3, CONCATENATE (A2, "," "", C2, "" ""), "") do buňky D2 a přetáhněte rukojeť výplně dolů do ostatních buněk.
4. Vyberte buňku D1 a klepněte na Data > Filtr. Viz snímek obrazovky:
5. Klikněte na šipku rozevíracího seznamu v buňce D1, zrušte zaškrtnutí políčka (Prázdné) a poté klikněte na OK .
Můžete vidět, že buňky jsou zřetězeny, pokud jsou hodnoty prvního sloupce stejné.
Poznámka: Chcete-li úspěšně použít výše uvedené vzorce, musí být stejné hodnoty ve sloupci A spojité.
Snadné zřetězení buněk, pokud je stejná hodnota s programem Kutools pro Excel (několik kliknutí)
Výše popsaná metoda vyžaduje vytvoření dvou pomocných sloupců a zahrnuje více kroků, což může být nepohodlné. Pokud hledáte jednodušší způsob, zvažte použití Pokročilé kombinování řádků nástroj od Kutools pro Excel. Pomocí několika kliknutí vám tento nástroj umožňuje zřetězit buňky pomocí specifického oddělovače, takže proces je rychlý a bezproblémový.
Tip: Před použitím tohoto nástroje nainstalujte Kutools pro Excel za prvé. Přejděte ke stažení zdarma.
- Vyberte rozsah, který chcete zřetězit;
- Nastavte sloupec se stejnými hodnotami jako Primární klíč sloupec.
- Zadejte oddělovač pro spojení buněk.
- klikněte OK.
Výsledek
- Chcete-li použít tuto funkci, prosím stáhnout a nainstalovat Kutools pro Excel jako první.
- Chcete-li se o této funkci dozvědět více, podívejte se na tento článek: Rychle zkombinujte stejné hodnoty nebo duplicitní řádky v Excelu
Zřetězte buňky, pokud mají stejnou hodnotu, s kódem VBA
Pokud stejná hodnota existuje v jiném sloupci, můžete také použít kód VBA ke zřetězení buněk ve sloupci.
1. lis Další + F11 klávesy pro otevření Aplikace Microsoft Visual Basic okno.
2. V Aplikace Microsoft Visual Basic okno, klepněte na tlačítko Vložit > Modul. Poté zkopírujte a vložte níže uvedený kód do Modul okno.
Kód VBA: zřetězení buněk, pokud mají stejné hodnoty
Sub ConcatenateCellsIfSameValues()
Dim xCol As New Collection
Dim xSrc As Variant
Dim xRes() As Variant
Dim I As Long
Dim J As Long
Dim xRg As Range
xSrc = Range("A1", Cells(Rows.Count, "A").End(xlUp)).Resize(, 2)
Set xRg = Range("D1")
On Error Resume Next
For I = 2 To UBound(xSrc)
xCol.Add xSrc(I, 1), TypeName(xSrc(I, 1)) & CStr(xSrc(I, 1))
Next I
On Error GoTo 0
ReDim xRes(1 To xCol.Count + 1, 1 To 2)
xRes(1, 1) = "No"
xRes(1, 2) = "Combined Color"
For I = 1 To xCol.Count
xRes(I + 1, 1) = xCol(I)
For J = 2 To UBound(xSrc)
If xSrc(J, 1) = xRes(I + 1, 1) Then
xRes(I + 1, 2) = xRes(I + 1, 2) & ", " & xSrc(J, 2)
End If
Next J
xRes(I + 1, 2) = Mid(xRes(I + 1, 2), 2)
Next I
Set xRg = xRg.Resize(UBound(xRes, 1), UBound(xRes, 2))
xRg.NumberFormat = "@"
xRg = xRes
xRg.EntireColumn.AutoFit
End Sub
Poznámky:
3. zmáčkni F5 klíč ke spuštění kódu, pak získáte zřetězené výsledky v zadaném rozsahu.
S programem Kutools pro Excel můžete snadno zřetězit buňky, pokud mají stejnou hodnotu
Nejlepší nástroje pro produktivitu v kanceláři
Rozšiřte své dovednosti Excel pomocí Kutools pro Excel a zažijte efektivitu jako nikdy předtím. Kutools for Excel nabízí více než 300 pokročilých funkcí pro zvýšení produktivity a úsporu času. Kliknutím sem získáte funkci, kterou nejvíce potřebujete...
Office Tab přináší do Office rozhraní s kartami a usnadňuje vám práci
- Povolte úpravy a čtení na kartách ve Wordu, Excelu, PowerPointu, Publisher, Access, Visio a Project.
- Otevřete a vytvořte více dokumentů na nových kartách ve stejném okně, nikoli v nových oknech.
- Zvyšuje vaši produktivitu o 50%a snižuje stovky kliknutí myší každý den!