формула для данных

[Aleksver2008]

Ребят помогите нужна формула которая будет отделять последние цифры кода в отдельные ячейки проблема в том что кол-во знаков разное в конце

4A03-FW MX06 10
2A10 13-2806/White 100
3A03-FN MX06 8
3A03-FN MX06 12

[IgorGO]

Ваши данные в колонке А, начиная с А1
копируете этот

=ПСТР(A1;МАКС((ПСТР(A1;СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;ДЛСТР(A1)));1)=" ")*СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;ДЛСТР(A1))))+1;99)

в любую ячейку, это формула массива, т.е. после копирования жмете не Enter, а Ctrl+Shift+Enter

[svsh2016]

добрый вечер,вариант функции uuu в столбце D,преимущество таких функций-это простота

Function uuu%(t$)
 With CreateObject("VBScript.RegExp"): .Pattern = "\d+$"
    uuu = .Execute(t)(0)
 End With
End Function

[Aleksver2008]

Огромное спасибо )))) все работает. думал как это сделать очень долго.

[Aleksver2008]

Сообщение от IgorGO

Ваши данные в колонке А, начиная с А1
копируете этот

=ПСТР(A1;МАКС((ПСТР(A1;СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;ДЛСТР(A1)));1)=" ")*СТРОКА(ИНДЕКС(A:A;1):ИНДЕКС(A:A;ДЛСТР(A1))))+1;99)

в любую ячейку, это формула массива, т.е. после копирования жмете не Enter, а Ctrl+Shift+Enter

Огромное спасибо )))) все работает. думал как это сделать очень долго.

[svsh2016]

добавил функцию uuu1 в столбец C для текста

 Function uuu1$(t$)
 With CreateObject("VBScript.RegExp"): .Pattern = "(.+ )" & "\d+$"
    uuu1 = .Execute(t)(0).Submatches(0)
 End With
End Function

[Aleksver2008]

Сообщение от svsh2016

добавил функцию uuu1 в столбец C для текста

 Function uuu1$(t$)
 With CreateObject("VBScript.RegExp"): .Pattern = "(.+ )" & "\d+$"
    uuu1 = .Execute(t)(0).Submatches(0)
 End With
End Function

Спасибо.

[svsh2016]

добавлю,для текста можно,как вариант и так

Function uuu3$(t$)
 With CreateObject("VBScript.RegExp"): .Pattern = "\d+$"
    uuu3 = .Replace(t, "")
 End With
End Function

[svsh2016]

доброго времени суток,добавляю для текста функцию uuu5 в столбце I без регулярок.

Function uuu5$(t$)
  uuu5 = Replace(t, Split(t)(UBound(Split(t))), "")
End Function

[IgorGO]

которая будет отделять последние цифры кода в отдельные ячейки

видимо предполагалось:

uuu3 = .execute(t)(0)
и
uuu5 = Split(t)(UBound(Split(t)))