easy mate, just mundane code

try using the mid() with a counter going backwards, that looks for the "\", once found then cut using the mid() command

OK

try

Code:

---

MsgBox Left(TestString, InStrRev(TestString, "\") - 1) & Mid(TestString, InStrRev(TestString, "\") + 1)

---