Получить номер договора после ДК

Zhura777 Пользователь Сообщений: 38 Регистрация: 21.03.2018	#1 21.03.2018 14:20:23 Нужна помощь! нужно выделить определенный текст в строке. Точнее нужен № договора, который идет после ДК. См пример Прикрепленные файлы 888.xlsx (29.5 КБ)

Сергей

Пользователь

Сообщений: 11251 Регистрация: 01.01.1970

21.03.2018 14:24:29

вариант

Код
=ПОДСТАВИТЬ(ПСТР(A2;НАЙТИ("ДК";A2)+3;100);")";"")

Лень двигатель прогресса, доказано!!!

Zhura777 Пользователь Сообщений: 38 Регистрация: 21.03.2018	#3 21.03.2018 14:32:42 Спасибо, Вы ГЕНИЙ!

кузя1972

Пользователь

Сообщений: 189 Регистрация: 10.12.2017

21.03.2018 17:26:28

вариант функций в столбце D

Код

Function bbb$(text$)
  With CreateObject("VBScript.RegExp"): .Pattern = "ДК №.+(?=\))"
       bbb = Mid(.Execute(text)(0), 4)
  End With
End Function

Function aaa$(text$)
  With CreateObject("VBScript.RegExp"): .Pattern = "ДК (№.+)(?=\))"
       aaa = .Execute(text)(0).Submatches(0)
  End With
End Function

Прикрепленные файлы

example_21_03_2018_Кузя_номер _договора.xls (102 КБ)

Изменено: кузя1972 - 21.03.2018 18:35:01