Проверка значения Inputbox (Microsoft Office Excel)

Posted by obzor under Basic

Пользователь должен указать период (квартал — 1,2,3,4) через Inputbox. Не получатся сделать проверку введенного пользователем значения KW (квартал) — допустимые значения только 1,2,3,4.

Hugo121

Ввод:
    Do
        KW = CLng(Val(InputBox("Укажите период(1,2,3,4 квартал), за который нужно сформировать отчет")))
        If KW < 1 Or KW > 4 Then
            MsgBox "Вы неправильно указали период! Допустимые значения 1,2,3,4"
        Else
            Exit Do
        End If
    Loop
Дальше:

С дробными как-то некузяво…

тема на форуме

Похожие статьи

• Макрос для очищения строк по критерию
• Как оптимизировать макрос VBA в Microsoft Office Excel?
• Макрос, который находит повторяющийся текст при его вводе и выводит окно предупреждения
• Удаление пустых столбцов в таблице
• Как создать макрос, который бы вставлял слово по первой набранной букве?
• Запуск макроса в открытом на данный момент Word
• Чтение и запись в файл в юникоде с помощью макросов в excel
• Срабатывание разных макросов при изменении разных диапазонов на листе
• Открыть несколько книг excel из одной папки с одинаковым расширением
• Копирование части текста (выделенного полужирным) из ячейки