„Excel VBA“ įvesties dėžutė
„VBA InputBox“ yra integruota funkcija, naudojama norint gauti vertę iš vartotojo. Ši funkcija turi du pagrindinius argumentus, kurių vienas yra įvesties laukelio antraštė, o kitas - įvesties laukelio klausimas, įvesties dėžutės funkcija gali saugoti tik įvestų duomenų tipus kurį kintamasis gali laikyti.
Dažnai „Excel“ programoje naudojame duomenis, kurie jau yra „Excel“ lape. Kartais mums reikia ir tam tikrų įvesties duomenų iš vartotojų. Ypač VBA dažnai reikia vartotojo įvesties.
Naudodami „InputBox“ galime gauti duomenis iš vartotojo ir naudoti juos savo tikslams. „InputBox“ paprašys vartotojo įvesti vertę rodant „InputBox“.
Sintaksė
- Paraginimas: tai ne kas kita, kaip pranešimas vartotojui per įvesties laukelį.
- Pavadinimas: Koks yra įvesties laukelio pavadinimas?
- Numatytasis: kokia yra numatytoji įvesties dėžutės vertė? Ši vertė rodoma įvesties laukelio spausdinimo srityje.
Šie trys parametrai yra pakankamai geri „Excel“. Nepaisykite kitų 4 pasirenkamų parametrų. Norėdami suprasti šią sintaksę, žiūrėkite žemiau pateiktą ekrano kopiją.
Kaip sukurti „InputBox“ VBA?
Gerai, leidžia tiesiai pereiti prie praktiškumo. Atlikite toliau nurodytus veiksmus, kad sukurtumėte savo pirmąją įvesties dėžutę.
1 žingsnis: Eikite į VBE („Visual Basic Editor“) ir įdėkite naują modulį.
2 žingsnis: dukart spustelėkite įterptą modulį ir sukurkite makrokomandos pavadinimą.
3 žingsnis: Pradėkite rašyti žodį „InputBox“ ir pamatysite susijusias parinktis.
4 žingsnis: Pasirinkite įvesties langelį ir palikite vietos, ir pamatysite įvesties dėžės sintaksę.
5 žingsnis: Nurodykite raginimą kaip „Prašome įvesti savo vardą“.
6 veiksmas: įveskite įvesties dėžutės pavadinimą kaip „Asmeninė informacija“.
7 veiksmas: įveskite numatytąją vertę kaip „Įveskite čia“.
8 žingsnis: mes baigėme. Paleiskite šį kodą ir pamatykite savo pirmąjį įvesties laukelį.
Išsaugokite „InputBox“ vertę ląstelėse
Dabar mes atliksime reikšmių kaupimo ląstelėse procesą. Atlikite toliau nurodytus veiksmus.
1 veiksmas: kintamojo paskelbimas variantu.
Kodas:
Sub InputBox_Example () Dim i As Variant End Sub
2 žingsnis: Šio kintamojo reikšmę priskirkite per įvesties laukelį.
Kodas:
Sub InputBox_Example () Dim i As variant i = InputBox ("Įveskite savo vardą", "Asmeninė informacija", "Įveskite čia") Pabaiga Sub
Pastaba: Kai įvesties laukelis atsidurs lygybės ženklo dešinėje, mes turime įvesti argumentus ar sintaksę skliausteliuose, kaip ir įprastos formulės.
3 žingsnis: Dabar, nepriklausomai nuo įvesties laukelyje įrašytos vertės, turime ją laikyti A1 langelyje. Taigi tam parašykite kodą kaip diapazoną („A1“). Reikšmė = i
Kodas:
Sub InputBox_Example () Dim i As variantas i = InputBox ("Įveskite savo vardą", "Asmeninė informacija", "Tipas čia") Diapazonas ("A1"). Reikšmė = i Pabaiga
Gerai, mes baigėme. Paleiskime šį kodą dabar paspausdami klavišą F5, arba taip pat galite paleisti kodą rankiniu būdu, kaip parodyta žemiau esančioje ekrano kopijoje.
Kai tik paleisite šį kodą, pamatysime įvesties laukelį.
Įveskite vardą ir spustelėkite Gerai.
Kai tik įvesite vardą ir spustelėsite Gerai, A1 langelyje pamatysite įvesties laukelio vertę.
Pastaba: bet kokią reikšmę iš įvesties dėžutės galime išsaugoti, jei kintamasis yra tinkamai apibrėžtas. Ankstesniame pavyzdyje aš apibrėžiau kintamąjį kaip variantą, kuriame gali būti visų tipų duomenys.
Pavyzdžiui, dabar aš pakeičiau kintamojo tipą į Data.
Dabar paleiskite kodą ir įveskite kitą datą.
Spustelėkite Gerai ir pažiūrėkite, koks yra atsakymas.
We got the error value as Type mismatch. Since we have declared the variable data type as DATE, we cannot store anything other than DATE with an inputbox.
Now enter the date and see what happens.
As soon as you type the date and then click on OK and see what the response is.
Since we have entered the correct value, we got the result in the cell.
Validation of Input from User
You know what we can actually allow users to enter only specific value i.e., allow the user to enter only text, only number, only logical values, etc.
To perform this task, we need to use the method Application.InputBox.
Let’s look at the syntax of the Application.InputBox.
- Prompt: This is nothing but the message to the user through an input box.
- Title: What is the title of the input box?
- Default: What is the default value of the input box? This value appears in the typing area of the input box.
- Left: What should be the x position of the input box in the current window?
- Top: What should be the y position of the inputbox in the current window?
To start this, inputbox declare variable and assign the value to a variable.
Now to assign value to start the word Application.
After the word Application, put a dot (.) and type Inputbox.
Select the input box and open the bracket.
As usual, enter Prompt, Title, and Default Value.
Now ignore left, top, help file, help context ID by typing 5 commas (,).
Here Type means what should be the input string. Below are the validations available.
Taigi, atitinkamai, pasirinkite savo tipą. Parametru pasirinkau 1, ty tik skaičius.
Dabar paleiskite kodą ir teksto vertės tipą.
Spustelėkite Gerai ir sužinokite, kas atsitiks.
Joje sakoma, kad numeris negalioja. Taigi šiame įvesties laukelyje galime įvesti tik skaičius.
Ką reikia atsiminti
- Mums reikia kintamojo, kad išsaugotume įvesties laukelio pateiktą vertę.
- Jei „InputBox“ naudojate be „Application“ metodo, turėtumėte puikiai žinoti kintamųjų duomenų tipą.
- Naudokite duomenų tipą Variant, kuriame gali būti bet kokio tipo duomenys ir saugyklos.
