Слово VBA, если диалоговое окно закрыто, выйти из макроса

Question

это, вероятно, простое решение моей проблемы, и я надеюсь, что sb поможет мне.

Я открываю диалоговое окно в начале моего макроса с помощью Dialogs(wdDialogFileOpen).Show, и теперь я хотел бы добавить условие If, что, если это диалоговое окно закрыто, макрос останавливается / завершается. Я не очень знаком с синтаксисом VBA.

Спасибо!

Answer 1

Диалоговые окна возвращают следующее:

Кнопка Закрыть.-> -2

Кнопка ОК.-> -1

Кнопка Отмена.-> 0 (ноль)

Кнопка команды: 1 - первая кнопка, 2 - вторая кнопка и т. Д.->> 0 (ноль)

SO:

Sub DialogBoxButtons()
    If Dialogs(wdDialogFileOpen).Show = -1 Then
        ' Break or do something else here
    End If
End Sub