Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1944to1948
1944to1948
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Duplikate über mehrere Spalten finden und löschen

Forumthread: Duplikate über mehrere Spalten finden und löschen

Duplikate über mehrere Spalten finden und löschen
22.09.2023 12:51:20
Andre
Hallo,
ich habe ein Tabellenblatt mit einer Spalte, die einen oder mehrere kommaseparierte Einträge beinhalten können. Ich würde gerne Duplikate entfernen, aber auf Basis nicht der Zelle, sondern der einzelnen kommagetrennten Zellwerte. Am Schluss soll dann pro Zelle ein Eintrag stehen.
Kann mir hier bitte jemand eine Lösungsmöglichkeit aufzeigen? Lieben Dank im Voraus

Beispiel:
https://www.herber.de/bbs/user/163044.xlsx

Danke für Hilfe und VG
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:09:14
daniel
Hi

so beispielsweise: 

=EINDEUTIG(TEXTTEILEN(TEXTVERKETTEN(",";WAHR;Ausgang!A2:A4);;","))

A2:A4 sind die Zellen, die du auswerten willst.
Gruß Daniel
AW: alternativ ...
22.09.2023 13:32:45
neopa C
Hallo Andre,

... z.B. mit der Power Query (PQ) Funktionalität von Excel. Ist zwar etwas aufwendiger als mit Formel, aber interaktiv erstellbar.

- Auszuwertende Daten als "Tabelle formatieren";
- in PQ einlesen, Indexspalte hinzufügen;
- Datenspalte nach Komma teilen lassen;
- Entpivotieren der anderen Spalten außer Indexspalte,
- In der der erzeugte Wertespalte die Duplikate entfernen lassen,
- die andern Spalten entfernen
- das Ergebnis ausgeben lassen.

Gruß Werner
.. , - ...
Anzeige
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:27:33
Andre
Danke Daniel, für ein paar Zeilen funktioniert das. Ich hab 30.000 Zeilen, da kommt dann nur ein #WERT raus :/
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:31:18
Alwin Weisangler
Hallo Andre,

Vorschlag mit VBA: 


Sub Trennen()

    Dim arr(), objDic As Object

    With Tabelle1

        Set objDic = CreateObject("Scripting.Dictionary")

        For i = 2 To 11

            arrTmp = Split(.Cells(i, 1), ",")

            For j = 0 To UBound(arrTmp)

                objDic(arrTmp(j)) = 0

            Next j

        Next i

    End With

    arr = objDic.keys

    Tabelle2.Cells(2, 2).Resize(UBound(arr) - LBound(arr) + 1, 1) = WorksheetFunction.Transpose(arr)

End Sub

Gruß Uwe
Anzeige
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:44:46
Andre
Hallo Uwe,
Ich bekomme hier folgenden Fehler:
Laufzeitfehler 424, Objekt erforderlich.
Tabelle2.Cells(2, 2).Resize(UBound(arr) - LBound(arr) + 1, 1) = WorksheetFunction.Transpose(arr)
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:48:11
Andre
Edit: Wenn ichs in der Beispieldatei mache, funktioniert es doch.
Wenn ich aber die vollständige Liste reinpacke, dann bekomme ich
Laufzeitfehler 13;
Typen unverträglich
Anzeige
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 13:56:18
Alwin Weisangler
mit vollständiger Dimensionierung: 


Option Explicit



Sub Trennen()

    Dim arr(), i&, j&, arrTmp, objDic As Object

    With Tabelle1

        Set objDic = CreateObject("Scripting.Dictionary")

        For i = 2 To 11

            arrTmp = Split(.Cells(i, 1), ",")

            For j = 0 To UBound(arrTmp)

                objDic(arrTmp(j)) = 0

            Next j

        Next i

    End With

    arr = objDic.keys

    Tabelle2.Cells(2, 2).Resize(UBound(arr) - LBound(arr) + 1, 1) = WorksheetFunction.Transpose(arr)

End Sub

Teste es um beschreibe, falls der Fehler wieder auftritt, in welcher Stelle/Zeile der Fehler kommt.

Gruß Uwe
Anzeige
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 14:18:11
Andre
Vielen Dank. So funktioniert es. Ein Problem war ein Wert "#WERT" in der Spalte..
Danke und Grüße!
AW: Duplikate über mehrere Spalten finden und löschen
22.09.2023 14:42:45
daniel
wenn du das #Wert bereinigst, sollte auch die Formel funktionieren

btw wäre schon hilfreich, wenn du schon in deiner ersten Anfrage angibst, wie groß die Tabelle in Realität ist und welche weiteren Unterschiede zwischen Echt- und Beispieldaten sonst noch bestehen.
Dann kann man das gleich berücksichtigen, denn manchmal sind einfache lösungen für große Datenmengen zu langsam, während die schnellere Lösung aufwendig ist.
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Makroablauf für bestimmte Spalten
Karsten

Hallo,
ich möchte einen Makro ablaufen lassen, der aber nur ausgeführt wird wenn, sich die aktive Zelle in Spalten B,E,H,K,und N befindet.
Danke für eure Hilfe.
Gruß Karsten
07.03.2009 19:29:06
Thread-ID: 1057747
8 Beiträge
Makro langsam - Spalten löschen und Format
F.

Hallo zusammen
Das folgende Makro habe ich für acht Buchungskreise zusammengebastelt (mir Eurer Hilfe). Alles befindet sich in der gleichen Arbeitsmappe.
Jeder Kreis hat ein Berechnungsblatt und ein Datenblatt. Im Ersteren befindet sich eine Schaltfläche. Diese wird für jeden Kreis ei...
22.07.2009 12:31:31
Thread-ID: 1090484
7 Beiträge
Anzeige
Makro soll in bestimmten Spalten funktionieren.
Karsten


Hallo...
Mir hat jemand aus dem Excelforum diesen Makro erstellt. Kann mir bitte jemand diesen Makro so ändern, dass er nur dann funktioniert, wenn beide selektierten Zellen sich in den Spalten B, E, H, K oder N befinden und die Zellen sich in ungeraden Zeilen befinden (z.B. B3 und E5...
05.10.2009 10:24:17
Thread-ID: 1107217
3 Beiträge
Formel in bestimmte Zellen per makro schreiben??
lisa

Hallo
Ich konnte bislang noch nicht in der Recherche finden und wende mich deshalb an EUCH Spezis.
Vieleicht könnte ihr mir helfen.
In meiner Spalte B steht immer nur in bestimmten Zellen ein Wert, nämlich Ergebnis!
In der Spalte F stehen Werte. Nun möchte ich aber ohne die Wer...
09.11.2009 13:43:49
Thread-ID: 1115507
9 Beiträge
VBA: Text in Spalten - mehrere Spalten | Herbers Excel-Forum
Jonathan
Hallo liebe Experten,
ich bräuchte mal wieder etwas Hilfe...
In einer Tabelle stehen in einigen Spalten (jeweils ab Zeile 9 - Zeile 46) Zahlen.
Die Zellen sind als "Standart" definiert. Jedoch ist es so, dass einige Zahlen dennoch nicht als solche erkannt werden. Erst nach einem Doppelk...
05.02.2010 09:43:46
Thread-ID: 1136027
4 Beiträge
#NV in Spalte löschen per VBA
edie

Hallo zusammen,
ich versuche vergebens die #NV in der Spalte B per VBA zu löschen bzw. durch eine Null ersetzen.
Das Makro stoppt bei: 'If Cells(i, 2) = "#NV" Then' mit der Fehlermeldung: 'Typen unverträglich'.
Weiß nicht mehr weiter, deshalb bitte um Hilfe, wenn's geht.
Sub Te...
16.02.2010 14:12:15
Thread-ID: 1138929
4 Beiträge
variabel Spalten Löschen
Hermann

Liebe Excel-Gemeinde,
leider komme ich mal wieder nicht weiter und hoffe auf
eure Unterstützung bei 2 für euch winzigen Problemchen.
1) Ich versuche variable Spalten zu löschen mit dem Befehl
ActiveSheet.union(range(cells(1,spaWeg+6),cells(99,spaWeg+25)).EntireColumn.Delete
...
02.05.2010 18:27:25
Thread-ID: 1155013
7 Beiträge
Anzeige
Makro macht Probleme beim Löschen von Zellen
Zellen

Hallo,
folgendes tolles Makro habe ich mit eurer Hilfe in die Tabelle eingebaut.
Funktioniert alles super. Gebe ich in dem untersuchten Bereich etwas ein, wird in eine Zelle etwas geschrieben. Nun wollte ich, dass wenn der Wert im untersuchten Bereich gelöscht wird, auch der Wert in der...
28.05.2010 10:43:57
Thread-ID: 1159185
5 Beiträge
Anzeige
Range definieren bestimmte zellen herauslöschen
Matthias

Hallo,
ich bewundere dieses Forum und habe hier schon zahlreiche Stunden mit Makros lernen und verstehen verbracht. Mittlerweile kann ich auch schon selbst einigermaßen "programmieren" doch bei diesem Projekt versagen meine Kenntnisse total.
In Spalte A habe ich aus einem Warenwirtschaf...
07.08.2010 16:34:44
Thread-ID: 1171074
21 Beiträge
Spalten durchsuchen ggf. Zeile löschen var.Inhalt
Henning

Hallo Experten,
ich bin ganz neu in diesem Forum, in Sachen VBA bin ich leider noch nicht besonders versiert. Ich habe ein Makro geschrieben, das eine Rechnung erstellt und gewisse Zeilen (nicht immer gleich vielem, da logischerweise die Rechnungspositionen variieren) in die Rechnungsvorla...
15.09.2010 09:53:25
Thread-ID: 1177652
10 Beiträge
Zellen vergleichen und löschen (Makro)
David

Hallo,
ich habe im Forum bisschen gestöbert und den Beitrag "Tabelle via Passwort freigeben" gefunden! Genau sowas habe ich auch gesucht.
Ich habe das ganze auch schon ein wenig angepasst. https://www.herber.de/bbs/user/73065.xls
Aber jetzt habe ich noch folgende Fragen:
1. Ich...
15.01.2011 11:50:21
Thread-ID: 1195673
2 Beiträge
Zellen vergleichen und löschen (Makro)
David

Hallo,
ich habe im Forum bisschen gestöbert und den Beitrag "Tabelle via Passwort freigeben" gefunden! Genau sowas habe ich auch gesucht.
Ich habe das ganze auch schon ein wenig angepasst. https://www.herber.de/bbs/user/73065.xls
Aber jetzt habe ich noch folgende Fragen:
1. Ich...
15.01.2011 16:26:39
Thread-ID: 1195683
5 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige