Możesz użyć Funkcja InputBox w Excel VBA aby poprosić użytkownika o wprowadzenie wartości. Umieść przycisk polecenia w arkuszu i dodaj następujące wiersze kodu:
1. Najpierw zadeklaruj zmienną myValue typu Variant.
Przyciemnij moją wartość jako wariant
Uwaga: używamy tutaj zmiennej typu Variant, ponieważ zmienna Variant może przechowywać dowolny typ wartości. W ten sposób użytkownik może wprowadzać tekst, liczby itp.
2. Dodaj następującą linię kodu, aby wyświetlić pole wprowadzania.
mojaWartość = InputBox("Daj mi trochę danych wejściowych")
3. Wpisz wartość myValue do komórki A1.
Zakres("A1").Wartość = mojaWartość
Wynik, gdy użytkownik wprowadzi wartość 5 i kliknie przycisk OK.
4. Funkcja InputBox ma więcej opcjonalnych argumentów. Poniższa linia kodu przedstawia pole wprowadzania z tytułem wyświetlanym na pasku tytułu i ma wartość domyślną. W przypadku braku innych danych wejściowych zostanie użyta wartość domyślna.
mojaWartość = InputBox("Daj mi jakieś dane", "Cześć", 1)
Wynik, gdy użytkownik kliknie tylko przycisk OK.
Uwaga: Umieść kursor na InputBox w Edytorze Visual Basic i kliknij F1, aby uzyskać pomoc dotyczącą innych opcjonalnych argumentów.