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

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

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

06.02.2022 18:50:37

Добрый вечер всем !

Как обработать значение переменной folderPath типа
G:\Рабочий стол 180121\3-Приборы 2022\Таблица1\Мои товары\4-датчик фортуна1-56432
G:\Рабочий стол 180121\3-Приборы 2022\Таблица2\Мои товары\4-датчик фортуна2-364327
G:\Рабочий стол 180121\3-Приборы 2022\Таблица3\Мои товары\4-датчик фортуна3-3643
G:\Рабочий стол 180121\3-Приборы 2022\Таблица3\Мои товары\4-датчик фортуна4-36
Числа мб 2-6 значныете

после обработки переменной должно остаться
56432
364327
3643
36
чтоб оставить макросом или функцией только последние числа после последнего тире

vikttur

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

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

06.02.2022 19:01:38

Код
NumBumTrum = Mid$(folderPath, InStrRev(folderPath, "-")+1)

И хоть 10-значные...

Ігор Гончаренко

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

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

06.02.2022 19:02:28

Код
Function LastDigits(s$) Dim re Set re = CreateObject("VBSCript.RegExp"): re.Pattern = "\d+$" If re.test(s) Then LastDigits = Val(re.Execute(s)(0)) End Function

Программисты - это люди, решающие проблемы, о существовании которых Вы не подозревали, методами, которых Вы не понимаете!

OlegEgv Пользователь Сообщений: 13 Регистрация: 01.02.2022	#4 06.02.2022 19:09:22 Благодарю ! Оба способа работают как надо !