Live-Forum - Die aktuellen Beiträge
Datum
Titel
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
18.04.2024 19:30:20
VBA - Tabelle mit Mannschaftsergebnissen sortieren
18.04.2024 18:04:29
Formel fehler Wert#
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1416to1420
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1416to1420
1416to1420
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Duplikate löschen in EINER ZELLE

Duplikate löschen in EINER ZELLE
24.03.2015 21:05:23
Thomas
Hallo,
ich suche, leider bisher vergeblich, eine Möglichkeit Doppelte Einträge in einer Zelle zu entfernen.
Es geht um die Optimierung von Fahrzeuglisten von ca 30000 Artikeln (Autoteile) für Einträge in Google Shopping (max.5000 Zeichen). Hier sind viele Doppelte Nennungen wie z. Bsp VW oder Audi oder Diesel ... Diese Begriffe sind in diesen Listen nur 1 x notwendig.
Tabellenformat ist
Artikelnr;Fahrzeugtabelle
11223344;VW Golf 3 Diesel Variant Vw Golf 4 Diesel Variant VW Passat Diesel
11224455;Skoda Octavia 1,9 TDI Skoda Superb 1,9 TDI Seat Alhambra 1,9 TDI
Danke für jeden Tip

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Duplikate löschen in EINER ZELLE
24.03.2015 21:18:36
Daniel
Hi
erstelle folgende benutzerdefinierte Funktion (den Code in ein allgemeines Modul kopieren)
Function TextOhneDuplikate(txt As String, Optional TrZ As String = " ") As String
Dim Teiltexte() As String
Dim TT As String
Dim i As Long
Teiltexte = Split(txt, TrZ)
TextOhneDuplikate = Teiltexte(0)
For i = 1 To UBound(Teiltexte)
TT = Teiltexte(i)
If InStr(TrZ & TextOhneDuplikate & TrZ, TrZ & TT & TrZ) = 0 Then
TextOhneDuplikate = TextOhneDuplikate & TrZ & TT
End If
Next
End Function
dann kannst du in einer Hilfsspalte die Funktion =TextOhneDuplikate(B2) verwenden.
Gruß Daniel

Anzeige
AW: Duplikate löschen in EINER ZELLE
24.03.2015 22:23:25
Thomas
Hallo,
SUUUUPPPEERR !!!
Testzelle hat 10000 zeichen eingespart!
Vielen Dank!!!
Grüße

55 Forumthreads zu ähnlichen Themen

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
doppelte Einträge in einer Spalte löschen
Thomas

Hallo,
ich habe folgendes Problem:
Habs nach langen hin und her hinbekommen die doppelten Einträge in der Spalte A und die zugehörige Zeile mit diesem Makro zu löschen
Sub DoppelteLöschen() Dim iRow As Long, iRowL As Long iRowL = Cells(Cells.Rows.Count, 1).End(xlUp).Row For iRow = i...
06.01.2010 01:11:46
Thread-ID: 1127483
4 Beiträge
Doppelte Einträge summieren + löschen
ben

Hallo zusammen,
ich habe eine Excel Liste mit versch. Einträgen, bei denen in der Spalte C (ID Nummer) einige Einträge doppelt sind. Diese doppelten Einträge werden per VBA Code gelöscht.
Jetzt sollen aber die Mengen in Spalte E der gelöschten Einträge aufsummiert werden.
Bsp.: alle...
12.04.2010 21:02:46
Thread-ID: 1151310
14 Beiträge
Anzeige
Werte bis zum ersten ; in Zelle löschen
Helmut

Hallo Forenuser,
ein kleines Problem:
Wie kann ich alle Zeichen bis zum ersten Strichpunkt in einer Zelle löschen?
Also:
200;3AB;5V
soll werden:
3AB;5V
Oder:
0-3400;8ZU;9;9
soll werden:
8ZU;9;9
Danke im Voraus!
LG, Helmut
10.05.2010 14:25:02
Thread-ID: 1156441
2 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
Doppelte Einträge löschen
Horst

Hallo Excel-Gemeinde,
Ein Tabellenblatt enthält in Spalte "AS" mehrere idente Datumswerte (siehe Bsp.), von denen nur jeweils der letzte Eintrag in der Tabelle stehen bleiben sollte, alle anderen Zeilen des gleichen Datums und der gleichen Uhrzeit sollen gelöscht werden.
Wie könnte ein...
30.05.2011 16:39:40
Thread-ID: 1216696
13 Beiträge
doppelte Einträge löschen
André

Guten Morgen!
Ich hole von externen Excelmappen die Daten in eine Tabelle. Dann lösche ich die Leeren Zeilen. Diese beiden Makros klappen sehr gut, dank Eurer Hilfe.
Jetzt möchte ich doppelte Einträge löschen. Also in der Spalte A, wird ausgehend von den Einträgen der anderen Spalten,...
06.01.2012 08:42:01
Thread-ID: 1244826
3 Beiträge
Doppelte Einträge löschen
André

Schönen guten Tag!
Ich habe in meiner Literatur folgendes Makro gefunden und möchte damit auf einem Tabellenblatt "D" doppelte Datensätze in einer Liste löschen. Es soll die Spalte A verglichen werden. Die Spaltenüberschrift soll nicht sortiert bzw. gelöscht werden.
Sub DoppelteSätzeEli...
07.01.2012 14:11:12
Thread-ID: 1245059
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
2
4
3
13
7
1
5
12
2
2
2
1
2
4
4
1
5
2
3
13
2
13
6
6
4