Добрый вечер, всех поздравляю с переездом ))) Нужно из ячейки с данными вычистить мусор в виде всяких "(", " ;) ", "-". Эти ненужные данные могут быть разными, это получается сделать через вложенные ПОДСТАВИТЬ. Формула имеет следующий вид =ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(ПОДСТАВИТЬ(E6;"()";"" ;) ;" ;) ";"" ;) ;"(";"" ;) ;"-";"" ;) В принципе не так уж и сложно прописать вложенные ПОДСТАВИТЬ. Но благодаря Виктору (Vikttur), узнал про массив констант, и теперь использую их там где можно. Однако если прописать массив констант для ПОДСТАВИТЬ, формула имеет следующий вид =ПОДСТАВИТЬ(E6;{" ;) ";"(";"()";"-"};"" ;) , работать не хочет. Подскажите пожалуйста почему не работает?
Function iReplace(s$, p1$, Optional p2$ = "")
x1 = Split(Left(p1, Len(p1) - 1), Right(p1, 1))
If p2 > "" Then x2 = Split(Left(p2, Len(p2) - 1), Right(p2, 1)) Else x2 = Array()
For i% = 0 To UBound(x1)
If UBound(x2) < i Then ss$ = "" Else ss = x2(i)
s = R eplace(s, x1(i), ss)
Next
iReplace = s
End F unction