Руководство по стилю, которому следует Фил, оговаривает, что при указании диапазонов чисел (например, 1–9 или 23–36) следует использовать короткое тире, а не дефис. Фил интересуется, есть ли способ заставить Word делать это автоматически.

Есть несколько способов поставить тире между диапазонами номеров. «Автоматический» способ (что касается Word) — заключить дефис в пробелы. Другими словами, предположим, что ваш диапазон примерно 23–45. Все, что вам нужно сделать, это ввести 23, пробел, дефис, пробел, а затем 45. В тот момент, когда вы вводите пробел или знак препинания после «45», дефис автоматически преобразуется в короткое тире.

Использование этого подхода, хотя и удобного, оставляет пробелы до и после тире, что может противоречить вашему руководству по стилю. Если это так, вы всегда можете использовать Найти и Заменить, чтобы избавиться от любых пробелов до и после дефисов. Или вы можете просто обойтись без автоматического метода и научиться набирать собственные тире. Самый простой способ — просто нажать Ctrl и нажать клавишу «минус» на цифровой клавиатуре. (Это должно быть на цифровой клавиатуре.) Word вставляет короткое тире с разделением.

Вы также можете использовать инструмент Word «Найти и заменить», чтобы заменить все дефисы на тире. Вот как:

  1. Нажмите Ctrl + H. Word отображает вкладку «Заменить» диалогового окна «Найти и заменить».

  2. Нажмите кнопку «Еще», если она доступна. (См. Рис. 1.)

  3. Убедитесь, что установлен флажок «Использовать подстановочные знаки».

  4. Введите следующее в поле «Найти»: ([0–9]) — ([0–9]). Введите следующее в поле «Заменить на»: \ 1 ^ = \ 2. Щелкните «Заменить все».

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

Или вы можете использовать макрос, который сделает за вас все перестановки поиска и замены. Следующий макрос фактически вызывает поиск и замену семь раз, в результате чего любой диапазон, содержащий любую перестановку дефиса или дефиса, окруженного одиночными пробелами, будет преобразован в цифры, окружающие одиночное тире.

Sub FixNumberRanges()

Selection.Find.ClearFormatting     Selection.Find.Replacement.ClearFormatting     With Selection.Find         .Text = "([0-9])-([0-9])"

.Replacement.Text = "\1^=\2"

.Forward = True         .Wrap = wdFindContinue         .Format = False         .MatchCase = False         .MatchWholeWord = False         .MatchWildcards = True         .MatchSoundsLike = False         .MatchAllWordForms = False

.Execute Replace:=wdReplaceAll

.Text = "([0-9]) -([0-9])"

.Execute Replace:=wdReplaceAll

.Text = "([0-9])- ([0-9])"

.Execute Replace:=wdReplaceAll

.Text = "([0-9]) - ([0-9])"

.Execute Replace:=wdReplaceAll

.Text = "([0-9]) ^=([0-9])"

.Execute Replace:=wdReplaceAll

.Text = "([0-9])^= ([0-9])"

.Execute Replace:=wdReplaceAll

.Text = "([0-9]) ^= ([0-9])"

.Execute Replace:=wdReplaceAll     End With End Sub

_Примечание: _

Если вы хотите знать, как использовать макросы, описанные на этой странице (или на любой другой странице на сайтах WordTips), я подготовил специальную страницу, содержащую полезную информацию.

link: / wordribbon-WordTipsMacros [Щелкните здесь, чтобы открыть эту специальную страницу в новой вкладке браузера].

WordTips — ваш источник экономичного обучения работе с Microsoft Word.

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (5133) относится к Microsoft Word 2007, 2010, 2013 и 2016.