Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Microsoft Access Новый топик    Ответить
 Регулярные выражения и Access VBA (!)  [new]
TeylorV
Member

Откуда:
Сообщений: 1
Доброго времени суток.
Помогите правильно написать регулярное выражение и объяснить, как встроить в дальнейшем эту функцию к полю в отчете. Уже 4 дня копаюсь, но так ни до чего и не дошел.

Примеры:
Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu (АС 2 кл.)
(К 20-05-20) Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu (АС 2 кл.)

В поле через регулярное выражение хочется выдернуть центральную часть текста (красная), отсекая все лишнее.
18 фев 21, 15:11    [22282891]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
court
Member

Откуда:
Сообщений: 2271
Function test2(s As String)
    With CreateObject("VBScript.RegExp")
        .Global = True
        .IgnoreCase = True
        .Multiline = True
        .Pattern = "[\(\[].*?[\)\]]"
        
        test2 = Trim(.Replace(s, ""))
    End With
End Function

?test2("Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu (АС 2 кл.)")
Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu 
?test2("(К 20-05-20) Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu (АС 2 кл.)")
Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu
18 фев 21, 16:00    [22282936]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
sdku
Member

Откуда: Краснодар
Сообщений: 7269
Я не спец в маркировке муфт,но кое-что понимаю в ACCESS
Муфта 4ПКВтнг-HF1- 10-25-Пр-Cu(АС-2 кл) как мне кажется есть какая-то маркировка,которая содержит информацию о нескольких характеристиках(материал,размеры и т.д).А одно из основных правил "базостроения" гласит что в поле должна содержаться неделимая(атомарная) единица информации. Строку гораздо проще собрать, нежели что-либо выделить из нее (по различным для каждого случая критериям).
Не проще ли обратить свой взор в сторону маркировки изделий
(как-то так:тип>материал>размеры)

Сообщение было отредактировано: 18 фев 21, 16:39
18 фев 21, 16:37    [22282958]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
sdku
Member

Откуда: Краснодар
Сообщений: 7269
.

Сообщение было отредактировано: 18 фев 21, 16:37
18 фев 21, 16:42    [22282966]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
sdku
Member

Откуда: Краснодар
Сообщений: 7269
.
18 фев 21, 16:43    [22282967]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
DarkMan
Member

Откуда:
Сообщений: 900
sdku
.

Вы сам с собой общаетесь ?
18 фев 21, 16:53    [22282975]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
Кривцов Анатолий
Member

Откуда:
Сообщений: 616
TeylorV, для вашего примера регулярные вырвжения не нужны. Находите 1-ю ")", затем 2-ю "(", и вынимаете текст между ними.
18 фев 21, 16:54    [22282976]     Ответить | Цитировать Сообщить модератору
 Re: Регулярные выражения и Access VBA (!)  [new]
sdku
Member

Откуда: Краснодар
Сообщений: 7269
DarkMan,
Неее,мыша заглючила....
18 фев 21, 19:10    [22283054]     Ответить | Цитировать Сообщить модератору
Все форумы / Microsoft Access Ответить