Hallo
Ich versuche mich gerade daran einen Namen aus einem String zu finden.
A |
B |
C |
D |
E |
F |
Objekt Referenz |
Alarm |
Hand |
Alarm/Event Freigabe |
Name |
Beschreibung |
//kles 0282 Bad Hersfeld/ghdt |
|
|
|
0282_444_AN005_X31_4711 |
0282_ Bad Hersfeld_ISP 1 AV S&S_Strommessung Phase 1 |
In der Zelle F2 befindet sich der Namen "0282_ Bad Hersfeld"
Diesen möchte ich nutzen um ein neues Sheet zu erstellen und später die Tabelle mit diesen Namen zu Speichern.
Um den Namen zu finden nutze ich, das hinter dem Namen die Zeichenfolge "_ISP" folgt.
Mein Code:
Dim StrBeschreib As String
Dim Ort As String
Dim Zeichenzahl As Integer
StrBeschreib = "F2"
Zeichenzahl = InStr(1, StrBeschreib, "_ISP")
Ort = Left("F2", Zeichenzahl)
Debug.Print Ort
Ich hatte zuvor bereits Versucht den StrBeschreib zu umgehen, indem ich den Code so abänderte:
Zeichenzahl = InStr(1, "F2", "_ISP")
In beiden Fällen bekomme ich eine "0" als Ergebniss zurück.
Ich verstehe nicht warum.
Wäre Nett wenn ihr mir helfen könntet.
Danke
|