Come unire i testi in una colonna senza duplicati in Excel?
Sai come unire i testi da una colonna a una cella senza duplicati in Excel? E se unire i testi in una colonna senza duplicati in base a un valore di cella specifico? Questo articolo fornisce metodi per risolvere i problemi.
Unisci i testi in una colonna senza duplicati con la formula
Unisci i testi in una colonna senza duplicati in base a un altro valore di cella con codice VBA
Unisci facilmente i testi in una colonna in base al valore di un'altra cella con uno strumento straordinario
Altro tutorial per combinare celle ...
Unisci i testi in una colonna senza duplicati con la formula
Come mostrato nell'immagine sottostante, vuoi unire i testi nella colonna A in una singola cella senza duplicati. Si prega di fare quanto segue.
1. Seleziona una cella vuota, copia la formula sottostante e premi il tasto altro + Shift + entrare chiavi allo stesso tempo.
=TEXTJOIN(", ", TRUE, IF(MATCH(A2:A12, A2:A12, 0)=MATCH(ROW(A2:A12), ROW(A2:A12)), A2:A12, ""))
Nota: Nella formula, ", "È il separatore dei testi combinati; A2: A12 sono le celle della colonna che unirai insieme. Si prega di cambiarli come necessario.
Ora i testi nella colonna specificata vengono uniti senza duplicati.
Unisci i testi in una colonna senza duplicati in base a un altro valore di cella con codice VBA
A volte, potresti aver bisogno di unire i testi in una colonna senza duplicati in base al valore in un'altra cella, come mostrato nell'immagine sottostante, puoi rimuoverlo come segue.
1. Nel foglio di lavoro contiene i testi a cui ti unirai, premi il tasto altro + F11 chiavi per aprire il Microsoft Visual Basic, Applications Edition finestra.
2. Nel Microsoft Visual Basic, Applications Edition finestra, fare clic inserire > Modulo, e quindi copia il codice VBA sottostante nella finestra del codice del modulo.
Codice VBA: unisci i testi in una colonna senza duplicati in base a un altro valore di cella
Sub JoinTextsWithoutDuplicates()
'Updated by Extendoffice 20190924
Dim xRg As Range
Dim xArr As Variant
Dim xCell As Range
Dim xTxt As String
Dim I As Long
Dim xDic As Object
Dim xValue
Dim xStr, xStrValue As String
Dim xB As Boolean
On Error Resume Next
xTxt = ActiveWindow.RangeSelection.Address
Set xRg = Application.InputBox("Please select the data range", "Kutools for Excel", xTxt, , , , , 8)
Set xRg = Application.Intersect(xRg, xRg.Worksheet.UsedRange)
If xRg Is Nothing Then Exit Sub
If xRg.Areas.Count > 1 Then
MsgBox "Does not support multiple selections", , "Kutools for Excel"
Exit Sub
End If
If xRg.Columns.Count <> 2 Then
MsgBox "There must be only two columns in the selected range", , "Kutools for Excel"
Exit Sub
End If
xArr = xRg
Set xDic = CreateObject("Scripting.Dictionary")
xDic.CompareMode = 1
For I = 1 To UBound(xArr)
If Not xDic.Exists(xArr(I, 1)) Then
xDic.Item(xArr(I, 1)) = xDic.Count + 1
xArr(xDic.Count, 1) = xArr(I, 1)
xArr(xDic.Count, 2) = xArr(I, 2)
Else
xStrValue = xArr(I, 2)
xB = True
For Each xStr In Split(xArr(xDic.Item(xArr(I, 1)), 2), ",")
If xStr = xStrValue Then
xB = False
Exit For
End If
Next
If xB Then
xArr(xDic.Item(xArr(I, 1)), 2) = xArr(xDic.Item(xArr(I, 1)), 2) & "," & xArr(I, 2)
End If
End If
Next
Sheets.Add.Cells(1).Resize(xDic.Count, 2).Value = xArr
End Sub
3. premi il F5 chiave per eseguire il codice. Nel spuntare Kutools for Excel finestra di dialogo, seleziona l'intervallo includendo sia i valori su cui unirai i testi in base sia i testi a cui unirai, quindi fai clic su OK pulsante.
Quindi i valori univoci vengono estratti ei testi univoci corrispondenti in un'altra colonna vengono uniti e inseriti in un nuovo foglio di lavoro.
Unisci facilmente i testi in una colonna in base al valore di un'altra cella con uno strumento straordinario
Prima di applicare Kutools for Excel, Per favore scaricalo e installalo prima.
Nota: Poiché l'utilità verrà applicata direttamente nell'intervallo originale, eseguire una copia dei dati originali prima di applicare l'operazione seguente.
1. Seleziona l'intervallo (includi i testi a cui ti unirai e il valore in base al quale unirai i testi), fai clic su Kutools > Contenuti > Combina righe avanzate. Visualizza gli screenshot:
2. Nel Combina righe avanzate finestra di dialogo, eseguire le seguenti operazioni:
- Seleziona la colonna contenente i valori su cui unirai i testi in base e fai clic Chiave primaria;
- Seleziona la colonna contenente i testi che unirai in una cella e fai clic Combinare > Virgola;
- Se sono rimaste delle colonne, specificarne le condizioni. In questo caso, seleziono la colonna Vendite e seleziono calcolato > Somma.
- Clicca su OK pulsante. Vedi screenshot:
Quindi puoi vedere tutti i testi nella colonna specificata sono uniti in base alla colonna chiave. Vedi screenshot:
Se desideri avere una prova gratuita (30 giorni) di questa utility, fare clic per scaricarlo, quindi andare ad applicare l'operazione secondo i passaggi precedenti.
Articoli correlati
Combina righe duplicate e somma i valori in Excel
In Excel, potresti sempre incontrare questo problema, quando hai un intervallo di dati che contiene alcune voci duplicate e ora vuoi combinare i dati duplicati e sommare i valori corrispondenti in un'altra colonna, come potresti risolvere questo problema? Prova i metodi in questo articolo.
Combina più celle in una cella con spazio, virgole o altri separatori in Excel
Quando combini le celle di più colonne o righe in una singola cella, i dati combinati potrebbero non essere separati da nulla. Ma se vuoi separarli con segni specifici, come spazio, virgole, punto e virgola o altri, come puoi fare? Questo tutorial introdurrà alcuni metodi per te.
Celle concatenate mantenendo la formattazione di numero / data in Excel
Avrai notato che quando applichiamo la funzione CONCATENATE in Excel, il formato della data (2014-01-03) e il formato numerico come il formato valuta ($ 734.7), il formato percentuale (48.9%), le cifre decimali (24.5000), ecc. vengono rimossi e visualizzati come numeri generali nei risultati della concatenazione. In questo articolo vengono proposte diverse soluzioni alternative per concatenare i dati mantenendo la formattazione della data o del numero in Excel.
Invertire la funzione di concatenazione in Excel
Come tutti sappiamo, la funzione Concatenate in Excel può aiutarci a combinare più celle in una cella, ma, a volte, vuoi fare l'opposto della funzione Concatenate, significa non combinare celle, ma dividere il valore della cella in più celle separate. I metodi in questo articolo aiuteranno a risolvere il problema.
Concatena le celle se lo stesso valore esiste in un'altra colonna in Excel
Questo articolo fornisce metodi per aiutarti a concatenare facilmente le celle se lo stesso valore esiste in un'altra colonna in Excel.
I migliori strumenti per la produttività in ufficio
Potenzia le tue competenze di Excel con Kutools per Excel e sperimenta l'efficienza come mai prima d'ora. Kutools per Excel offre oltre 300 funzionalità avanzate per aumentare la produttività e risparmiare tempo. Fai clic qui per ottenere la funzionalità di cui hai più bisogno...
Office Tab porta l'interfaccia a schede in Office e semplifica notevolmente il tuo lavoro
- Abilita la modifica e la lettura a schede in Word, Excel, PowerPoint, Publisher, Access, Visio e Project.
- Apri e crea più documenti in nuove schede della stessa finestra, piuttosto che in nuove finestre.
- Aumenta la produttività del 50% e riduce ogni giorno centinaia di clic del mouse!