Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1580to1584
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
Teilstring in String
25.09.2017 12:57:07
Peter
Hallo Zusammen,
ich bitte um Eure Hilfe.
Es soll eine if-Anweisung ausgeführt werden, wenn ein Textteil in einem anderen Text erhalten ist.
Z.B.
str1=Peter Meier
Str2= C:\Adresse\Berlin\Haus und Garten\Peter Meier-Kunde.xlsx
If InStr(1, str2,str1) > 1 Then
MsgBox ("Kunde nicht gefunden!")
GoTo Ende
End If
Dieser Befehl funtioniert nicht.
Wie müsste es aber richtig sein?
LG, Peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Teilstring in String
25.09.2017 13:04:50
UweD
Passt doch.
Du ziehst nur den falschen Schluss
zurückgegeben wird die Position des Vorkommens
wenn =0 dann nicht vorhanden

If InStr(1, Str2, Str1) = 0 Then
MsgBox ("Kunde nicht gefunden!")
GoTo Ende
End If
LG UweD
AW: Teilstring in String
25.09.2017 13:11:26
Luschi
Hallo Peter,
...und die Variablen sind falsch zugewiesen:

Sub test1()
Dim str1$, str2$
str1 = "Peter Meier"
str2 = "C:\Adresse\Berlin\Haus und Garten\Peter Meier-Kunde.xlsx"
If InStr(1, str2, str1, vbTextCompare) = 0 Then
MsgBox ("Kunde nicht gefunden!"), vbSystemModal + 16, "Leider..."
GoTo Ende
Else
MsgBox "Hurra...", vbSystemModal + 48, "gefunden!!!"
End If
Ende:
End Sub

Gruß von Luschi
aus klein-Paris
Anzeige
AW: Teilstring in String
25.09.2017 13:35:54
Peter
Hallo Zusammen,
vielen Dank!
So funktioniert es"
Lg, Peter

117 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige