=СЖПРОБЕЛЫ(ЛЕВСИМВ(ПРАВСИМВ(ПОДСТАВИТЬ(A1;"/";ПОВТОР(" ";99));198);99))
Задача схожа с "Как выделить доменное имя с ячейки Excel?". Взято отсюда. Public Function GetDataFromString(target As Range, sDelimiter As String) As String
If InStr(target.Value2, sDelimiter) > 0 Then
Dim arr
arr = Split(target.Value2, sDelimiter)
GetDataFromString = arr(UBound(arr) - 1)
End If
End Function