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

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

  1. Создайте новый документ на основе шаблона. (Это целевой документ.)

  2. Откройте документ, полученный от других; тот, который вы хотите стандартизировать. (Это исходный документ.)

  3. Скопируйте текст из исходного документа и вставьте его в целевой документ.

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

Наконец, при желании вы можете создать макрос для добавления в желаемые верхние и нижние колонтитулы. Макрос не обязательно должен быть необычным; вот тот, который просто добавляет стандартизированный текст верхнего и нижнего колонтитула в каждый раздел документа:

Sub MyHeadersAndFooters()

Dim i As Long

For i = 1 To ActiveDocument.Sections.Count         With ActiveDocument.Sections(i)

.Headers(wdHeaderFooterPrimary).Range.Text = "Header Text Here"

.Footers(wdHeaderFooterPrimary).Range.Text = "Footer Text Here"

End With     Next i End Sub

Чтобы использовать макрос, просто замените «Текст заголовка здесь» и «Текст нижнего колонтитула здесь» желаемым текстом верхнего и нижнего колонтитула. Этот макрос является только отправной точкой, поскольку он не применяет никаких специальных стилей и не включает какие-либо поля (например, номера страниц), которые могут вам понадобиться.

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

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

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

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

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