Замена текста в колонтитуле макросом - VBA
Формулировка задачи:
Здравствуйте!
В ходе разработки проектов возникла необхоидмость создавать большое количество пояснительных записок. Иными словами - создание большого количества документов word по шаблону. Макрос ищет нужную комбинацию символов и заменяет его на заданное значение или текст из ячейки в экселе.
Однако возникла проблема:
дело в том, что в проекте используется колонтитул для описания проекта (таблица). В этой таблице так же есть значения, которые должны меняться, однако макрос этого не делает.
Подскажите пожалуйста, что необходимо добавить в макрос?
Решение задачи: «Замена текста в колонтитуле макросом»
textual
Листинг программы
WA.ActiveWindow.ActivePane.View.SeekView = 9 ' активировать непервый нижний колонтитул With WA.Selection.Find ' ... End With WA.ActiveWindow.ActivePane.View.SeekView = 9 ' активировать непервый верхний колонтитул With WA.Selection.Find ' ... End With WA.ActiveWindow.ActivePane.View.SeekView = 0 ' вернуться в тело документа
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д