Kompу меня есть макрос в документе Word, который генерирует нижний колонтитул на основе закладок. Работает, за исключением одной детали: в одном из Ref-полей нижнего колонтитула шрифт всегда некорректен после обновления.
размер должен быть 6, как и остальная часть нижнего колонтитула, но 9,5, как и исходный текст. Это происходит только с одним полем. Я проверил, что Знак абзаца и вся строка отформатированы правильно. Я даже скопировал одну из закладок функций и адаптировал их, но размер шрифта всегда неправильный.
проблема возникает на нескольких компьютерах.
Я отказался от решения исходной задачи, потому что я бегу из идей.
Теперь я хочу добавить в макрос код, который будет применять определенный стиль (или шрифт) к нижнему колонтитулу.
что я пробовал до сих пор:
- Я создал стиль для нижнего колонтитула (называемый footer1) - до этого он был не определен
- я баловался с VBA и гуглил несколько часов безрезультатно.
- отключение / включение переключателей mergefield в поле Ref
- поиск Google для "применить стиль к нижнему колонтитулу word vba"
неудачных попыток:
ActiveDocument.Sections(ActiveDocument.Sections.Count) _
.Footers(1).Range.Style("footer1")
вот код:
ActiveDocument.Fields.Update
ActiveDocument.Sections(ActiveDocument.Sections.Count) _
.Footers(1).Range.Fields.Update
' code needed here for changing footer's style to "footer1"
' Alternative: apply style only to faulty ref field.
Спасибо за вашу помощь.
Я могу сделать незначительные корректировки макросов VBA в крайнем случае, но я не эксперт. Я просто не нашел ничего, что смог бы приспособить под свои нужды.
2897
