Как из текстовой записи типа "вк-р-нг" выделить цифры. Ограничение: 1. В текстовую запись могут быть заложены только 3 цифры ; 2. В текстовой записи могут быть заложены только однозначные либо двузначные цифры; 3. Формат однозначных цифр может быть только в виде 4 или 6 или 9, запись из однозначных цифр в формате типа 04 или 06 или 09 исключается.
Как из текстовой записи типа "вк-р-нг" выделить цифры. Ограничение: 1. В текстовую запись могут быть заложены только 3 цифры ; 2. В текстовой записи могут быть заложены только однозначные либо двузначные цифры; 3. Формат однозначных цифр может быть только в виде 4 или 6 или 9, запись из однозначных цифр в формате типа 04 или 06 или 09 исключается.Юрий_Нд
Function рег_извлечь(t$, p$, Optional n = 1) Application.Volatile With CreateObject("VBScript.RegExp") If n > 1 Then .Global = True .Pattern = p рег_извлечь = .Execute(t)(n - 1) End With End Function
[/vba]
до кучи UDF[vba]
Код
Function рег_извлечь(t$, p$, Optional n = 1) Application.Volatile With CreateObject("VBScript.RegExp") If n > 1 Then .Global = True .Pattern = p рег_извлечь = .Execute(t)(n - 1) End With End Function
А Вы не могли бы изобразить всё тоже, только с использованием стандартных функций ВБА. Если я не ошибаюсь, то в Вашей функции Вы использовали объекты, которые остались на Вашем компе. Ещё хотелось бы, чтобы цифры имели названия, как в моём первом посте (вк-р-нг), либо вставьте где-то в тексте комментарии, которые помогли бы мне узнать эти цифры.
п.с. Спасибо, но приводить полный текст функции необязательно, только главную часть тела функции, которая разбирает по кусочкам входной аргумент (вк-р-нг) и ещё, как я уже говорил, "подсветить" входной аргумент функции и три цифры "на выхлопе".
А Вы не могли бы изобразить всё тоже, только с использованием стандартных функций ВБА. Если я не ошибаюсь, то в Вашей функции Вы использовали объекты, которые остались на Вашем компе. Ещё хотелось бы, чтобы цифры имели названия, как в моём первом посте (вк-р-нг), либо вставьте где-то в тексте комментарии, которые помогли бы мне узнать эти цифры.
п.с. Спасибо, но приводить полный текст функции необязательно, только главную часть тела функции, которая разбирает по кусочкам входной аргумент (вк-р-нг) и ещё, как я уже говорил, "подсветить" входной аргумент функции и три цифры "на выхлопе".Юрий_Нд
Сообщение отредактировал Юрий_Нд - Суббота, 09.09.2017, 23:29
_Igor_61, К сожалению Ваше "это" не открывается. Если можно поясните кто-нибудь пост номер 6. Насколько я понял, t - это то, что нужно разделить на цифры, p - это какую цифру по счёту нужно извлечь, n - это общее количество цифр, т.е. 3?
_Igor_61, К сожалению Ваше "это" не открывается. Если можно поясните кто-нибудь пост номер 6. Насколько я понял, t - это то, что нужно разделить на цифры, p - это какую цифру по счёту нужно извлечь, n - это общее количество цифр, т.е. 3?Юрий_Нд
Сообщение отредактировал Юрий_Нд - Воскресенье, 10.09.2017, 14:40
Наверное, какие-то глюки на облаке mail.ru. Закачал на яндекс-диск Удалено администрацией Вам and_evg в сообщении №2 говорил про это: вкладка меню "Данные" - "Текст по столбцам", а дальше сами все увидите что делать
Наверное, какие-то глюки на облаке mail.ru. Закачал на яндекс-диск Удалено администрацией Вам and_evg в сообщении №2 говорил про это: вкладка меню "Данные" - "Текст по столбцам", а дальше сами все увидите что делать _Igor_61
Сообщение отредактировал _Igor_61 - Воскресенье, 10.09.2017, 14:57
_Igor_61, Спасибо за интересную подсказку , разобрался. Но на данный момент меня больше интересует код на ВБА. Поэтому был бы очень рад, если бы Вы смогли прокомментировать 6 пост.
_Igor_61, Спасибо за интересную подсказку , разобрался. Но на данный момент меня больше интересует код на ВБА. Поэтому был бы очень рад, если бы Вы смогли прокомментировать 6 пост.Юрий_Нд
"Систематическое нарушение п.3 Правил форума в части сторонних ресурсов". Я понимаю, что "в чужой монастырь со своим уставом не ходят", и администрация наверное вполне обоснованно внесла этот пункт в правила, но: 1."Правила форума (Обязательно прочесть перед созданием тем!)" - тему я не создавал, а отвечал на вопросы. Ну да, упустил этот пункт, можно же было на первый раз на это указать, а не сразу замечания 20% записывать 2.По ссылке было выложено видео собственноручно мной записанное с экрана своего компьютера - в нем ТС-у было показано какие действия нужно сделать чтобы он понял сообщение №2 из этой темы. К сожалению, на форуме не нашел возможности загрузить видео в обсуждаемую тему 3.И поэтому возникло вполне естественное желание навсегда покинуть этот форум, который вроде как бы создан в целях помощи другим, но за эту помощь выписывают помогающим замечания. Понимаю, что для форума это невелика потеря, но мне очень неприятно такое отношение со стороны администрации. ВСЕГО НАИЛУЧШЕГО ВСЕМ!!! Ладно, я тоже погорячился. Ребята, давайте просто будем помогать друг другу, а не выискивать недостатки, ведь форум именно для помощи и создан, как я понимаю. Ну а насчет правил - буду стараться быть внимательней P.S. Блин, только сейчас увидел, что есть кнопка "ВИДЕО"! Не, ну бывает же такое!!!
"Систематическое нарушение п.3 Правил форума в части сторонних ресурсов". Я понимаю, что "в чужой монастырь со своим уставом не ходят", и администрация наверное вполне обоснованно внесла этот пункт в правила, но: 1."Правила форума (Обязательно прочесть перед созданием тем!)" - тему я не создавал, а отвечал на вопросы. Ну да, упустил этот пункт, можно же было на первый раз на это указать, а не сразу замечания 20% записывать 2.По ссылке было выложено видео собственноручно мной записанное с экрана своего компьютера - в нем ТС-у было показано какие действия нужно сделать чтобы он понял сообщение №2 из этой темы. К сожалению, на форуме не нашел возможности загрузить видео в обсуждаемую тему 3.И поэтому возникло вполне естественное желание навсегда покинуть этот форум, который вроде как бы создан в целях помощи другим, но за эту помощь выписывают помогающим замечания. Понимаю, что для форума это невелика потеря, но мне очень неприятно такое отношение со стороны администрации. ВСЕГО НАИЛУЧШЕГО ВСЕМ!!! Ладно, я тоже погорячился. Ребята, давайте просто будем помогать друг другу, а не выискивать недостатки, ведь форум именно для помощи и создан, как я понимаю. Ну а насчет правил - буду стараться быть внимательней P.S. Блин, только сейчас увидел, что есть кнопка "ВИДЕО"! Не, ну бывает же такое!!!_Igor_61
Сообщение отредактировал _Igor_61 - Понедельник, 11.09.2017, 22:17
И снова - неужели Вы хотите сказать, что за 10 месяцев присутствия на форуме Вы ни разу не видели, что модераторы удаляют ссылки на посторонние ресурсы и ругаются на это? Тем более скрины, которые прекрасно можно положить сюда.
можно же было на первый раз на это указать, а не сразу замечания 20% записывать
Да, пожалуй, я погорячился. Странный вчера какой-то вечер был. Еще один заслуженный участник форума почему-то (мы с Леной так и не поняли пока причину) разволновался.
Приношу свои извинения за излишне поспешное решение, заменяю замечание устным предупреждением и, если Вы решите-таки остаться, то настаиваю на внимательном прочтении Правил форума.
И снова - неужели Вы хотите сказать, что за 10 месяцев присутствия на форуме Вы ни разу не видели, что модераторы удаляют ссылки на посторонние ресурсы и ругаются на это? Тем более скрины, которые прекрасно можно положить сюда.
можно же было на первый раз на это указать, а не сразу замечания 20% записывать
Да, пожалуй, я погорячился. Странный вчера какой-то вечер был. Еще один заслуженный участник форума почему-то (мы с Леной так и не поняли пока причину) разволновался.
Приношу свои извинения за излишне поспешное решение, заменяю замечание устным предупреждением и, если Вы решите-таки остаться, то настаиваю на внимательном прочтении Правил форума._Boroda_
Игорь, 1. Правила одинаковы для всех, и для вопрошающих, и для отвечающих. Вы не первый день на форуме и должны были заметить, что ссылки на сторонние ресурсы удаляются всегда. 2. Видео можно было вставить в пост через Ютуб. 3. Лично мне очень жаль, что Вы приняли такое решение
Игорь, 1. Правила одинаковы для всех, и для вопрошающих, и для отвечающих. Вы не первый день на форуме и должны были заметить, что ссылки на сторонние ресурсы удаляются всегда. 2. Видео можно было вставить в пост через Ютуб. 3. Лично мне очень жаль, что Вы приняли такое решениеPelena
"Черт возьми, Холмс! Но как??!!" Ю-money 41001765434816
Если хороший человек не пострадал из-за меня, готов подставить и свою спину. И всё-таки, кто же не поможет с постом номер шесть, автор buchlotnik.?
Если хороший человек не пострадал из-за меня, готов подставить и свою спину. И всё-таки, кто же не поможет с постом номер шесть, автор buchlotnik.?Юрий_Нд
Сообщение отредактировал Юрий_Нд - Понедельник, 11.09.2017, 10:28