Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 09:08:00
Export alle Tabellenblätter als csv - in bestimmten Ordner
26.04.2024 08:56:40
Über alle Spalten nur €-Werte zählen
26.04.2024 08:08:24
Pivot Vormonatsveränderung
26.04.2024 07:54:11
nur den ersten Eintrag in spalte zählen
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1160to1164
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
1160to1164
1160to1164
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Doppelte Zellen löschen

Doppelte Zellen löschen
Claudia
Hallo zusammen,
ich habe ein großes Problem. Genauer gesagt habe ich eine Tabelle, in der sich die Überschriften in Zeile 1 befinden. In Spalte A befinden sich ab Zeile 2 die Kundennummern.
Ab Spalte B bis AZ befinden sich Artikel - darunter auch viele, die mehrfach vorkommen. Diese doppelten Artikel sollen pro Kundenummer gelöscht und die entsprechende Zelle für diese Kundenummer entfernt werden, so dass die Spalten ab B fortlaufend für den Kunden befüllt sind.
Wichtig: Kommt ein Artikel mehrfach vorhanden, so muss der Artikel einmal erhalten bleiben (also Löschung ab zweiter Nennung).
Beispiel:
Kunde 1 Artikel1 Artikel2 Artikel3 Artikel1 Artikel4
daraus soll werden:
Kunde 1 Artikel1 Artikel2 Artikel3 Artikel4
Wer kann mir helfen?
Liebe Grüße
Claudia

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

Betreff
Benutzer
Anzeige
AW: Doppelte Zellen löschen
15.06.2010 19:20:30
Hajo_Zi
Hallo Claudia,
Doppelte Löschen
angenommen Deine Daten stehen in A1 bis A?
Bereich markieren = Spalte A anklicken (evtl. eine Leerzeile vorher einfügen)
Daten / Filter / Spezialfilter
keine Duplikate
jetzt kannst du noch einstellen, ob an gleicher Stelle oder woanders placiert; hier also B1 eingeben
Spalte A anschließend löschen
Bei mehreren Spalten, muss die Liste eine Überschrift haben, am besten fett formatiert, dann erkennt sie auch Excel als Überschrift.

AW: Doppelte Zellen löschen
15.06.2010 19:28:51
Claudia
Hallo Hajo,
die Artikel stehen allerdings in den Spalten B bis AZ in der jeweiligen Zeile. Problem ist, dass mögliche doppelte in jeder Zeile woanders stehen können.
In Zeile 2 könnten doppelte z.B. in B2, C2, F2, AZ2 stehen.
In Zeile 3 könnten doppelte z.B. in F3, H3, K3, Z3, AF3 stehen.
Kann mir nur vorstellen, dass sowas über eine Makro geht, oder?
Liebe Grüße
Claudia
Anzeige
Hilfe.....
15.06.2010 21:28:32
Claudia
AW: Hilfe.....
15.06.2010 21:28:45
Claudia
AW: Doppelte Zellen löschen
15.06.2010 21:34:06
Oberschlumpf
Hi Claudia
ne Bsp-Datei wär toll.
Ciao
Thorsten
AW: Doppelte Zellen löschen
15.06.2010 21:58:27
Claudia
Hallo Oberschlumpf,
anbei eine Datei:
https://www.herber.de/bbs/user/70075.xls
Die grünen müssen erhalten bleiben, weil der Artikel zwar mehrfach vorkommt, aber das erste Mal genannt wird. Die roten sind identisch mit den grünen und müssen gelöscht werden (incl. der Zelle, damit keine "Löcher" entstehen).
Bei jeder Kundennummer darf ein Artikel maximal 1 x mal vorkommen.
Vielen vielen Dank!
Liebe Grüße
Claudia
AW: Doppelte Zellen löschen
15.06.2010 23:32:59
Oberschlumpf
Kannste mich ruhich Thorsten nennen ;-)
Hi Claudia
Füg mal diesen Code in ein allgemeines Modul ein: 
Sub sbDel()
Dim liRow As Integer, liCol As Integer, liCol1 As Integer
For liRow = 2 To Cells(Rows.Count, 1).End(xlUp).Row
For liCol = 2 To Cells(liRow, Columns.Count).End(xlToLeft).Column
For liCol1 = liCol + 1 To Cells(liRow, Columns.Count).End(xlToLeft).Column
If Cells(liRow, liCol1).Value = Cells(liRow, liCol).Value Then
Cells(liRow, liCol1).Delete Shift:=xlToLeft
liCol1 = liCol1 - 1
End If
Next
Next
Next
End Sub

Zumindest in deiner Testdatei werden alle roten Zellen "eliminiert".
Alle grünen + gar nicht farbigen Zellen bleiben erhalten.
Funzt das auch in deiner Originaldatei? (von der du sicherhetshalber eine Kopie erstellen solltest)
Ciao
Thorsten
Anzeige
@ Oberschlumpf: vielen Dank!
16.06.2010 08:28:03
Claudia
Hallo Thorsten,
ich war gestern schon im Bett, als Du geschrieben hast, da ich heute morgen um 4.00 Uhr raus musste.
Makro habe ich ausprobiert und es funktioniert perfekt.
Vielen vielen Dank!
Liebe Grüße
Claudia
gerne ;-)...thx for feedback ..owT
16.06.2010 08:31:07
Oberschlumpf

301 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 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
Doppelte Einträge filtern
Rüdiger

Hallo zusammen!
Ich habe einen Datenbereich
Hier ein verkürztes Beispiel (A1-D100): Aufgebaut mit A1=Name, B1= Vorname, C1 = Straße, D1 = Wohnort)
Nun gibt es doppelte Datensätze. Ich möchte nun, dass ein neues Registerblatt erstellt wird in der Arbeitsmappe und dort die „gefiltert...
12.11.2009 13:12:54
Thread-ID: 1116509
5 Beiträge
Anzeige
VBA Schleife - elimieren von doppelten Werten
doppelten

Hallo Forum,
ich möchte doppelte Werte (siehe Anhang) aus Spalte A inhaltlich löschen (sind vorher sortiert).
Leider funktioniert meine Schleife nicht.
Kann mir jemand helfen?
Vielen Dank im voraus.
https://www.herber.de/bbs/user/68477.xls
Grüße
Karen
09.03.2010 11:06:49
Thread-ID: 1144532
9 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
Makro um doppelte Einträge zu suchen und zu filtern
Excelneuling2

Hallo Zusammen,
ich bin ein Excelneuling und habe dementsprechend noch nie ein Makro programmiert und hoffe auf Hilfe.
Mein Problem:
Ich habe eine Datenbank (siehe Beispieltabelle) in der x Zeilen und y Spalten vorhanden sind. Ich möchte ein Makro schreiben, welches doppelte Zeilen...
31.07.2010 16:44:49
Thread-ID: 1169831
10 Beiträge
Liste von allen doppelten Einträgen befreien
allen

Hallo,
ichh habe hier ein wahrscheinlich sehr simples Problem. Da ich aber leider keine Makros programmieren kann, für mich ein nicht lösbares.
Ich habe hier eine Excel-Liste, die aus zwei Tabellen mit leicht unterschiedlichen Spalten auf je einem eigenen Arbeitsblatt besteht.
Auf d...
28.12.2010 17:07:48
Thread-ID: 1193075
4 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
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
1
4
4
3
8
13
9
3
12
2
5
13
2
2
2
4
1
7
2
4
10
4
1
5