Можете да използвате InputBox функция в Excel VBA да подканя потребителя да въведе стойност. Поставете команден бутон на работния си лист и добавете следните кодови редове:
1. Първо, декларирайте променливата myValue от тип Variant.
Затъмнете myValue като вариант
Забележка: тук използваме променлива от тип Variant, тъй като променлива Variant може да съдържа всякакъв вид стойност. По този начин потребителят може да въвежда текст, цифри и т.н.
2. Добавете следния код, за да се покаже полето за въвеждане.
myValue = InputBox ("Дайте малко информация")
3. Запишете стойността на myValue в клетка A1.
Диапазон ("A1"). Стойност = myValue
Резултат, когато потребителят въведе стойността 5 и кликне върху бутона OK.
4. Функцията InputBox има повече незадължителни аргументи. Следният кодов ред показва поле за въвеждане със заглавие, показвано в заглавната лента и има стойност по подразбиране. Стойността по подразбиране ще се използва, ако не е предоставен друг вход.
myValue = InputBox ("Дайте малко информация", "Здравей", 1)
Резултат, когато потребителят само щракне върху бутона OK.
Забележка: Поставете курсора върху InputBox в редактора на Visual Basic и щракнете върху F1 за помощ по другите незадължителни аргументи.