Сделать типографику автоматически добавлять кавычки в MS Word 365

Question

В Word (Microsoft Word для Office 365 в моем случае) типографии могут быть предварительно определены в шаблонах документов, так что форматирование можно установить, выделив некоторый текст и щелкнув по типографии (вкладка « Home » -> « Typographies ).

Одна вещь, которую я не могу найти, без удачи при поиске в Интернете и на сайте поддержки MS, - это как сделать типографику не просто добавив форматирование (цвет, шрифт, размер, подкладка, отступы ...), но как сделать типографику добавить символы

В частности, я бы хотел, чтобы к выделению (до и после) добавлялись кавычки "text" , апострофы 'text' и т.д. Например, если я выделю слова « To be or not to be в этом предложении»:

Знаменитая линия Быть или не быть от Гамлета

и нажмите на типографику, чтобы результат автоматически стал:

Знаменитая линия "Быть или не быть" от Гамлета

Это возможно?

Answer 1

Я не могу найти способ сделать это с типографиками (я думаю, что моя версия Word называет их "Стили"), но, возможно, макрос даст вам то, что вам нужно. Я сделал это как макрос:

Sub Quotes()
'
' Quotes Macro
'
'
    Selection.Cut
    Selection.TypeText Text:=""""
    Selection.PasteAndFormat (wdFormatOriginalFormatting)
    Selection.TypeText Text:=""""
End Sub

Затем я запустил этот макрос (вы можете связать его с кнопкой или сочетанием клавиш, если хотите), и он добавил кавычки вокруг выделенного текста.

Примечание: в зависимости от ваших настроек, это может не иметь желаемого интервала в любом конце предложения. Word старается быть полезным и корректирует интервал при вырезании слова или слов. Чтобы заставить его делать то, что вы хотите, вам, вероятно, придется отключить эту функцию.

Параметры Word-> Дополнительно-> Вырезать, Копировать и Вставить-> Использовать интеллектуальное вырезание и вставка-> Настройки-> Автоматически настроить предложение и интервал между словами.

(Для супер-бонусных баллов вы можете сделать запись макроса о состоянии этого параметра, отключить его, выполнить функцию cut-quote-paste-quote и затем восстановить сохраненное состояние параметра.)