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
1788to1792
1788to1792
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Makro soll doppelte Werte suchen

Forumthread: Makro soll doppelte Werte suchen

Makro soll doppelte Werte suchen
01.11.2020 16:34:42
Christian
Hallo, ich gebe zu ich habe nicht viel Ahnung von VBA aber ich versuche mich mal
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 5 And Target  "" Then
If WorksheetFunction.CountIf(Columns(1), Target) > 1 Then
MsgBox "Doppelt"
End If
End If
End Sub
Mein Ziel ist recht einfach, wenn ich einen Text in Spalte E einfüge, soll geprüft werden ob der Text bereits in dieser Spalte steht und wenn ja die Meldung ausgegeben werden.
Allerdings wenn ich den Text von E2 nach E3 kopiere, passiert nichts, wo ist mein Fehler?
Vielen Dank
Christian
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Makro soll doppelte Werte suchen
01.11.2020 16:42:02
Hajo_Zi
Hallo Christian
Du trägst in Spalte E ein prüftst aber in Spalte A.

Columns(5) denke ich...
01.11.2020 16:45:23
Helmut
AW: Makro soll doppelte Werte suchen
01.11.2020 20:46:36
GerdL
Moin, ja! 

Private Sub Worksheet_Change(ByVal Target As Range)
Dim C As Range
If Not Intersect(Target, Columns(5)) Is Nothing Then
For Each C In Intersect(Target, Columns(5))
If WorksheetFunction.CountIf(C.EntireColumn, C) > 1 Then
MsgBox WorksheetFunction.CountIf(C.EntireColumn, C) & " mal!"
End If
Exit For
Next
End If
End Sub

Gruß Gerd
Anzeige
AW: Makro soll doppelte Werte suchen
01.11.2020 20:52:35
Daniel
Hi
das geht im Prinzip auch ohne Makro.
erstelle für die Spalte E die Gültigkeitsprüfung mit der Einstellung "Benutzerdefiniert" mit der Formel: =ZählenWenn(E:E;E1)=1
E1 sollte dabei die aktive Zelle sein (bzw du musst die Formel hier für die Aktive Zelle schreiben)
den Meldungstext kannst du dann im Reiter Fehlermeldung eingeben.
Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Bedingte Formatierung - Datenbalken bei neg Werten
Gianleandro

Ich suche nach einer Möglichkeit die Datenbalken bei der bedingten Formatierung auch für negative Werte zu nutzen. Dabei schwebt mir eine Art Spielgelung der Datenbalken bei negativen Werten vor.
Wer hat dazu eine Idee?
https://www.herber.de/bbs/user/55283.xlsx
09.09.2008 14:22:24
Thread-ID: 1008498
3 Beiträge
Anzeige
Wert finden und relativen Bereich markieren
Luca-Darius

Hallo, ich suche nach einer Lösung für das folgende Problem einer Toto-Auswertung/13er-Wette.
Ich will zum Beispiel in den Zeilen 1, 15 und 29 (im Bereich A1:AJ1,A15:AJ15,A29:AJ29) nach Zellen suchen, die den Buchstaben X enthalten. Alle Zellen in dem genannten Bereich enthalten entweder de...
23.03.2009 18:44:39
Thread-ID: 1063012
5 Beiträge
duplikate finden und zählen wenn...
Carmen

Hallo zusammen,
hab gleich zwei Punkte an denen ich nicht so recht weiterkomme.
Ich habe eine Tabelle in der Anteilseigner aufgeführt sind, die können mehrfach auftauchen da manche mehrere Trangen an unterschiedlichen Tagen gekauft haben.
Nun sollen die aktiven Anteilseigner in eine...
14.05.2009 14:20:14
Thread-ID: 1075160
4 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
Bedingte Formatierung mit mehreren Werten
Thorsten

Liebe Excel-Gurus,
ich benötige Hilfe bei folgendem Problem.
In der angehängten Tabelle möchte ich gerne, dass die Zeile bzw. das LAS und FAL
sich farblich verändern sobald in irgendeinem der oberen Fraktionen der Wert
Farbe (grün), Farbe (weiß) oder Farbe (braun) ausgewählt wir...
13.07.2009 17:09:04
Thread-ID: 1088289
2 Beiträge
Anzeige
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
identische Einträge farblich markieren
BartekBartek

Hallo zusammen,
ich moechte um fachkundige Hilfe bezüglich folgender Aufgabenstellung bitten:
Ich habe 5 Spalten. IJede Spalte ist für je ein Produkt vorgesehen und in jeder Spalte sind Teilenummern des Produktes aufgelistet.
Nun möchte ich via macro folgendes erreichen:
Wenn In...
08.09.2009 05:33:33
Thread-ID: 1101143
4 Beiträge
Duplikate finden und markieren
gert

Hallo Zusammen,
ich möchte aus einer größeren Tabelle nur die Duplikate markieren. Die Originale sollen verbleiben.
In der Anlage habe ich eine Mustertabelle. Hier werden alle Datensätze dann als Duplikat markiert.
https://www.herber.de/bbs/user/64319.xls
Wer kann mir die Formel...
10.09.2009 15:46:32
Thread-ID: 1101805
3 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
bedingte Formatierung - Zellwerte vergleichen
Thomas

hallo zusammen,
ich nutze seit einigen tagen excel 2007 und es stellt sich folgendes problem:
in einer größeren tabelle möchte ich einen zellwert farblich formatieren, nachdem er mit einem anderen zellwert verglichen wurde.
beispiel:
wenn der zellwert in b6 kleiner als der zellw...
25.11.2009 22:48:05
Thread-ID: 1120129
9 Beiträge
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
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
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