VBA - По регулярному выражению выбрать часть текста

Iska · Отправлено: **17:13, 25-05-2021** | #2

Цитата blackeangel:

Надо из строки
АБВГ.123456.789.ДЕЖЗ9876-23 »

Ещё примеры строк, пожалуйста. С десяток.

shisik · Конфигурация компьютера

Выражения \d+{6} и \d+{3} некорректны. + обозначает 1 или более символов, а {3} - ровно 3.

blackeangel · Отправлено: **20:57, 25-05-2021** | #4

Да всё,я уже отмучился)
Если интересно, то так

Код:

Sub MMM()
SS = "АБВГ.123456.789.ДЕЖЗ9876-23"
With CreateObject("VBScript.RegExp")
  .Pattern = "^[А-Яа-я]{4}\.\d{6}\.\d{3}(\-\d{1,3})?"
  MsgBox (.Execute(SS).Item(0))
 End With
End Sub

blackeangel · Отправлено: **21:15, 25-05-2021** | #5

Но, но, красивые исполнения, тоже можно поглядеть

Iska · Отправлено: **22:04, 25-05-2021** | #6

Цитата blackeangel:

Да всё,я уже отмучился) »

Ещё нет.

1. Что это за «?» в конце выражения?
2. Сначала нужно сделать .Test() и, если данный метод вернёт True — только тогда выполнять метод .Execute() и обращаться к классу MatchCollection.

blackeangel · Отправлено: **22:07, 25-05-2021** | #7

Iska, 1. Что данное в скобках может быть, а может и не быть. Вы мне сами когда то в 2017 году делали такое

2. Согласен. Всё должно быть красиво. И правильно.

shisik · Конфигурация компьютера

Цитата Iska:

1. Что это за «?» в конце выражения? »

Опциональная часть (\-\d{1,3})?

blackeangel, кстати если из содержимого скобок не нужно создавать группу в результате, то можно поставить ?:

Код:

(?:\-\d{1,3})?