اطلب من المستخدم إذا أرادوا القيام بذلك مرة أخرى

Question

في Word 2011 لدي ماكرو أساسي يطالب المستخدم بالإدخال، ثم تنسيقات إدخالها وتضعها في المستند.على سبيل المثال: giveacodicetagpre.

أود ذلك أن أسأل المستخدم في النهاية: "اسم آخر؟ y / n" وإذا أجسبت المستخدم "y"، ثم بدء تشغيل الماكرو مرة أخرى.لقد قمت بتفتيش Stackoverflow لكنني لا أستخدم مصطلحات البحث الصحيحة أو السؤال ليس هناك بالفعل.

Answer 1

wrap the code in a loop that breaks if the user clicks "No";

do
   Dim FirstName As String
   .
   .
   .

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