Автоматическое форматирование текста в кавычках

Сэнди спросила, как найти весь текст в кавычках и отформатировать его так, чтобы он был полужирным. Решение должно обрабатывать несколько слов между кавычками – целые фразы, которые должны быть выделены жирным шрифтом. Это интересный вопрос, и есть несколько способов его решения.

Один из подходов – использовать мощную функцию Word «Найти и заменить», чтобы делать именно то, что вам нужно. Выполните следующие действия:

  1. Выберите «Заменить» в меню «Правка». Word отображает вкладку «Заменить» диалогового окна «Найти и заменить». (См. Рис. 1.)
  2. Рис. 1. Вкладка «Заменить» диалогового окна «Найти и заменить».

  3. В поле «Найти» введите следующее:
  4.  ["|"  ] * ["|"] 
  5. Это должно быть введено как есть, без пробелов. Символ после первой вертикальной черты – это открывающая умная кавычка, а символ после второй вертикальной черты – закрывающая умная кавычка. Умные кавычки вводятся в диалоговом окне, удерживая клавишу Alt и набирая на клавиатуре 0147 для первого, а затем 0148 для второго.
  6. Переместите курсор в поле «Заменить на».
  7. Нажмите «Формат», затем «Шрифт». Word отображает диалоговое окно «Заменить шрифт». (Возможно, вам придется нажать кнопку «Дополнительно», прежде чем вы увидите кнопку «Формат».)
  8. Выберите параметр «Полужирный шрифт» в списке стилей шрифта.
  9. Нажмите кнопку «ОК». .
  10. Убедитесь, что установлен флажок “Использовать подстановочные знаки”.
  11. Нажмите “Заменить все”.

Обратите внимание, что когда В Word выполняется этот поиск и замена, жирным шрифтом будет выделен не только текст в кавычках, но и сами кавычки. Если вы хотите вернуть кавычки в нормальное состояние, вы можете выполнить еще один поиск по шаблону, на этот раз ища просто [“|” | “] (шаг 2, где последние две кавычки открывают и закрывают умные кавычки) и заменяя его на Нежирное форматирование (шаг 5).

Интересно отметить, что вы должны искать [“|”] * [“|”], а не просто “*”. Причина этого довольно просто. Если вы получаете свои документы (те, которые вы форматируете) от кого-то еще, вы не сразу узнаете, использовали ли они умные кавычки, обычные кавычки или их комбинацию. Используя скобки, окружающие два типа кавычек по обе стороны вертикальной полосы, вы сообщаете Word, чтобы он соответствовал либо типу открывающей, либо закрывающей кавычки. Когда у вас выбран параметр «Использовать подстановочные знаки», Word различает обычные и умные кавычки. вы используете поиск и замену без включенных подстановочных знаков.)

Если вам нужно немного отформатировать информацию между кавычками в t В его манере лучше всего создать макрос, который затем можно будет добавить к пункту меню или кнопке на панели инструментов. Возможно, самый простой способ – просто использовать записывающее устройство макросов для записи вышеуказанных шагов.. При желании вы можете использовать следующий макрос VBA для решения этой задачи:

 Sub BoldBetweenQuotes () 'база для макроса поиска кавычек Dim blnSearchAgain As Boolean' перейти в начало выделения документа.  : = wdStory 'начало цикла Do' настроить поиск первой пары кавычек с помощью Selection.Find .ClearFormatting .Text = Chr (34) .Replacement.Text = "" .Forward = True .Wrap = wdFindStop .Execute End With If  Selection.Find.Found Then Selection.MoveRight Unit: = wdCharacter, Count: = 1 'включить режим расширения выделения Selection.Extend' найти вторую кавычку этой пары Selection.Find.Execute If Selection.Find.Found Then Selection.MoveLeft Unit  : = wdCharacter, Count: = 1 'выделите жирным шрифтом Selection.Font.Bold = True Selection.Collapse Direction: = wdCollapseEnd Selection.MoveRight Unit: = wdCharacter, Count: = 1 blnSearchAgain = True Else blnSearchAgain = False End If Else blnSearchAgain  False End If Loop While blnSearchAgainEnd Sub 

Оцените статью
Frestage.ru
Добавить комментарий