Як створити вікна введення та повідомлень у документі Word за допомогою VBA?

Останнє оновлення: липень 2020 р.; Застосування: Office 365,2019, 2016, 2013.

Іноді нам хотілося б зробити наші документи Word більш інтерактивними і навіть зафіксувати певний вхід користувача. Введіть повідомлення та поля введення.

Як випливає з назви, вікно повідомлення — це частина інформації, яка відображається користувачам документа. Поле введення є інструментом для отримання інформації від користувача.

У цій публікації міститься вся інформація та зразки коду, які вам знадобляться для створення повністю функціональних документів із повідомленнями Visual Basic для додатків (VBA) і полями введення для Microsoft Word.

Як додати код VBA в Word?

Перш ніж ми пояснимо, як додати поля повідомлень і введення, ось коротка інформація про те, як додати свій власний код VBA до документа Word.

• По-перше, увімкніть вкладку Розробник .
• Тепер натисніть кнопку  Visual Basic на  вкладці Розробник  . Це відкриє редактор Visual Basic.

• Виділіть свій документ.
• Натисніть  «Вставити»  , а потім виберіть  «Модуль» .

• Скопіюйте код, який ми надаємо нижче, у модуль, який ви щойно створили, у свій модуль.
• Натисніть Зберегти. Укажіть назву документу, якщо буде запропоновано.
• Закрийте редактор Visual Basic.

Код VBA для вікон повідомлень

Синтаксис:

MsgBox (підказка, кнопки, назва, файл довідки, контекст)

Пояснення синтаксису:

Підказка:

Вимагається. Це інформація, яку можна надати користувачеві. Його слід вставити в  подвійні лапки .

кнопки:

За бажанням. Кнопки — це такі кнопки, які надають інформацію користувачам. Існують різні кнопки, доступні для MsgBox(), і їх можна знайти на малюнках нижче.

Назва:

За бажанням. Це назва інформації, наданої користувачеві. Якщо не вказано,  Microsoft word  буде заголовком за замовчуванням.

Файл довідки та контекст:

• За бажанням. Helpfile визначить файл довідки, доступний на локальному диску, який можна надати як довідку в діалоговому вікні
• За бажанням. Контекст – це числовий вираз, який використовується для ідентифікації теми довідки за унікальним номером.

Зразок коду вікна повідомлення

'VBA
Sub messagebox()

'Variables assigned

Dim buttonclick As VbMsgBoxResult

'Message box to display information to user

MsgBox "Hi, Visual Basic is easy to work with", vbExclamation, "VBA"

'Message box to ask question to user with yes or no question
buttonclick = MsgBox("Do you like VBA?", vbQuestion + vbYesNo, "VBA")
If buttonclick = vbYes Then
MsgBox "Yes, they are great!", vbExclamation, "VBA"
Else
MsgBox "Why not? They are great!", vbCritical, "VBA"
End If

End Sub

Вихід:

Діалогові вікна та вікна введення код VBA

Поле введення — це просте діалогове вікно, яке дозволяє нам запропонувати користувачеві надати певну інформацію. Давайте познайомимося з кодом VBA на прикладі.

Синтаксис:

InputBox(Підказка, Назва, За замовчуванням, XPos, YPos, HelpFile, HelpContextId, Type)

Пояснення синтаксису:

Підказка:

Вимагається. Це інформація, яку можна надати користувачеві. Його слід вставити в  подвійні лапки .

Назва:

За бажанням. Це назва інформації, наданої користувачеві. Якщо не вказано,  Microsoft word  буде заголовком за замовчуванням.

За замовчуванням:

За бажанням. Він відображає значення за замовчуванням у текстовому полі, перш ніж користувач введе значення. Якщо не вказано, текстове поле буде порожнім.

Xpos:

За бажанням. Використовується як положення на осі X. Зліва направо

YPos:

За бажанням. Використовується як положення на осі Y. Зверху вниз

Файл довідки та ідентифікатор контексту довідки:

• За бажанням. Helpfile визначить файл довідки, доступний на локальному диску, який можна надати як довідку в діалоговому вікні
• За бажанням. HelpContext ID – це ідентифікатор файлу довідки.

Код поля введення:

'VBA
Sub macro()

'Variables assigned
Dim a As Long
Dim b As Long

'Input box to get value from user

a = InputBox("Enter a value for a", "Question 1")
b = InputBox("Enter a value for b", "Question 2")

'Answer displayed in a message box
MsgBox ("Answer is " & Val(a) + Val(b))
End Sub

Вихід: