Спросите пользователя, хотят ли они сделать это снова

Question

В Word 2011 У меня есть базовый макрос, который запрашивает пользователя для ввода, затем форматирует этот ввод и помещает его в документ. Например:

Sub AddNewName() 
' 
' AddNewName Macro 
' 
' 
    Dim FirstName As String 
    FirstName = InputBox("Enter First Name", "") 
    Dim LastName As String 
    LastName = InputBox("Enter Last Name", "") 
    Selection.TypeText Text:="First Name : " 
    Selection.TypeText Text:=FirstName 
    Selection.TypeParagraph 
    Selection.TypeText Text:="Last Name : " 
    Selection.TypeText Text:=LastName 
End Sub 

Я хотел бы, чтобы спросить пользователя, в конце: «Другое название у/п» и, если пользователь отвечает «у» затем запустите макрос снова. Я искал Googled и искал stackoverflow, но я либо не использую правильные поисковые запросы, либо вопрос просто отсутствует.

Answer 1

обернуть код в цикл, который прерывается, если пользователь нажимает «Нет»;

do 
    Dim FirstName As String 
    . 
    . 
    . 

    if (msgbox("Another Name?", vbyesno) = vbno) then exit do 
loop