Galite naudoti „InputBox“ funkcija į Excel VBA paraginti vartotoją įvesti vertę. Įdėkite komandų mygtuką į savo darbalapį ir pridėkite šias kodo eilutes:
1. Pirmiausia deklaruokite Variant tipo kintamąjį myValue.
Dim myValue As Variant
Pastaba: čia naudojame Variant tipo kintamąjį, nes Variant kintamasis gali turėti bet kokio tipo reikšmes. Tokiu būdu vartotojas gali įvesti tekstą, skaičius ir kt.
2. Norėdami parodyti įvesties laukelį, pridėkite šią kodo eilutę.
myValue = InputBox ("Duok man įvesties")
3. Į langelį A1 įrašykite myValue reikšmę.
Diapazonas („A1“). Reikšmė = myValue
Rezultatas, kai vartotojas įveda vertę 5 ir spustelėja mygtuką Gerai.
4. Funkcija „InputBox“ turi daugiau pasirenkamų argumentų. Šioje kodo eilutėje rodomas įvesties langelis, kurio pavadinimo juostoje rodomas pavadinimas ir kurio numatytoji reikšmė. Numatytoji vertė bus naudojama, jei nepateikiama jokia kita įvestis.
myValue = InputBox ("Duok man įvesties", "Labas", 1)
Rezultatas, kai vartotojas spustelėja tik mygtuką Gerai.
Pastaba: užveskite žymeklį ant „InputBox“ „Visual Basic“ redaktoriuje ir spustelėkite F1, kad gautumėte pagalbos dėl kitų pasirenkamų argumentų.