Для некоторых целей форматирования вам может потребоваться, чтобы Word поместил символ табуляции в ваши сноски между фактическим справочным номером сноски и текстом сноски. Однако Word не позволяет делать это автоматически. Фактически, Word не позволяет вам указывать, какой символ должен стоять между номером ссылки сноски и текстом сноски, как это можно сделать в нумерованных списках. Вместо этого Word помещает пробел между этими двумя элементами.

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

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

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

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

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

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

  4. В поле «Найти» введите «(^ 2)» без кавычек. Обратите внимание, что после последней скобки есть пробел.

  5. Удерживая курсор в поле «Найти», нажмите кнопку «Формат» и выберите «Стиль». Word отображает диалоговое окно «Найти стиль».

  6. В списке представленных стилей выберите стиль текста сноски и нажмите OK.

  7. В поле «Заменить на» введите «\ 1 ^ t» без кавычек.

  8. Нажмите «Заменить все», затем закройте диалоговое окно «Найти и заменить».

После этого все сноски будут иметь необходимую табуляцию между номером ссылки сноски и началом текста сноски. Это работает, потому что вы используете подстановочный знак ^ 2 в поиске, который ищет ссылки на сноски или концевые сноски. Скобки, окружающие ^ 2, приводят к тому, что этот подстановочный знак рассматривается как группа.

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

В поле «Заменить на» символ \ 1 заменит первое выражение, заключенное в круглые скобки в поле «Найти». В нашем случае это ссылочный номер сноски. ^ T вставит вкладку.

Другой подход — использовать макрос, который поместит нужную вкладку в желаемое место в сносках. Следующий макрос сделает именно это:

Sub TabFootnotes()

For s = 1 To ActiveDocument.Footnotes.Count         ActiveDocument.Footnotes(s).Range.Select         With Selection             .Collapse Direction:=wdCollapseStart             .MoveLeft Unit:=wdCharacter, Count:=1, Extend:=wdExtend             .TypeText Text:=vbTab         End With     Next End Sub

Этот макрос проходит через каждую сноску, выбирает текст сноски, удаляет пробел в начале текста и затем вводит табуляцию. На самом деле макрос не проверяет, является ли символ в начале текста пробелом; с тем же успехом это может быть вкладка из предыдущего вызова этого макроса. Однако это нормально, так как замена существующей вкладки новой будет работать нормально и по-прежнему давать желаемые результаты.

Существует последний подход, который подходит, если вы хотите, чтобы после номера ссылки сноски всегда была табуляция. Этот подход предполагает замену встроенной команды Word для вставки сносок:

Sub InsertFootnote()

If Selection.StoryType <> wdFootnotesStory Then         Dim dlg As Dialog         Set dlg = Dialogs(wdDialogInsertFootnote)

If dlg.Display = -1 Then             dlg.Execute             Selection.TypeBackspace             Selection.TypeText vbTab         End If     End If End Sub

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

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

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

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

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

(Microsoft Word — самая популярная программа для обработки текстов в мире.) Этот совет (1691) применим к Microsoft Word 97, 2000, 2002 и 2003. Вы можете найти версию этого совета для ленточного интерфейса Word (Word 2007 и позже) здесь:

link: / wordribbon-Automatically_Adding_Tabs_in_Footnotes [Автоматическое добавление табуляции в сноски].