А как можно решить с помощью формул такую нетривиальную задачу
есть некий типовой тест такого содержания
Цитата
период времени с 14.02.2017 с 16:00 часа по 15.02.2017 г. 04:00 часа неустановленное лицо, находясь на законных основаниях в доме … по ул. Веселая, с. Южное, Республики Крым, тайно похитило: ноутбук «Asus» X54 C-SX8480 стоимостью 5000 рублей, мобильный телефон «Самсунг» стоимостью 1000 рублей, икону «Божией матери» стоимостью 4000 рублей, икону «Иисуса Христа» стоимостью 3000 рублей принадлежащие Б. чем причинило значительный имущественный ущерб Б. на общую сумму 13000 рублей.
как извлечь текст находящийся между словами "на общую сумму" и "рублей" то есть 13000?
Function vvv(t$)
With CreateObject("VBScript.RegExp"): .Pattern = "на общую сумму (\d+) рублей"
If .test(t) Then vvv = .Execute(t)(0).Submatches(0) Else vvv = t
End With
End Function
Alexanderr, я бы вашу формулу сократил до =13000 + такой формулы в том, что она будет работать стабильно, даже если общая сумма равна 12999, как заметил Виктор
Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!