Поиск
Автор: Marina Zakharova. Добрый день!
Есть задача объединить несколько таблиц в одну большую. Беда в том, что количество и порядок столбцов в исходных таблицах может отличаться. Заголовки в исходных данных править - не вариант, таблиц оч. много. Вариант, предложенный Николаем на этой странице [URL=https://www.planetaexcel.ru/techniques/24/18605/
Изменен: 09.06.2022
Читать сообщение на форуме или сайте.Автор: Argo9. Доброго времени суток. Подскажите кто сталкивался. Есть такой код.
Sub XML_Replace()
Dim s, Stroka2 As String
Dim myRegExp As New RegExp
With myRegExp
.Global = True
.IgnoreCase = False
.MultiLine = False
.Pattern = ">\d{10}\d{12}|>\d{13}\d{15}((8|\+7)[\- ]?)?(\(?\d{3}\)?[\- ]?)?[\d\- ]{7,10}ПРАВЛЕНО\d{10}\d{12}ПРАВЛЕНО\d{13}\d{15}ПРАВЛЕНО((8|\+7)[\- ]?)?(\(?\d{3}\)?[\- ]?)?[\d\- ]{7,10}ПРАВЛЕНО
Изменен: 13.11.2019
Читать сообщение на форуме или сайте. ... : vcomp71. Воспользовался примером для тастирования регулярных выражений
Sub RegExp_exemple()
Dim myRegExp As ...
Изменен: 17.09.2018
Читать сообщение на форуме или сайте.