Как мгновенно отобразить небольшое диалоговое окно
Хотели бы вы включить краткую интерактивную информацию для пользователя в вашу программу VBA? Вам не обязательно создавать сложное диалоговое окно (UserForm).
Для небольших задач вы можете вызвать предопределенное окно сообщения с помощью функции MsgBox (аббревиатура означает «Message Box»).
Вы вызываете команду в следующем виде:
Возвращаемое значение = MsgBox (текст окна, тип окна, заголовок окна)
С параметром Window text вы передаете текст, который хотите отобразить в окне, например текст «Этот текст появляется в окне сообщения». Введите текст в кавычки.
Параметр типа окна сообщает Excel, как должно выглядеть окно. Для этого доступны предопределенные константы. Наиболее важные константы:
vbOKOnly: Отображает только кнопку "ОК"
vbOKCancel: Отображает кнопки ОК и Отмена.
vbRetryIgnoreCancel: Отображает кнопки «Повторить», «Игнорировать» и «Отменить».
С параметром заголовка окна вы передаете текст, который отображается в заголовке окна. Также заключите это значение в кавычки. Примером может служить фраза «Это заголовок окна».
Следующая строка программы демонстрирует использование функции MsgBox на примере:
Показать дополнительное окно
a = MsgBox («Этот текст появляется в окне сообщения», vbokcancel, «Это заголовок окна»)
Конец подписки
Если Excel выполнит команду, вы получите окно, показанное на следующем рисунке:
Вы можете запросить, какую кнопку использует пользователь для закрытия окна, используя переменную возвращаемого значения, в случае примера программы, используя переменную «a». Возможные возвращаемые значения: vbOk, vbCancel, vbRetry, vbIgnore для соответствующих кнопок.