Как я могу создать ОБЯЗАТЕЛЬНОЕ поле формы в Microsoft 2010 с VBA?

Question

Я действительно новичок в VBA, но я учусь быстро. Мне нужна помощь в создании обязательных полей формы в Microsoft Word. Пользователь не должен сохранять или сохранять & Отправляйте документ без заполнения всех обязательных полей формы.

Я нашел ниже код онлайн:

Sub MustFillIn() 
    If ActiveDocument.FormFields("Text1").Result = "" Then 
     Do 
      sInFld = InputBox("This field must be filled in, fill in below.") 
     Loop While sInFld = "" 
     ActiveDocument.FormFields("Text1").Result = sInFld 
    End If 
End Sub 

Но я не знаю, как переименовать поле в Microsoft Word. Например, для моего первого поля формы его следует называть «FirstName» вместо «Text 1». Как назвать поле формы в Microsoft Word 2010?

Спасибо заранее,

Марк

Answer 1

Вы можете использовать свойство тег элемента управления, чтобы сделать это. См. here. Это для Word 2010, но более новые версии должны работать одинаково.