Live-Forum - Die aktuellen Beiträge
Datum
Titel
15.10.2025 08:22:15
Privat Sub ObjExcel_Sheet Change....deaktivieren
14.10.2025 19:08:54
Verbindung von Excel mit maps
14.10.2025 15:55:14
wenn zwei Werte aus Liste übereinstimmen, dann wahr
14.10.2025 14:57:29
Wenn Datum in Ferienzeit dann Name angeben
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
1368to1372
1368to1372
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel für doppelte Werte in Zelle löschen

Forumthread: Formel für doppelte Werte in Zelle löschen

Formel für doppelte Werte in Zelle löschen
18.07.2014 13:13:42
TKO
Hallo Forum,
ich hoffe Ihr könnt mir bei folgendem Problem lösen.
In Zellen habe ich Werteketten, die wie folgt aussehen. Teilweise kommen Teilwerte mehrfach vor.
NN4/Dopp1/Dopp2/NN5/Dopp2/NN6/Dopp1
Ich benötige eine Formel, die die doppelten Werte löscht, sodass jeder Teilwert nur ein einziges Mal vorkommt:
NN4/Dopp1/Dopp2/NN5/NN6
Leider habe ich nur Beispiele gefunden, die nicht wirklich funktionieren. Vielleicht findet sich ja unter Euch ein(e) Spezialist(in), der(die) mir weiterhelfen kann.
Herzlichen Dank im Voraus

Anzeige

13
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
mit einer Formel kann man nicht löschen ...
18.07.2014 13:17:59
der
Hallo TKO,
... Du kannst mit einer Formel die doppelten Werte in einer Hilfsspalte/-Zeile "kennzeichnen", nach diesen dann filtern und dann händisch dann die gefilterten löschen.
Gruß Werner
.. , - ...

AW: mit einer Formel kann man nicht löschen ...
18.07.2014 13:26:16
TKO
Hallo Werner,
vielen Dank für die prompte Rückmeldung. Mir geht es eigentlich auch nur um die Ausgabe.
Sie soll jeden Teilwert nur 1x aufführen.
Kann das gehen?
Beste Grüße
Tom

Anzeige
Ja, viel im Archiv bzw auf excelformeln.de ! orT
18.07.2014 13:40:27
Luc:-?
Gruß, Luc :-?

AW: Formel für doppelte Werte in Zelle löschen
18.07.2014 13:52:28
Gerd
Hallo!
Public Function Unikate(objZelle As Range)
Dim arText As Variant
Dim X As Long
Dim strOut As String
arText = Split(objZelle.Value, "/")
For X = 0 To UBound(arText)
If InStr(strOut, arText(X)) = 0 Then strOut = strOut & "/" & arText(X)
Next
Unikate = Mid$(strOut, 2)
End Function

Gruß Gerd

Anzeige
AW: Formel für doppelte Werte in Zelle löschen
18.07.2014 14:03:59
TKO
Lieber Gerd,
vielen Dank, aber gibt es das auch als Excel-Formel?
Ich habe mit VBA bisher leider noch nichts gemacht.
Beste Grüße
Tom

natürlich auch als Formel ...
18.07.2014 14:12:36
der
Hallo Tom,
... stell eine Beispielarbeitsmappe oder einen entsprechenden kopierfähigen Tabellenausschnitt hier ein und dann kann Dir sicher geholfen werden.
Gruß Werner
.. , - ...

Anzeige
AW: Funkrtion einfügen
18.07.2014 14:24:28
Gerd
@ Werner: Das Zeichenfolgen-Beispiel von Tom im ersten Beitrag ist kopierfähig.
Hallo Tom!
ALT + F11 -Tasten drücken (=Wechsel in den VBA-Editor)
In der Menüleiste "Einfügen" - "Modul" auswählen
Ins Codefenster (rechtes Fenster) die Funktion reinkopieren.
Ins Excel wechseln u. die Funktion in einer leeren Zelle mit
=Unikate(A1)
+ ENTER-Taste
aufrufen.
(Die Datei speichern).
Gruß Gerd

Anzeige
AW: Funkrtion einfügen
18.07.2014 14:57:34
TKO
Hallo Werner,
hier der Link zu meinem Beispiel.
Wäre mir schon wichtig eine Formel zu bekommen, weil ich meine Datei extern versenden muss und VBA bei den Empfängern nicht so geliebt wird bzw. nicht verwendet werden kann.
https://www.herber.de/bbs/user/91572.xlsx
Beste Grüße
Tom

Anzeige
AW: Funkrtion einfügen
18.07.2014 15:20:37
TKO
Danke Gerd,
habe Deinen Code ausprobiert, funct einwandfrei. Danke Dir auch für die Anleitung.Ist j agar nicht so schwierig.
Aber wie gesagt, ich bräuchte diese Funktion noch als Formel :-)
Beste Grüße
Tom

hierfür ist eine Formellösung nicht vertretbar ...
18.07.2014 15:35:01
der
Hallo Tom,
... weil es sich nicht um Zellwert-Dupletten handelt sondern um Dupletten innerhalb von Zellwerten.
Eine Formellösung würde mE nur mit vielen Hilfszellen und/oder unter Einsatz von Excel4Makrofunktionen oder einer evtl. bereits vorhandenen UDF realisierbar sein. Aber letztlich basiert dies ja dann auch wieder auf VBA und man sollte also gleich eine VBA-Lösung einsetzen.
Gruß Werner
.. , - ...

Anzeige
AW: hierfür ist eine Formellösung nicht vertretbar ...
18.07.2014 15:42:35
TKO
OK Werner,
schade.
@Alle:
Euch allen ganz, ganz herzlichen Dank für die superschnellen und trotzdem sehr hilfreichen Antworten.
Ihr seid ein richtig kompetentes und wertvolles Forum! Macht Spass mit Euch und Excel.
Schönes Wochenende
Mit besten Grüßen
Tom

Anzeige
AW: ohne VBA
18.07.2014 14:43:31
Daniel
ohne VBA gehts auch, die Formeln werden halt etwas aufwendiger, weil Excel für das Arbeiten mit Texten nur sehr rudimentär mit fertigen Funktionen ausgestattet ist.
wenn beispielseise deine Texte in den Zellen A1-D1 stehen und du sie bisher so zusammengefasst hast: 
=A1&"/"&B1&"/"&C1&"/"&D1
dann könnte eine Formel fürs Duplkatfreie zusammenfassen so aussehen: 
=A1&Wenn(ZählenWenn(A1:A1;B1);"";"/"&B1)&Wenn(ZählenWenn(A1:B1;C1);"";"/"&B1)&Wenn(ZählenWenn(A1:C1; D1);"";"/"&D1)

(die Bedingung in der WENN-funktion funktioniert hier, weil die 0 wie FALSCH und alle anderen Zahlenwerte wie WAHR gewertet werden.
das gibt bei vielen Spalten natürlich eine Monsterformel.
Bei Verwendung von Hilfszellen lässt sich das Formelwerk aber vereinfachen.
mal für diesen Beispiel:
in Zelle A2: =A1
In Zelle B2: =A2&Wenn(ZählenWenn($A1:A1;B1);"";"/"&B1)
die Formel in B2 ziehst du soweit nach rechts wie benötigt.
In der letzten Zelle steht dann das Gesamtergebnis.
(beachte die Kombination aus absolutem und relativen Zellebezug in der ZählenWenn-Funktion!)
Gruß Daniel

Anzeige
AW: ohne VBA
18.07.2014 15:36:29
TKO
Hi Daniel,
meine Werte stehen leider nicht einzeln in Zellen, sondern liegen in den Zellen bereits in verschiedenen Kombinationen vor. Habe eine Beispieldatei hochgeladen
https://www.herber.de/bbs/user/91572.xlsx
Vielleicht hast Du hierfür auch was in petto.
Beste Grüße
Tom
Anzeige
;

Forumthreads zu verwandten Themen

Formelbezug aus Zelle
chris

Hallo Excelexperten,
habe eine frage und würde mich sehr über Hilfe freuen.
habe folgende Formel.
='R:\2006\Prüfungen\D 06 001\[MHU_001.xls]Deckblatt'!$A$1
diese Formel bezieht sich immer auf die aktuelle Zeile.
Wenn ich sie herunterziehe sollte es mir immer in die Formel de...
11.09.2008 14:19:13
Thread-ID: 1009123
7 Beiträge
gewisse sonderzeichen aus zelle entfernen
Tobias

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
28.02.2009 15:56:56
Thread-ID: 1055091
8 Beiträge
Anzeige
Doppelte Zahlwerte löschen
Gregor

Hallo zusammen
In Spalte E habe ich folgende möglichze Zahlen:
1114539.4
1114539
1114539.4-2
1114539.1
1114539.3
1114539.3-1
Nun möchte ich die Zeile mit der Zahl 1114539 löschen. Das heisst, bei mehrfach gleichen Zahlen vor dem Punkt soll immer die Zahl ohne Pun...
17.06.2009 10:22:49
Thread-ID: 1082148
3 Beiträge
Anzeige
Formel für doppelte Werte in einer Liste...
Jessi

Hallo zusammen,
habe ein Problem, aber sicherlich ein nicht unzulösendes für Euch:
Ich habe eine Liste mit mehren Einträgen in einer Spalte z.B.
A
B
C
A
A
B
D
Z
Ich möchte nun die Spalte durchsuchen nach allen vorhanden UNTERSCHIEDLICHEN Einträgen, so...
17.06.2009 17:28:50
Thread-ID: 1082326
2 Beiträge
Doppelte Zelleneinträge dann ZEILE löschen
Wolle

Hallo alle zusammen,
habe noch ein Problem:
Wenn Zelleneinträge doppelt vorhanden sind, soll der doppelte eintrag gelöscht werden, wenn diese direkt untereinander stehen.
Bereich: B:B
Beispiel:
B1 = 100
B2 = 500 ..... bleibt stehen
B3 = 500 ..... ZEILE löschen
08.07.2009 12:32:46
Thread-ID: 1087167
5 Beiträge
Formel aus formatierten Zellen
Alfa

Hallo!
Ich habe eine Frage, ist es möglich mit Formaten Formel aufzubauen?
Beipiel:: Wenn(A1=schwarz; A2+A3) oder irgend so was.
Könnr Ihr mir einen Typ geben?
Grüße, Peter
16.07.2009 19:10:02
Thread-ID: 1089189
4 Beiträge
Makro doppelte Zeilen löschen
Christian

Hallo allerseits,
ich habe folgendes Makro, welches Zeilen ahand von doppelten Einträgen in einer spalte löscht.
Allerdings wird immer die zweite Zeile (von oben gesehen) gelöscht, ist es auch möglich die erste zeile zu löschen und die zweite zu behalten?
hier das makro: Sub supp_d...
22.07.2009 10:44:51
Thread-ID: 1090433
5 Beiträge
Doppelte Zeilen Löschen Kriterium in Spalte B
Christian

Hallo,
habe noch ein (hoffentlich kleines) Problem kurz vor dem wochenende, folgendes Mokro löscht doppelte Zeilen, dabei steht das kriterium in der ersten Spalte (A), also wenn in Spalte A zweimal der selbe eintrag steht, wird eine Zeile gelöscht:
Dim zz As Long, rngLi As Range
For...
24.07.2009 16:28:10
Thread-ID: 1091137
4 Beiträge
Zahlen aus Zelle entfernen
Peter

Hallo,
ich muss 2 zellen miteinander vergleichen.
In Spalte AN:AN stehen Werte Bsp 312A706 dazu stehen in Spalte AO:AO 000030-002894-K03-12A-070-600
Jetzt muss geprüft werden ob das A aus AN mit dem A aus AO identisch ist. Wenn ja dann Gutaussage
siehe Bsp-Datei
https://www....
16.09.2009 20:34:31
Thread-ID: 1103353
10 Beiträge
Anzeige
Formel für Tabellennamen aus Zelle
Juergen

Hallo,
Ich habe da ein kleines Problem, und zwar:
Ich erstelle neue Tabellen über eine Mastertabelle, wobei eine Vorlage kopiert wird.
Dieser Tabellenname steht dann in der Mastertabelle B4 bis up.
Nun möchte ich aber in der Zelle D4 der Mastertabelle ein Wert aus der neuen Tabe...
19.01.2010 20:41:19
Thread-ID: 1131169
4 Beiträge
Anzeige
doppelte Zeilen von unten löschen
unten

Hallo,
ich stehe bei meiner Exceldatei vor folgendem Problem.
In meiner Tabelle befinden sich Daten in den Spalte A-Z. In regelmäßigen Abständen werden von unten Daten angefügt. Teilweise auch mit Leerzeilen
Nun möchte ich, dass die Zeilen. die von Spalte A bis Z komplett identisch...
01.04.2010 15:21:05
Thread-ID: 1149852
5 Beiträge
doppelte und leere Zellen entfernen
Günther

Hallo zusammen,
Spalte A ist mit Namen (Buchstaben), Werten (Zahlen) und Leerzellen gefüllt (A1:A200)
Nun möchte ich erreichen, dass diese in Spalte B (ab B1) kopiert bzw. gefiltert werden
und zwar so, dass Leerzellen und doppelte Einträge gelöscht werden, (also nicht nur
ausgeb...
24.05.2010 22:22:09
Thread-ID: 1158591
6 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Doppelte Werte in Excel-Zellen Löschen

Schritt-für-Schritt-Anleitung

Um doppelte Werte in einer Zelle zu löschen, kannst du eine benutzerdefinierte Funktion in VBA verwenden oder komplexe Formeln nutzen. Hier ist eine einfache Anleitung, um dies in Excel zu erreichen:

  1. VBA-Funktion erstellen:

    • Drücke ALT + F11, um den VBA-Editor zu öffnen.

    • Klicke auf "Einfügen" und wähle "Modul".

    • Füge den folgenden Code ein:

      Public Function Unikate(objZelle As Range) As String
 Dim arText As Variant
 Dim X As Long
 Dim strOut As String
 arText = Split(objZelle.Value, "/")
 For X = 0 To UBound(arText)
     If InStr(strOut, arText(X)) = 0 Then strOut = strOut & "/" & arText(X)
 Next
 Unikate = Mid$(strOut, 2)
End Function

    • Wechsle zurück zu Excel und benutze die Funktion in einer Zelle: =Unikate(A1).

  2. Formel für doppelte Werte erstellen:

    • Wenn du keine VBA-Lösung verwenden möchtest, kannst du auch folgende Formel nutzen, um die doppelten Werte zu entfernen:

      =A1 & WENN(ZÄHLENWENN(A1:A1;B1);"";"/"&B1) & WENN(ZÄHLENWENN(A1:B1;C1);"";"/"&C1)

    • Diese Formel kann je nach Anzahl der Werte angepasst werden.

Häufige Fehler und Lösungen

  • Fehler: "Die Funktion gibt einen Fehler aus."

    • Lösung: Stelle sicher, dass du die VBA-Funktion korrekt eingefügt hast und dass der Zellbezug stimmt.

  • Fehler: "Die Formel gibt unerwartete Ergebnisse zurück."

    • Lösung: Überprüfe die Zellbezüge in deiner Formel. Achte darauf, dass die Zellen korrekt referenziert werden.

Alternative Methoden

Falls du VBA nicht verwenden möchtest, gibt es alternative Methoden:

  • Verwendung von Hilfsspalten: Platziere die Werte in mehreren Zellen und verwende die WENN und ZÄHLENWENN Funktionen, um Duplikate zu kennzeichnen und diese dann manuell zu löschen.

  • Daten > Duplikate entfernen: Wenn deine Werte in separaten Zellen stehen, kannst du die Funktion "Duplikate entfernen" direkt in Excel verwenden.

Praktische Beispiele

  • Beispiel 1: Wenn in Zelle A1 der Text A/B/C/A/D steht und du die Funktion =Unikate(A1) verwendest, erhältst du A/B/C/D.

  • Beispiel 2: Bei Verwendung der Formel =A1 & WENN(ZÄHLENWENN(A1:A1;B1);"";"/"&B1) in einer Kombination von A1 bis D1 kannst du die doppelten Werte auf einfache Weise herausfiltern.

Tipps für Profis

  • Nutze die TEXTKETTE Funktion in Kombination mit EINDEUTIG für eine dynamische Lösung.

  • Experimentiere mit Array-Formeln, um mehrere Zellen gleichzeitig zu bearbeiten.

  • Halte deine Formeln so einfach wie möglich, um die Übersichtlichkeit zu gewährleisten.

FAQ: Häufige Fragen

1. Kann ich doppelte Werte in einer Zelle ohne VBA entfernen? Ja, du kannst komplexe Formeln verwenden, aber sie sind oft weniger effizient und schwerer zu warten.

2. Was passiert mit der Originalzelle, wenn ich eine Formel verwende? Die Originalzelle bleibt unverändert. Die Formel gibt lediglich das Ergebnis in einer anderen Zelle aus.

3. Gibt es eine Möglichkeit, die Formeln zu vereinfachen? Ja, indem du Hilfsspalten verwendest, kannst du die Formeln vereinfachen und die Lesbarkeit erhöhen.

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