Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
19.04.2024 17:05:40
Zählen von Zeilen, in denen in bestimmten Bereich Daten sind
19.04.2024 16:34:52
gemeinsamer Filter über drei Spalten
19.04.2024 15:39:42
Exceltabelle daten per combobox zu word Datei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
896to900
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
896to900
896to900
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Finden mit oder kombinieren

Finden mit oder kombinieren
14.08.2007 18:52:56
Heinz
Hallo Excellenten,
folgendes Problem:
Ich habe zwei Spalten:
In ersten Spalte sind pro Zelle mehrere Wörter enthalten,
die jeweils mit einem Struchpunkt getrennt sind.
z.B.
Huber; Meyer; Schmidt; Kowalski;
Huber; Doran;
Kreiger; Durmwall;
Ich möchte in einer zweiten Spalte ausgeben,
ob z.B. Huber oder Doran vorkommen.
Wenn mindestens einer der vorgegebenen
Namen auftauchen, dann soll in der zweiten
Spalte z.B. eine
1 "erscheinen".
Sinngemäß (in Zelle B1):
=Wenn(Finden(Oder("Huber";"Doran"));A1;1)
Aber so geht's leider nicht.
Ich freue mich auf Eure Vorschläge und
wünsche allen einen schönen Abend.
MFG
Heinz

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Finden mit oder kombinieren
14.08.2007 19:40:12
Chaos
Servus Heinz,
per Makro könnte man das so lösen:

Sub schau()
Dim z As Range, b As Range, z1 As Range, b1 As Range
Dim n As String, s As String
Dim r As Long
r = Range("A65536").End(xlUp).Offset(0, 0).Row
Set b = Range("A1:A" & r)
For Each z In b
On Error Resume Next
s = z.Find(what:="Huber", LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext,  _
MatchCase:=False).Row
Range("B" & s).Value = 1
Next z
Set b1 = Range("A1:A" & r)
For Each z1 In b1
On Error Resume Next
n = z1.Find(what:="Doran", LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False).Row
Range("B" & n).Value = 1
Next z1
End Sub


Hier wird jetzt Spalte A im beschriebenen Bereich abgesucht und in Spalte B eine 1 geschrieben, wenn vorhanden.
Gruß
Chaos

Anzeige
AW: Finden mit oder kombinieren
14.08.2007 19:49:25
Jörg
Hallo Heinz
=WENN(ZÄHLENWENN(A1;"*Huber*")+ZÄHLENWENN(A1;"*Doran*");1;0)
Gruß Jörg

Huber und/oder Doran per Formel
14.08.2007 19:49:29
WF
Hi Heinz,
=(ISTZAHL(FINDEN("Huber";A1))+ISTZAHL(FINDEN("Doran";A1))>0)*1
und runterkopieren
Salut WF

AW: Huber und/oder Doran per Formel
15.08.2007 10:49:00
Heinz
Hallo Excellenten,
vielen Dank.
Da ich mit Makros nicht so viel
am Hut habe (bewundere aber
alle, die damit umgehen können), bevorzuge ich
die Formel-Lösung von WF.
Aber Danke an alle (ist immer
gut wenn man mehrere Alternativen
hat).
Schönen Tag noch
Heinz

noch eine Variante
15.08.2007 20:30:00
FP
Hallo Heinz,
=ODER(WECHSELN(A1;{"Huber";"Doran"};)A1)+0
Anzeige

6 Forumthreads zu ähnlichen Themen

VBA: find und instr oder iserror kombinieren
tomcatoggo

Hallo!
da ich jetzt etliche Stunden an diesem Problem hänge und einfach gar nicht verstehe, warum so eine (so dachte ich das zumindest) super simple Sache sich nicht lösen lässt, frage ich jetzt mal hier nach:
Ich denke ich brauche hier nix extra hochladen... hier die Beschreibung:
...
13.11.2014 15:26:30
Thread-ID: 1392217
6 Beiträge
Anzeige
"SUMMEWENN" und "ODER" kombinieren!?
Torsten

Hallo zusammen,
ich benötige eine Anpassung der nachstehenden Formel, finde aber selbst keine Lösung…
Die Formel
SUMMEWENN('Large orders'!A:B;A14;'Large orders'!B:B))
funktioniert einwandfrei bei mir, müsste allerdings ergänzt werden, so dass diese Summe nur dann gebildet wird,...
19.09.2018 13:31:11
Thread-ID: 1646497
2 Beiträge
Wenn mit und oder kombinieren
Hartmut

Guten Morgen zusammen,
ich habe zwei Spalten (A und B) in der über eine Indexformel Datumswerte importiert werden. In der dritten Spalte "C" wird bei vorhandensein nur eine 1 eingetragen und kein automatischer Wert. Wenn ich nun eine "wenn(und(oder)) Kombiantion benutze dann bekomme ich imm...
25.01.2019 07:19:14
Thread-ID: 1670758
7 Beiträge
Anzeige
Wenn/Und/Oder Funktionen kombinieren
Andreas

Hallo, ich möchte die Tabelle so auswerten, dass ich das u.g. Ergebniss erziele.
Spalte A + B sind Vorgaben und Spalte C stellt das Ergebnis da.
.........A..............................B........................C
1...Art..............................Anlage............Ergebnis
2...In...
07.10.2005 14:28:04
Thread-ID: 678441
8 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
1
1
6
4
7