Во время переформатирования большого документа стиль большей части заметок шагов был изменен (в основном на Normal
). Оригинальный (встроенный) стиль Footsteps reference
все еще существует, но не относится к большинству ссылок.
Я могу создать для него макрос.
Простой макрос для применения стиля «Ссылка на сноску» к каждой ссылке на сноску в активном документе:
Sub main()
Dim item As Variant
For Each item In ActiveDocument.Footnotes
item.Reference.Style = wdStyleFootnoteReference
Next item
End Sub
wdStyleFootnoteReference
= -39
Но для моих соавторов макросы не подходят.
Есть ли удобный способ как выбрать все эти ссылки и установить для них соответствующий стиль?
Спасибо за предложения.
1 ответ
Чтобы сбросить стиль ссылки на сноску для всех сносок, используйте функцию расширенного поиска / замены (расположенную на вкладке «Главная»).
Параметр Найти что: устанавливается с помощью ^f
А для параметра «Заменить на:» установлен стиль Footnote Reference
.
Это делает то же самое, что и общий макрос, но без макроса.
Спасибо, ваш ответ классный и полезный, но он не эквивалент моего макроса, потому что макрос выбирает
footnote references
в текст. Ваше решение выберите ссылки непосредственно передfootnote
сам. (Что я не знаю, как делать с VBA) ..— Фонарь
16 часов назад
Что делает ваше решение и что делает мой макрос
— Фонарь
16 часов назад
Вы спрашиваете, как это сделать в VBA? Я думал, вы ищете решение, в котором не используется VBA, потому что вашим сотрудникам не нужен макрос. Также предоставленное мной решение сбрасывает стиль для всех ссылок, если используется ReplaceAll.
— Рич Майклс
13 часов назад