Функція MsgBox в Excel VBA може повернути результат, тоді як простий MsgBox - ні.
Ситуація:
Помістіть команду на робочому аркуші та додайте такі рядки коду:
1. Спочатку ми оголошуємо змінну під назвою відповідь типу Integer.
Нечітка відповідь Як ціле число
2. Ми використовуємо функцію MsgBox для ініціалізації змінної відповіді введенням від користувача.
Функція MsgBox при використанні дужок має три аргументи. Перша частина використовується для повідомлення у вікні повідомлення. Використовуйте другу частину, щоб вказати, які кнопки та значки ви хочете відображати у вікні повідомлення. Третя частина відображається у рядку заголовка вікна повідомлення.
answer = MsgBox ("Ви впевнені, що хочете очистити аркуш?", vbТакНі + vbQuestion, "Порожній аркуш")
Примітка: Наведіть курсор на vbYesNo у редакторі Visual Basic та натисніть F1, щоб побачити, які ще кнопки та значки можна використовувати. Замість констант vbYesNo та vbQuestion можна також використовувати відповідні значення 4 та 32.
3. Якщо користувач натискає кнопку Так, Excel VBA очищає аркуш. Якщо користувач натискає кнопку «Ні», нічого не відбувається. Щоб домогтися цього, додайте наступні рядки коду.
Якщо відповідь = vbТак
Осередки.Ясний зміст
Інакше
'нічого не робити
Закінчити Якщо
4. Натисніть кнопку команди на аркуші.
5. Натисніть Так.
Результат:
