Как автоматически добавить текст в заголовок документа в Microsoft Word с помощью VBA

Как автоматически добавить текст в заголовок документа в Microsoft Word с помощью VBA

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





СДЕЛАТЬ ВИДЕО ДНЯ

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



Автоматическое добавление текста в заголовок документа с помощью VBA в Word

VBA или Visual Basic для приложений — это интегрированная форма Visual Basic, используемая в приложениях Microsoft Office. VBA позволяет вам писать коды для создания макросов, что, в свою очередь, автоматизирует задачи, которые в противном случае вам пришлось бы выполнять вручную. VBA даже позволяет создавать собственные кнопки и функции для Microsoft Word.





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

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



1. Доступ к вкладке «Разработчик»

Первым шагом в создании макросов Word является доступ к вкладке «Разработчик» на ленте. Эта вкладка по умолчанию отключена, так как макросы зарезервированы для опытных пользователей. Загруженные макросы — это простой способ для хакеров получить доступ к вашей системе и установить вредоносное ПО, поэтому Microsoft решила заблокировать их по умолчанию .

При этом вам нужно будет включить вкладку «Разработчик» в «Параметры». Конечно, если вы использовали макросы раньше, вкладка «Разработчик» уже будет доступна, поэтому нет необходимости делать это заново. Если вы впервые работаете с макросами и VBA в программах Office, рекомендуется прочитать наше руководство по как начать использовать макросы в ворде .



Настройки ленты Word
  1. В Microsoft Word перейдите к Файл меню.
  2. Выбирать Опции . Откроется окно параметров Word.
  3. в Параметры слова окно, выберите Настроить ленту .
  4. Справа, под Основные вкладки , прокрутите вниз и проверьте Разработчик .
  5. Нажмите ХОРОШО .

Теперь вы увидите вкладку «Разработчик» на ленте, прямо между «Вид» и «Справка».

2. Создание макроса

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



Таким образом, вы можете еще больше повысить свою производительность, поскольку вы нажимаете только комбинацию клавиш на клавиатуре, а волшебство происходит за кулисами.

меню макросов в ворде
  1. Перейти к Разработчик вкладка
  2. Нажмите на Макросы от Код раздел.
  3. Введите имя для вашего макроса. Мы собираемся назвать нашу muoЗаголовок .
  4. Нажмите на Создавать .
Пустой макрос в Word

Как только вы нажмете Создавать , откроется новое окно, содержащее две строки кода и информационную строку. Строки Sub и End Sub отмечают начало и конец кода вашего макроса. Вставьте приведенный ниже код между двумя строками:

Dim headerRange As Range 
Dim headerText As String 
 Set headerRange = ActiveDocument.Sections.Item(1).Headers(wdHeaderFooterPrimary).Range 
headerRange.Text = "Written and Published by MUO" 
headerRange.Font.Bold = True 
headerRange.ParagraphFormat.Alignment = wdAlignParagraphCenter

Оператор Dim в этом коде объявляет заголовокдиапазон а также заголовокТекст переменные как Диапазон и Нить соответственно. Далее, Установлен оператор устанавливает заголовокдиапазон переменная в заголовок текущего активного документа.

Установлен оператор сначала обращается к текущему активному документу, затем к его разделам, затем к первому элементу и заголовкам в нем. Наконец, он получает доступ к основному заголовку в Word, а затем устанавливает его как Диапазон .

почему шоу исчезают из netflix

Как только эти два объявлены, заголовокдиапазон text устанавливается на текст, который мы хотим. В следующей строке шрифт устанавливается полужирным, а затем в последней строке выравнивание абзаца устанавливается по центру. Параметры, начинающиеся с «wd», указывают на то, что этот параметр является эксклюзивным для Microsoft Word.

Саб а также Конец сабвуфера коды не включены в этот фрагмент выше, так как вы должны вставить код из фрагмента между этими двумя. Ваш окончательный код должен выглядеть как на картинке ниже:

Макрос вставки текста заголовка для Word

3. Использование макроса

После того, как вы настроили код, вы готовы использовать макрос. Нет необходимости сохранять его; все, что вы вводите в рабочей области VBA, мгновенно сохраняется. Теперь пришло время настроить ярлык для макроса и посмотреть, работает ли он!

  1. Перейти к Файл меню.
  2. Выбирать Опции .
  3. Выбирать Настроить ленту .
  4. Нажмите на Настроить следующий на Горячие клавиши внизу окна. Откроется окно «Настройка клавиатуры».
  5. в Настроить клавиатуру окно, прокрутите вниз в Категории список и выберите Макросы .
  6. В правом меню выберите свой макрос.
  7. Нажмите на текстовое поле под, Нажмите новую горячую клавишу .
  8. Введите комбинацию клавиш на клавиатуре. Это хорошая идея использовать Ctrl , Все , а также Сдвиг в то же время. Таким образом, комбинация, вероятно, уже не будет использоваться. мы собираемся использовать Все + Ctrl + Сдвиг + ЧАС .
  9. Нажмите на а затем нажмите на ХОРОШО .

Теперь пришло время увидеть магию в действии. Нажмите комбинацию клавиш, которую вы только что назначили макросу на клавиатуре. Надеюсь, вы увидите текст в шапке! Смело и по центру! Если что-то пойдет не так, как планировалось, проследите свои шаги и проверьте свой код на наличие ошибок.

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

Автоматизируйте свой рабочий процесс

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

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

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