Страницы: 1
RSS
Подскажите как выделисть часть текстовой строки в другую ячейку.
 
Добрый день.Подскажите, каким образом можно вытащить часть текстовой строки в другую ячейку?
Пример строки : {У компании «Салон красоты PurPur» (ID компании: 958024) была активность в личном кабинете}.
Необходимо в соседней ячейке выделить цифровое значение 958024.

Ситуация осложняется тем, что в разных строках номер компании расположен на разном расстоянии от начала строки, и сам номер может состоять из различного количества знаков ( например : 4533 или 5455887).

Кроме искомого номера компании других цифровых значений в строке нет.
 
UDF
Код
Function GetNum(sText)
    Dim re As Object
    Set re = CreateObject("VBScript.RegExp")
    re.Pattern = "\d+"
    GetNum = re.Execute(sText)(0)
    Set re = Nothing
End Function
There is no knowledge that is not power
 
Пример данных будет? Можно формулу нарисовать.
(ID компании: 958024)  - всегда ID? Всегда скобки?
Страницы: 1
Наверх