VBA

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела

VBA Формирование отчета с дальнейшей работой формы Просьба помочь в написании кода для форм с отчетностью. При формировании отчета в конце написана команда DoCmd.Close чтобы закрыть форму, но остается главная форма и позади сам отчет. Что нужно прописать чтобы главная форма не была основной но оставалась в системе, и форма отчетности не закрывалась а продолжала работу до тех пор пока я её сам не закрою. https://www.cyberforum.ru/ vba/ thread2011738.html

Как запустить макрос при нажатии клавиши Enter VBA
Привет Всем. В сети нашел вот такой код: Sub StartEnter() MsgBox ("sadfsdfsf") End Sub Откорректировал для себя: Sub StartEnter() .Activate End Sub Код рабочий,но только не при нажатии на кнопку Enter

VBA Макрос для построения диаграмм, который бы работал на каждом из листов книги Всем привет! По роду деятельности приходится работать с большими объемами данных, часто приходится на их основе строить ряд диаграмм. Разновидностей диаграмм, которые приходится строить, много, порядка 8-15, в зависимости от задач. Данных также много, и они разбиты по листам. Листов может быть от 5 до 30, опять же, в зависимости от текущих задач. Есть ли возможность средствами встроенного... https://www.cyberforum.ru/ vba/ thread2011678.html

VBA Каким кодом снять показания о номерах выделенных строк в ListForm, и об их общем количестве? Каким кодом снять показания о номерах выделенных строк в ListForm? и об их общем количестве https://www.cyberforum.ru/ vba/ thread2011618.html

VBA Макрос по заполнению диапазона значениями с другого листа
Добрый день! В написании макросов я новичок. По долгу службы надо было оптимизировать работу, поэтому пришлось приложить усилия и что-то наваять. Смысл работы нижеприведенного макроса следующий: 1) первым действием макрос вытягивает из листа "Реестр операций" на лист "Cash flow"(данный лист является основным) 2) затем выполняется цикл по суммированию (с помощью суммеслимн) и заполнению...

VBA Наполнение переменной Добрый день. Не могу разобраться с такой проблемой: Есть 6 переменных, в которые заносятся данные с ячеек. b1,b2,b3,b4,b5 и b6. Данными являются набор чисел и букв. Эти переменные должны складываться в переменную а через запятую. С начало "наполнял" переменную а так: а=b1 & "," & b2 & "," & ... & b6 Но при пустых ячейках оставались лишние запятые. От них и хочу избавиться. А через... https://www.cyberforum.ru/ vba/ thread2011584.html

VBA Сравнение значений ячеек по первым символам Добрый день, форумчане! Повторно обращаюсь за помощью, очень надо. Задача: в столбце "А" значения, состоящие из шести цифр и текста, например, "232323 солнечный день", в столбце "В" только цифры "232323". Необходимо с помощью VBA сравнить столбец "А" с "В" и если совпадут цифры, вырезать из "А" все содержимое, вставить в столбец "С" а затем обрезать текст и оставить только цифры. Заранее... https://www.cyberforum.ru/ vba/ thread2011534.html

VBA (VBA Excel) Экспорт в txt не смежных колонок
Доброго дня, помогите с макросом экспорта данных из Excel в текстовый файл не смежных колонок (А и C) чтобы данные в текстовом файле копировались построчно. Кое-что попытался сделать, но, увы. Примеры в прикрепленных файлах. Sub ExPort_to_TXT() Dim rng1 As Range, qq As Range Set rng1 = ActiveSheet.UsedRange DeHb = Format(Now(), "dd.mm.yyyy") Set fs =...

VBA Случайный (Рандомный) вывод даты и времени Здравсвуйте уважаемые программисты. Просьба помочь с небольшим кодом, иначе сам не справляюсь. Кнопкой открываем форму, в которой указываем дату начала посещения и дату конца посещения. В промежутке этих дат сделать вывод на Лист1 в столбец "А" даты "рандомными" (Посещение было каждый день, а то и по 2 раза на день), в колонке "B" Время посещения, тоже рандомное. Прошу помощи. Работу... https://www.cyberforum.ru/ vba/ thread2011368.html

VBA Макрос. Выбрать отмеченные позиции и перенести на другой лист https://www.cyberforum.ru/ vba/ thread2011293.html
Доброго времени суток В Книге 2 листа На листе "Общий" есть таблица состоящая из 6 столбцов (предполагается увеличение ) Пользователь отмечает определенные позиции любым символом и макрос должен их скопировать на лист "Отчет" То что я хочу уже работает на формулах ( можно посмотреть , потрогать, поменять) Надо такой же результат но на макросах

Макрос . "ВрЕменная" остановка VBA
доброго времени суток всем какой командой можно остановить работу макроса и продолжить ее при нажатии на любую клавишу ?

VBA Сравнение двух текстовых списков с выводом "разницы" Здравствуйте! VBA знаю плохо, на уровне создания элементарных макросов и редактирования чужих. Есть два списка слов: Список1 и Список2 В списках используется разделитель ", " Необходимо вывести не повторяющиеся в ОБОИХ списках значения Задача изначально была реализована следующим образом: 1) макросом списки разбивались по столбцам с разделителем ", " 2) тем же макросом...

Bolbine84455

6 / 6 / 3

Регистрация: 12.03.2014

Сообщений: 341

01.07.2017, 21:19 [ТС]

Замена текста по регулярному выражению (Макрос для Word) - VBA - Ответ 10592742

01.07.2017, 21:19. Показов 3919. Ответов 11

Метки (Все метки)

Ответ

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

пишет в консоль отладки.

Проблема в том, что мне надо заменять старое значение на новое.
Я взял текст и заменил его. Я получил результат в переменной, но содержимое документа как поменять не знаю

Visual Basic

Dim sel As Object
Dim selText As String
Dim i As Integer
 
Set sel = ActiveDocument.Sections(1)
selText = sel.Range.Text
 
Dim regExp As Object
Set regExp = CreateObject("vbscript.regexp")
   
Dim res As String
   
With regExp
    .Pattern = "\[\[(\w+)\|([^\]]+)\]\]"
    .Global = True
    .MultiLine = True
    selText = .Replace(selText, "[URL=""http://myservice.ru/linkId?id=$1""]$2[/URL]")
End With

Вернуться к обсуждению:
Замена текста по регулярному выражению (Макрос для Word) VBA

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

01.07.2017, 21:19

Готовые ответы и решения:

Поиск замена по регулярному выражению в word
Добрый день. Пишу макрос для автоматической замены и расстановки меток. Требуется следующее: 1)...

Замена текста по регулярному выражению
В файле имеется ряд строк, среди которых есть следующая строка: starts3d4s4end Необходимо найти...

Ищу программу для поиска текста в файлах по регулярному выражению
Привет! Я обрадовался, когда, как оказалось, есть такая функция в Notepad++ . Но разочарования...

Замена по регулярному выражению онлайн
Здравствуйте! Подскажите есть ли онлайн сервисы в которых возможно производить замену в исходном...

	01.07.2017, 21:19

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

01.07.2017, 21:19

Помогаю со студенческими работами здесь

Замена слов на кириллице по регулярному выражению
Здравствуйте, помогите, пожалуйста. Имеется слово на кириллице: привет Имеется входной текст:...

Замена в тексте по регулярному выражению с использованием Unicode
Вариант 1: UnicodeString reg_replace(UnicodeString content_p, UnicodeString pattern_p,...

Замена строки по регулярному выражению во множестве файлов
Нужно написать скриптик, который бы заменял во всех файлах в папке и подпапках (или хотя бы в...

Поиск и замена по регулярному выражению с функцией в параметре замены
Пытаюсь создать функцию для поиска и замены строки в base64 кодированных частях контента страниц и...

Функция для поиска по регулярному выражению
Здорова господа! Нужно написать свою собственную функцию для поиска по регулярному выражению. ...

Макрос для форматирования текста word
как написать макрос, который будет переходить по абзацам текста и при этом если абзац в стиле...

Наверх