Excel VBA Функция InputBox
Вы можете использовать функцию InputBox в Excel VBA, чтобы предложить пользователю ввести значение. Поместите командную кнопку на листе и добавьте строки следующего кода:
-
Во-первых, объявить переменную MyValue типа Variant.
Dim myValue As Variant
Примечание: мы используем переменную типа Variant здесь, потому что переменная Variant может содержать значения любого типа. Таким образом, пользователь может вводить текст, цифры и т.д.
-
Добавьте следующую строку кода, чтобы показать окно ввода.
myValue = InputBox("Give me some input")
-
Записать значение MyValue в ячейку A1.
Range("A1").Value = myValue
Результат, когда пользователь вводит значение 5 и нажимает на кнопку OK.
-
Функция InputBox имеет несколько дополнительных аргументов. Следующий код линия показывает поле ввода с названием отображается в строке заголовка и имеет значение по умолчанию. Значение по умолчанию будет использоваться, если никакой другой вход не предусмотрен.
myValue = InputBox("Give me some input", "Hi", 1)
Результат, когда пользователь только нажимает на кнопку OK.
Примечание: Наведите курсор на InputBox в редакторе Visual Basic и нажмите F1 для получения справки о других дополнительных аргументах.