Live-Forum - Die aktuellen Beiträge
Datum
Titel
14.06.2025 19:51:23
Überlappende Gruppierungen machen mir Probleme
14.06.2025 11:36:22
Zeilen Kopieren als "index" und Umwandeln in Zahlen
14.06.2025 01:19:50
Vorhersage Monatsumsatz anhand bereits erfolgter Tagesumsätz
13.06.2025 19:20:06
XVERWEIS nächster Wert bei exakten Match
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
1120to1124
1120to1124
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

doppelte Werte suchen und markieren

Forumthread: doppelte Werte suchen und markieren

doppelte Werte suchen und markieren
Wolfgang
Hallo,
suche eine Lösung für folgendes Problem:
Habe eine Tabelle, in der von Zelle A10 bis J1000 Daten mittels Maske eingetragen werden. Nun kommt es vor, das bei der Auswertung = Ausdruck in einigen Zeilen (immer die komplette Zeile ist doppelt, nicht eine Zelle !!!) doppelte Werte stehen.
Gibt es eine Möglichkeit per Makro, den Bereich von A10:J1000 zeilenweise nach doppelten Einträgen, die in allen Spalten vorkommen müssen, zu suchen und diese evtl. per bedingte Formatierung farblich zu markieren. Versuche es schon mittels Makroaufzeichnung, aber es klappt irgendwie nicht ;-(
vielen Dank für mögliche Hilfe
Wolfgang
Anzeige
AW: doppelte Werte suchen und markieren
26.11.2009 12:43:01
Rudi
Hallo,
in einer Hilfsspalte die Zellen A:J verketten und mit Zählenwenn auf Duplikate testen.
Gruß
Rudi
AW: doppelte Werte suchen und markieren
26.11.2009 13:00:15
Wolfgang
Hallo,
das hatte ich auch schon mal irgendwie probiert und hat nicht funktioniert, aber ich meine das so, dass es keine "Vorgabe" über eine Maske oder so gibt, einfach nur nach möglichen doppelten oder mehrfach vorkommenden gleichen Zellen EINER Zeile markieren? Vielleicht habe ich mich auch falsch ausgedrückt ;-(
Wolfgang
Anzeige
AW: doppelte Werte suchen und markieren
26.11.2009 13:11:35
Mike
Hey Wolfgang,
das Zählenwenn ist keine Maske und lässt sich
auch gut auf Deine Zeilen-Anforderung anwenden.
Tabelle1
 ABCDEFGHIJ
25  112121345
26  344556111

verwendete Formeln
Zelle Formel
B26 =ZÄHLENWENN($B2:B25; B25)
C26 =ZÄHLENWENN($B2:C25; C25)
D26 =ZÄHLENWENN($B2:D25; D25)
E26 =ZÄHLENWENN($B2:E25; E25)
F26 =ZÄHLENWENN($B2:F25; F25)
G26 =ZÄHLENWENN($B2:G25; G25)
H26 =ZÄHLENWENN($B2:H25; H25)
I26 =ZÄHLENWENN($B2:I25; I25)
J26 =ZÄHLENWENN($B2:J25; J25)

Füllfarben und Muster
Zelle Rot Grün Blau Color Muster Farbe
A25 19219219212632256   
Zellen mit Füllfarbe automatisch werden nicht dargestellt

Tabellendarstellung in Foren Version 4.28


Gruss
Mike
Anzeige
AW: doppelte Werte suchen und markieren
26.11.2009 13:31:11
Wolfgang
Hallo Mike,
dass "zählenwenn" keine Maske ist, das ist schon klar!
Es ist einfach so gesagt oder geschrieben:
(Makro) gucke mal nach, ob im Bereich a10:j1000 und NUR da ZEILENWEISE irgendwo sich auf der kompletten Zeile a:j etwas doppelt befindet?
und dann markiere es
Ich weiß es hört sich kompliziert an, aber ich gebe mir mühe, es einfach zu erklären ;-)
Anzeige
AW: doppelte Werte suchen und markieren
26.11.2009 14:15:48
Wolfgang
Hallo Hary,
nein!
als beispiel genannnt:
in der zeile a100 sind die werte folgend vorhanden:
a100= 1; b100=abx; c100=klm; d100=123; e100=abs; f100=abt; g100=0987; h100=4568 und j100=xxx
und diese zeile kommt irgendwann mal so in Zeile 600 nochmals vor!
Nun würde ich eben gerne diese Zeile als Wiederholung von Zeile 100 markiert haben und zwar die gesamte Zeile!!
Vielleicht hilft dies ...
Gruß
Wolfgang
Anzeige
AW: doppelte Werte suchen und markieren
26.11.2009 15:19:27
Wolfgang
Danke,
das isses!! vielen vielen Dank!
Wolfgang
Bitte, danke fuer Rueckmeldung owT
26.11.2009 15:21:46
hary
.
Anzeige
AW: Bitte, danke fuer Rueckmeldung owT
26.11.2009 15:43:59
Wolfgang
äääh, habe das makro nun in die datei von mir übernommen und nun stürzt excel immer ab!
Jetzt bin ich ratlos?
Habe in der Datei von Dir das ein paarmal durchprobiert und auch nach unten entsprechende kopiert und da hat es mit den Buchstaben geklappt, aber nun nicht mehr ?
Woran kann das wieder liegen?
Gruß
Wolfgang
Anzeige
AW: Bitte, danke fuer Rueckmeldung owT
26.11.2009 15:52:37
Wolfgang
Hallo Hary,
weiß auch schon woran es liegt,
da unterhalb von der Zeile z.B. 222 nichts mehr steht möchte nun das Makro alle Zeilen markieren und nun hat der PC ein Problem und bringt eben Excel zum Absturz!!
weiß nicht wie man dies "auffangen" kann oder dass der Bereich zum Überprüfen erst "abgefragt" wird ob Zellen 'benutzt' also beschrieben sind und den Rest einfach nicht mit "kontrolliert" oder so ...
... vielleicht habe ich mich auch ein bißchen dumm ausgeschrieben ;-)
Gruß
Wolfgang
Anzeige
AW: teste mal
26.11.2009 16:21:57
hary
hallo
dann versuch's mal so. von zeile 10 bis letzte benutzte Zelle in SpalteA 

Dim i As Long
Dim rng As Range
Application.ScreenUpdating = False
Range("A10:J1000").Interior.ColorIndex = xlNone
For i = 10 To Cells(Rows.Count, 1).End(xlUp).Row ' 1 bis letzte benutzte zeile in SpalteA
If WorksheetFunction.CountIf(Range("K10:K1000"), Cells(i, 11)) > 1 Then
For Each rng In Range("A" & i & ":J" & i)
rng.Interior.ColorIndex = 3
Next
End If
Next
Application.ScreenUpdating = True

gruss hary
Anzeige
AW:beispielmappe
26.11.2009 16:02:14
hary
Hallo Wolfgang
lad mal eine beispielmappe hoch wo's zum Absturz kommt.
gruss hary
AW: AW:beispielmappe
26.11.2009 16:20:10
Wolfgang
wie ?
was ist damit gemeint?
bin ja nicht der profi und weiß nicht was damit gemeint ist
AW: besser so!!!
26.11.2009 16:28:46
hary
hallo Wolfgang
so ist es besser. Es werden nur die gefuellten Zeilen geprueft.
hier die Mappe.
https://www.herber.de/bbs/user/66204.xls 

Dim i As Long
Dim rng As Range
Application.ScreenUpdating = False
Range("A10:J1000").Interior.ColorIndex = xlNone
For i = 10 To Cells(Rows.Count, 1).End(xlUp).Row ' 1 bis letzte benutzte zeile in SpalteA
If Cells(i, 1)  "" Then
If WorksheetFunction.CountIf(Range("K10:K1000"), Cells(i, 11)) > 1 Then
For Each rng In Range("A" & i & ":J" & i)
rng.Interior.ColorIndex = 3
Next
End If
End If
Next
Application.ScreenUpdating = True

gruss hary
Anzeige

Forumthreads zu verwandten Themen

Gleiche Zellen markieren
Excel-F

Moin Gemeinde,
nachdem ich noch längerem Suchen im Netz keine Lösung für mein Problem gefunden habe, wende ich mich jetzt hilfesuchend an euch.
Folgendes Problem:
Ich habe einen fest definierten Bereich.
Hier sind Buchstaben eingetragen, Bsp. u ,k , s, f
Nun möchte ich alle...
17.03.2009 12:15:27
Thread-ID: 1061059
4 Beiträge
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 Werte, abhängig von aktiver Zelle, finden
aktiver

Hallo,
auch nach stundenlanger Suche konnte ich folgendes Problem bisher nicht lösen:
In meinem Tabellenblatt kommen verschiedene Zelleinträge mehrfach vor.
Nun soll, wenn sich der Cursor in einer Zelle befindet, deren Inhalt in der Tabelle nochmals (oder mehrmals) vorkommt, diese Z...
09.08.2009 13:52:48
Thread-ID: 1094515
12 Beiträge
Gleiche Werte in Spalte markieren
Larissa

Hallo,
ich möchte mit einem Makro in einer Spalte alle Zellen mit dem gleichen Wert markieren.
Mit meinem Makro wird nur die erste Zelle mit dem Wert markiert:
Dim Belegnr As String
Belegnr = ActiveCell.Offset(0, -14)
Sheets("Kontierung").Select
Range("B:B").Find(Belegnr...
27.09.2009 22:24:30
Thread-ID: 1105923
8 Beiträge
Anzeige
Zellen nach ident. Werten absuchen und einfärben
RollWeb

Hallo
Ich habe dieses "Problem" gestern bereits im Office-Loesung-Forum gepostet, bis jetzt aber leider noch keinerlei Antworten erhalten. Hoffe, dass ich hier mehr Glück habe.
Folgendes würde ich gerne mit einem Makro lösen (denke mit Formeln ist das so nicht umsetzbar...?):
Über...
16.12.2009 11:55:17
Thread-ID: 1124335
10 Beiträge
gleiche Werte in Diagonale finden
Ptonka

Hallo zusammen,
ich habe eine etwas größere Matrix (A1: M:200) in der unterschiedliche Einträge enthalten sind.
Nun muss ich die Matrix dahingehend untersuchen, ob in einer Diagonale vier mal der identische
Eintrag vorhanden ist (ähnlich dem Spiel "Vier gewinnt").
Beispiel: Der...
12.03.2010 15:06:12
Thread-ID: 1145426
4 Beiträge
Anzeige
2'tes Tabellenblatt nach 2 Werten durchsuchen
Fred

Hallo
Ich habe folgendes Problem.
In einem Tabellenblatt (Ergebnis) sind in Textpassagen Zahlen "versteckt".
Diese habe ich bereits herausgefiltert. (Device ist in Spalte B; Port in Spalte C)
Mit diesen 2 Zahlen will ich eine 2'te Tabelle (Liste) durchsuchen, in der in der Spalt...
17.03.2010 23:38:28
Thread-ID: 1146730
5 Beiträge
gleiche Zellinhalte in einer Spalte markieren
Elmar

Hallo Experten,
ich habe eine sehr große Tabelle, in der in Spalte "C" immer wieder Blöcke von Zahlenreihen kommen, die gleich sind. Diese Blöcke mit gleichen Zahlenreihen sollen nun farbig markiert werden, aber nur, wenn 3 und mehr gleiche Inhalte nacheinander kommen, sonst nicht. Die Tabe...
30.07.2010 22:10:34
Thread-ID: 1169771
5 Beiträge
nach gleichen Werten in Markierung suchen
Fiete

Hallo,
möchte in Excel einen markierten Bereich nach gleichen Werten durchsuchen und diese dann farblich markieren. Kann mich jemand auf die richtige Fährte bringen?
Fiete
26.04.2002 10:33:50
Thread-ID: 116528
5 Beiträge
Anzeige
Zellen mit gleichen Werten markieren
Melanie

Hallo Liebe Excel-Freunde,
ich mochte in einer Tabelle alle Zellen markieren, bei der die Werte aus Zelle B auch in Zelle C vorkommen. Dabei können in Zelle C auch mehrfach Zahlen aus B vorkommen, die müssen auch markiert werden. Sie Beispiel:
Tabelle1 BCDEFGHIJ2TestMaterialnummerW...
17.08.2010 13:53:00
Thread-ID: 1172624
6 Beiträge
Anzeige
Range nach negativen Werten durchsuchen
Daniel


Hallo zusammen,
ich habe versucht aus zwei verschiedenen Skripten dir mir vorlagen, etwas zu kombinieren. Leider funktioniert es aber gar nicht.
Ziel des Skripts sollte es eigentlich sein eine Range nach negativen Werten zu durchsuchen. In der letzen Spalte sollte dann ausgegeben w...
23.08.2010 11:32:10
Thread-ID: 1173700
7 Beiträge
Spalte nach "ähnlichen" Werten durchsuchen
Kai

Hallo,
ich habe eine Adressliste aus mehreren einzelnen Tabellen zusammengefügt und will jetzt die doppelten Einträge löschen. Erschwert wird das ganze durch viele "Schreibfehler" in den Namen (es handelt sich um Firmennamen mit x-verschiedenen Schreibweisen).
Die Tips mit Leerzeichen...
26.10.2010 12:43:21
Thread-ID: 1183857
5 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 suchen und markieren

Schritt-für-Schritt-Anleitung

Um doppelte Werte in Excel zu finden und zu markieren, kannst Du die folgende Schritt-für-Schritt-Anleitung verwenden:

  1. Öffne Excel und lade deine Tabelle, in der Du nach doppelten Werten suchen möchtest.
  2. Markiere den Bereich von A10 bis J1000, wo die Daten eingegeben werden.
  3. Gehe zur Registerkarte "Start" und klicke auf Bedingte Formatierung.
  4. Wähle Regeln zum Hervorheben von Zellen und dann Doppelte Werte.
  5. Wähle die Formatierung aus, die Du für die doppelten Werte verwenden möchtest (z.B. eine rote Füllfarbe).
  6. Klicke auf OK und die doppelten Werte werden nun in der angegebenen Farbe hervorgehoben.

Falls Du eine Excel-Formel verwenden möchtest, um doppelte Werte anzuzeigen, kannst Du die Formel =ZÄHLENWENN($A$10:$J$1000; A10) > 1 in einer Hilfsspalte verwenden.

Häufige Fehler und Lösungen

  • Excel stürzt ab: Wenn Excel abstürzt, kann das an der Überprüfung von leeren Zellen liegen. Stelle sicher, dass Du nur die gefüllten Zeilen überprüfst. Verwende dazu den VBA-Code, der nur die benutzten Zeilen durchläuft.

  • Doppelte Werte werden nicht richtig angezeigt: Überprüfe, ob die Bedingte Formatierung korrekt angewendet wurde. Manchmal können Formatierungsregeln verloren gehen, wenn die Zellen kopiert oder verschoben werden.

Alternative Methoden

  1. VBA-Makro: Wenn Du eine automatisierte Lösung möchtest, kannst Du ein VBA-Makro verwenden, um doppelte Werte zu finden und zu markieren. Hier ist ein einfaches Beispiel:

    Dim i As Long
Dim rng As Range
Application.ScreenUpdating = False
Range("A10:J1000").Interior.ColorIndex = xlNone
For i = 10 To Cells(Rows.Count, 1).End(xlUp).Row
   If WorksheetFunction.CountIf(Range("A10:J1000"), Cells(i, 1)) > 1 Then
       For Each rng In Range("A" & i & ":J" & i)
           rng.Interior.ColorIndex = 3
       Next
   End If
Next
Application.ScreenUpdating = True

  2. Hilfsspalte: Du kannst auch eine Hilfsspalte verwenden, um die Werte zu verketten und mit ZÄHLENWENN nach doppelten Inhalten zu suchen.

Praktische Beispiele

  • Nehmen wir an, Du hast in Zeile 100 folgende Werte: 1, abx, klm, 123, abs, abt, 0987, 4568, xxx. Wenn diese gesamte Zeile in Zeile 600 wiederholt wird, sollte das Makro oder die bedingte Formatierung diese Zeile farblich markieren.

  • Beispiel für die Verwendung von ZÄHLENWENN:

    =ZÄHLENWENN(A10:J1000; A10) > 1

Tipps für Profis

  • Verwende Tastenkombinationen wie Alt + H + L für die bedingte Formatierung, um die Schritte schneller auszuführen.
  • Du kannst die Bedingte Formatierung auch kombinieren, um komplexere Bedingungen für das Markieren von doppelten Werten zu schaffen.
  • Bei großen Datenmengen kann es hilfreich sein, die Daten vor der Überprüfung zu sortieren, um die Suche zu erleichtern.

FAQ: Häufige Fragen

1. Wie finde ich doppelte Werte in einer Zeile?
Du kannst die bedingte Formatierung nutzen, um doppelte Werte in einer Zeile anzuzeigen. Wähle den entsprechenden Bereich aus und wende die Regel für doppelte Werte an.

2. Was mache ich, wenn Excel ständig abstürzt?
Stelle sicher, dass Du nur die benutzten Zellen überprüfst und alle leeren Zellen aus dem Bereich ausschließt. Verwende ein VBA-Makro, das nur bis zur letzten benutzten Zeile geht.

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