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

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

Заглавките са чудесно място за представяне на вашия документ на Word и също така са лесни за използване. Просто трябва да щракнете двукратно върху заглавката и да въведете, нали? Колкото и лесна да е, както всяко друго нещо, тази задача може да стане доста монотонна и досадна, ако трябва да добавите една и съща заглавка за няколко документа подред.





MAKEUSEOF ВИДЕО НА ДЕНЯ

За този сценарий или може би за други сценарии 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 .



Настройки на лентата на Word
  1. В Microsoft Word отидете на Файл меню.
  2. Изберете Настроики . Това ще отвори прозореца с опции на Word.
  3. В Опции на Word прозорец, изберете Персонализиране на лентата .
  4. Вдясно, под Основни раздели , превъртете надолу и проверете Разработчик .
  5. Кликнете Добре .

Сега ще видите раздела Разработчик в лентата, точно между Изглед и Помощ.

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

Сега е време да си изцапате ръцете с макрос и малко код. След като създадете макрос и напишете кода за него, можете да присвоите пряк път към него, така че да не се налага всеки път да влизате в менюто за макроси.



приложения за игри, които не използват данни

По този начин можете допълнително да увеличите продуктивността си, тъй като ще натиснете само клавишна комбинация на клавиатурата си и магията ще се случи зад кулисите.

Макро меню в Word
  1. Отидете на Разработчик раздел.
  2. Кликнете върху Макроси от Код раздел.
  3. Въведете име за вашия макрос. Ние ще назовем нашите muoHeading .
  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 в този код декларира headerRange и headerText променливи като a Обхват и а низ съответно. След това, Комплект изявлението задава headerRange променлива към заглавката на текущия активен документ.

The Комплект операторът първо осъществява достъп до текущия активен документ, след това до неговите секции, след това до първия елемент и заглавките в него. Накрая получава достъп до първичния хедър в Word и след това го задава като a Обхват .

как да изключите ps4

След като тези две са декларирани, headerRange text е зададен на текста, който искаме. В следващия ред шрифтът е удебелен, а след това в последния ред подравняването на абзаца е центрирано. Параметрите, започващи с „wd“, показват, че параметърът е изключителен за Microsoft Word.

The Под и End Sub кодовете не са включени в този фрагмент по-горе, тъй като трябва да поставите кода от фрагмента между тези два. Крайният ви код трябва да изглежда като изображението по-долу:

Макросът за вмъкване на заглавен текст за Word

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

След като настроите кода, сте готови да използвате макроса. Няма нужда да го запазвате; всичко, което въвеждате в работното пространство на VBA, незабавно се записва. Сега е време да настроите пряк път за макроса и да видите дали работи!

  1. Отидете на Файл меню.
  2. Изберете Настроики .
  3. Изберете Персонализиране на лентата .
  4. Кликнете върху Персонализиране до Комбинация от клавиши в долната част на прозореца. Това ще отвори прозореца Персонализиране на клавиатурата.
  5. В Персонализиране на клавиатурата прозорец, превъртете надолу в Категории списък и изберете Макроси .
  6. В дясното меню изберете своя макрос.
  7. Кликнете върху текстовото поле под, Натиснете нов клавиш за бърз достъп .
  8. Въведете клавишната комбинация на вашата клавиатура. Добра идея е да се използва Ctrl , Всичко , и Shift по същото време. По този начин комбинацията вероятно вече няма да се използва. Ще използваме Всичко + Ctrl + Shift + з .
  9. Кликнете върху и след това щракнете върху Добре .

Сега е време да видите магията в действие. Натиснете клавишната комбинация, която току-що сте задали на вашия макрос на клавиатурата. Надяваме се, че ще видите текста в заглавката си! Удебелено и центрирано! Ако нещата не вървят по план, проследете стъпките си и проверете кода си за грешки.

Всеки път, когато искате да промените текста, който кодът добавя към вашето заглавие, можете просто да отидете в менюто с макроси и да редактирате макроса. Ако сте любопитни относно преките пътища на Word по подразбиране, разгледайте нашия Списък с клавишни комбинации на Microsoft Word .

Автоматизирайте своя работен процес

Вярно е, че добавянето на текст към заглавката на документ в Word отнема малко усилия, но малкото усилие в големи количества може да стане монотонно, ако не и трудно. Както и да е, ако можете да го направите по-лесно и отнемащо по-малко време, тогава защо не го направите?

VBA съществува, за да обслужва такива цели. Ако сте искали функция на Word, която автоматично да добавя персонализиран текст към заглавката на всеки документ, не е нужно повече да желаете. С VBA можете да създадете всяка функция, която смятате, че Word липсва. Добавянето на текст към заглавката на документ е само малък пример за това, което можете да постигнете с VBA в Word.

Вече знаете как да напишете код за тази цел и да зададете пряк път към него. Така че всичко, което трябва да направите, е да натиснете клавишна комбинация, да седнете и да наблюдавате как Word върши скучната работа вместо вас за милисекунди.