Я создал функцию 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 = Left(f2, a - 2)
LOJA = f3
End Function
И он работал точно так же, как и предполагалось, я даже запустил функцию на всех необходимых линиях 300 КБ.
Но перед обедом я сохранил Excel и закрыл его, и когда я вернулся, функция продолжала выдавать мне эту ошибку, меньшие функции, такие как она, также выдают такую же ошибку, как:
Function Center(x As String)
Dim a As Integer
Dim f As String
a = InStr(1, x, "-")
f = Right(x, Len(x) - a)
Center = f
End Function
Есть идеи, что случилось? Что можно сделать, чтобы решить эту проблему?
Заранее спасибо.