|
Wenn ich richtig verstehe, möchtest Du aus einer Zeichenkette (bspw.: "1234_Name") die Nummer haben, um damit im Dateisystem zu prüfen, ob diese Datei vorhanden ist.
Du nimmst die Zeichenketten und splittest diese in ein Array.
Erstes Element beinhaltet dann "1234"
Zweites Element beinhaltet dann "Name"
Beispielcode:
Dim vRet As Variant
vRet = Split("1234_Name", "_")
MsgBox vRet(0) & vbNewLine & vRet(1)
Du kannst auch direkt die Datenfelder aus der Funktion zurückgeben lassen:
MsgBox Split("1234_Name", "_")(0) 'Erstes Element: 1234
oder
MsgBox Split("1234_Name", "_")(1) 'Zweites Element: Name
usw usf
|