Извлечение искомого буквенного и числового значенияиз текста

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Извлечение искомого буквенного и числового значенияиз текста (Формулы/Formulas)

Lis

Дата: Вторник, 26.03.2019, 11:01 | Сообщение № 1

Группа: Пользователи

Ранг: Новичок

Сообщений: 16

Репутация: 0 ±

Замечаний: 0% ±

Excel 2016

Добрый день!Помогите правильно прописать формулу.Мне нужно из текста извлечь только артикул.Он может быть один, может несколько.Пример во вложении.Спасибо.

К сообщению приложен файл: 4991480.xlsx (9.3 Kb)

Ответить

sboy

Дата: Вторник, 26.03.2019, 15:43 | Сообщение № 2

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2566

Репутация: 724 ±

Замечаний: 0% ±

Excel 2010

Добрый день.
Маловато вариантов для такого рода задач.
Для примера
[vba]

Код

Function Lis(t As String) As String
    With CreateObject("VBScript.RegExp")
        .Global = True
        .Pattern = "[А-Я]{2}-\d{8}"
        If .test(t) Then
            For i = 0 To .Execute(t).Count - 1
                Lis = Lis & .Execute(t)(i) & " "
            Next
        End If
    End With
End Function

[/vba]