Eu criei uma função VBA:
Function LOJA(x As String)
Dim a As Integer
Dim f As String
Dim f2 As String
Dim f3 As String
a = InStr(1, x, "-")
f = Right(x, Len(x) - a)
a = InStr(1, f, "-")
f2 = Right(f, Len(f) - a)
a = InStr(1, f2, "-")
f3 = Lef...
14.04.2016 / 18:48