Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 00:42:03
Listbox mit gefilterten Daten füllen
24.04.2024 20:38:58
Summe mit Bedingung, nur letzte Ergebnisse anzeigen
24.04.2024 19:29:30
Formel filter
24.04.2024 18:49:56
merge & select
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1240to1244
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
1240to1244
1240to1244
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

aktiven Zelle mit der Liste vergleichen

aktiven Zelle mit der Liste vergleichen
Karsten
Hallo,
ich möchte den Inhalt der aktiven Zelle mit der Liste auf Blatt "Autokorrektur" B5:B20000 vergleichen.
Die aktiven Zelle kann auf einem anderen Blatt sein.
Wenn es schon einen Inhalt gibt, soll Exit Sub kommen, wenn nicht, dann meine weiteren Befehle.
Vielleicht kann mir jemand mit einem Code weiterhelfen?
Danke
Gruß
Karsten

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

Betreff
Benutzer
Anzeige
AW: aktiven Zelle mit der Liste vergleichen
12.12.2011 02:11:43
fcs
Hallo Karsten,
hier ein Beispiel, wie du es lösen kannst. Die Meldungen kannst du ja rausnehmen wenn es funktioniert.
Gruß
Franz 
Sub CheckAutokorrektur()
Dim varWert, varZeile, rngSuche As Range
Set rngSuche = Worksheets("Autokorrektur").Range("B5:B20000")
varWert = ActiveCell.Value
If varWert = "" Then
'do nothing
MsgBox "Aktive Zelle ist leer, da find ich nix" 'Testzeile
GoTo Beenden
Else
varZeile = Application.Match(varWert, rngSuche, 0)
If Not IsError(varZeile) Then
If varWert = rngSuche.Cells(varZeile, 1).Value Then
MsgBox "Der Wert """ & varWert & """ steht in Zeile " & varZeile _
& " der Liste" 'Testzeile
'do nothing
GoTo Beenden
Else
MsgBox "Groß/Kleinschreibung ist unterschiedlich" & vbLf _
& "Aktive Zelle: " & varWert & vbLf _
& "Liste:             " & rngSuche.Cells(varZeile, 1).Value 'Testzeile
'        Goto Beenden
End If
Else
MsgBox "Den Wert """ & varWert & """ gibt es noch nicht in der Liste" 'Testzeile
End If
'usw.
End If
Beenden:
Set rngSuche = Nothing
End Sub

Anzeige
AW: aktiven Zelle mit der Liste vergleichen
12.12.2011 08:11:11
Karsten
Hallo Franz,
danke, es funktioniert bestens.
Gruß
Karsten

245 Forumthreads zu ähnlichen Themen

Textteile in Zellen mit Liste vergleichen
susidimarca

Hallo,
ich habe derzeit ein kniffeliges Excelproblem.
ich möchte gerne den Text in Zellen
hjgshgjdf Kriterium2 kjhfkjhfksdjhf
dskj Kriterium1 ajdhasjdhakjdhakdhajkdhajkdakj
daudzauizdaiudzaidzaisdz Kriterium3 kajhdasks
mit den Kriterium eine anderen Tabelle vergleichen...
21.08.2008 10:05:00
Thread-ID: 1003378
6 Beiträge
Anzeige
Wert mit Enter in Liste & speichern
adrian

Hallo, bin noch Anfänger & habe noch ein kleines Problem =/
Habe eine Textbox als Userform und möchte diese in dieser etwas mit der "Entertaste" eingeben, was dann in einer Zelle auf dem Sheet gespeichert wird.
Die Abfrage des gespeicherten Werts funktioniert schon mal =)
nur da...
31.10.2008 11:29:11
Thread-ID: 1020826
2 Beiträge
Spalten vergleichen und Nummern ausgeben ?
Günther

Hallo zusammen,
kann mir bitte jemand hierbei helfen:
in Spalte E geb ich Nummern ein, diese sollen mit denen aus Spalte AA verglichen werden.
Bei Übereinstimmung soll die Nummer aus AB in L ausgegeben werden.
E---- L--- AA-- AB
15-- 2--- 10-- 1
30-- 5--- 15-- 2
1...
12.03.2009 15:49:14
Thread-ID: 1059522
5 Beiträge
Anzeige
Werte in Spalte vergleichen und Mittelwert bilden
Micha2009

Hallo liebe Excel Freunde.
Ich sitze vor einem Problem und hoffe mir kann einer helfen.
Mein Problem ist folgendes.
Eine Tabelle mit 3 Spalten.
1. Datum, 2. Zeit, 3. Werte
Nun versuche ich alle Werte mit gleichem Datum zu mitteln und in eine neue Spalte G mit zugehörigem Dat...
30.09.2009 12:23:08
Thread-ID: 1106408
5 Beiträge
Matrix mit Werten vergleichen und farblich darstel
pointofview

Hallo und einen schönen guten Tag,
ich habe folgende Problemstellung. In einem Tabellenblatt "Rechenblatt" sind in Spalte A Höhenwerte (Range("A5:A45") und in Zeile 46 Breitenwerte (Range("B46:CD46") eines flächenabhängigen Produktes.
Im Datenbereich (Range("B5:CD45")) stehen nun Werte...
07.10.2009 16:55:44
Thread-ID: 1107930
13 Beiträge
berechneten Wert mit Datenliste vergleichen | Herbers Excel-Forum
Benni
Hallo VBA'ler,
Bei meinem Problem möchte ich einen berechneten Wert (6,61) mit einer Datenliste vergleichen und aus dieser, den nächt höheren Wert ausgeben. In diesem Beispiel 8.
Ich hab das ganze über eine verschachtelte WENN-Funktion gelöst, einziger nachteil ist, dass ich nicht mehr wie...
11.01.2010 13:18:36
Thread-ID: 1128855
2 Beiträge
Zellen in 2 Spalten vergleichen und Wert schreiben
Marcel84

Hallo zusammen,
ich habe folgendes Anliegen:
Und zwar habe ich die Spalten E, F und G.
Da ich hier eine Datenbankabfrage via VBA mache, hätte ich noch gerne via VBA folgendes abgefragt.
Und zwar wenn eine Zelle in der Spalte G den Wert 0 haben sollte, dann soll in derselben Zeil...
05.05.2010 11:47:44
Thread-ID: 1155547
7 Beiträge
Spalten auslesen und Wert ausgeben mit W_Change+Se
info@edv-fiegl.de

Hallo zusammen,
ich habe ein Problem mit meinem Makro. Ich möchte in Spalte B einige hundert Artikelnummern einkopieren und ein Makro soll mir dann in Spalte C den Wert ausgeben. Das Auslesen des Produktes funzt schon leider bringe ich es nur so hin dass der ausgelesene Wert in eine bestimm...
20.07.2010 12:39:11
Thread-ID: 1167867
4 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
5
7
1
4
10
4
12
1
6
3
4
3
5
3
6
11
4
4
1
1
7
3
1
3
3