@Rus86

Всем привет. В сети нашел файл SrcAndRpl_Beta3.doc для пакетного найти/заменить. Работает прекрасно, но вот если объект в ворде сгрупированный (текстовые элементы с графическими), то в нем не делает замен, если разбить группировку до простых элеметов, то все работает. Прилагаю файл SrcAndRpl_Beta3.doc и файл на котором не работает, в частности не производит замену текста в колонтитуле внутри которого вставлен ШТАМП, составленный из графических и текстовых сгрупированных элементов, группировка там многократная, не знаю для чего не я делал, но нужен универсальный способ перебора элементов группировки с определенной глубиной группировки. Сам не программист, но базовые навыки есть, пытался отладкой проверить цикл, отвечающий за перебор элементов Ворда, но так и не понял, когда в цикле появляется сгруппированный элемент. Может кто допишет этот макрос или подскажет, как это сделать?

Вложения

Рабочка.rar (106.2 Кб, 109 просмотров)

0

@Homarty

Добавил немного кода в процедуру ReplaceInShapes из формы SRForm.
Процедура во вложении, замените ею оригинал и потестируйте, у меня все работало.

Вложения

Процедура_для_замены.txt (1.9 Кб, 95 просмотров)

1

@Rus86

Спасибо, действительно заработало!

0