У меня есть макрос в документе Word, который создает нижний колонтитул на основе закладок. Работает, за исключением одной детали: в одном из полей Ref в нижнем колонтитуле, шрифт всегда неверный после обновления.
Размер должен быть 6, как остальная часть нижнего колонтитула, но 9,5, как оригинальный текст. Это происходит только с одним полем. Я проверил, что знак абзаца и вся строка отформатированы правильно. Я даже скопировал одну из закладок функций и адаптировал их, но размер шрифта всегда неправильный.
Проблема возникает на нескольких компьютерах.
Я отказался от решения исходной проблемы, потому что у меня заканчиваются идеи. Теперь я хочу добавить в макрос некоторый код, который будет применять определенный стиль (или шрифт) к нижнему колонтитулу.
Что я пробовал до сих пор:
- Я создал стиль для нижнего колонтитула (называемый footer1) - до этого он не был определен
- Я баловался с VBA и гуглил несколько часов безрезультатно.
- Отключение / включение переключателей полей слияния в Ref-поле
- Поиск Google для "применить стиль к слову нижнего колонтитула 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 в крайнем случае, но я не эксперт. Я просто не нашел ничего, что мог бы приспособить к своим потребностям.