Exceli VBA sisendkast
VBA InputBox on sisseehitatud funktsioon, mida kasutatakse kasutajalt väärtuse saamiseks. Sellel funktsioonil on kaks peamist argumenti, milles üks on sisendkasti pealkiri ja teine on sisendkasti küsimus. Sisendkasti funktsioon võib salvestada ainult sisestatud andmetüüpe mida see muutuja mahutab.
Sageli kasutame Excelis andmeid, mis on Exceli lehel juba olemas. Mõnikord vajame mingisuguseid sisendandmeid ka kasutajatelt. Eriti VBA-s on sageli vaja kasutaja sisestust.
InputBoxi abil saame andmed kasutajalt kätte ja kasutada neid oma eesmärkidel. InputBox palub kasutajal sisestada väärtus, kuvades InputBox.
Süntaks
- Viip: See pole midagi muud kui sõnum kasutajale sisendkasti kaudu.
- Pealkiri: Mis on sisendkasti pealkiri?
- Vaikimisi: mis on sisendkasti vaikeväärtus? See väärtus kuvatakse sisendkasti tippimisalal.
Need kolm parameetrit on Excelis piisavalt head. Eirake ülejäänud 4 valikulist parameetrit. Selle süntaksi mõistmiseks vaadake allolevat ekraanipilti.
Kuidas luua InputBoxi VBA-s?
Ok, laseb kohe praktilisuse juurde minna. Esimese sisendkasti loomiseks toimige järgmiselt.
1. samm: minge VBE (Visual Basic Editor) ja sisestage uus moodul.
2. samm: topeltklõpsake sisestatud moodulil ja looge makro nimi.
3. samm: hakake sisestama sõna „InputBox” ja näete sellega seotud suvandeid.
4. samm: valige sisendkast ja andke ruumi ja näete sisendkasti süntaksit.
5. samm: andke viip "Palun sisesta oma nimi".
6. samm: tippige sisendkasti pealkirjaks „Isiklik teave”.
7. samm: tippige vaikeväärtuseks „Sisestage siia”.
8. samm: oleme valmis. Käivitage see kood ja vaadake oma esimest sisestuskasti.
Salvestage InputBoxi väärtus lahtritesse
Nüüd läbime väärtuste lahtritesse salvestamise protsessi. Järgige alltoodud samme.
1. samm: muutuja deklareerimine Variantiks.
Kood:
Sub InputBox_Example () Dim i Variant End Sub
2. samm: määrake selle muutuja jaoks väärtus sisendkasti kaudu.
Kood:
Sub InputBox_Example () Dim i Variant i = InputBox ("Palun sisestage oma nimi", "Isiklik teave", "Sisestage siia") Lõpp alam
Märkus. Kui sisestuskast on võrdusmärgist paremal, peame sisestama argumendid või süntaks sulgudesse nagu meie tavalised valemid.
3. samm: olenemata sisendkasti sisestatud väärtusest, peame selle salvestama lahtrisse A1. Selle jaoks kirjutage kood vahemikuks (“A1”). Väärtus = i
Kood:
Sub InputBox_Example () Dim i Variant i = InputBox ("Palun sisestage oma nimi", "Isiklik teave", "Type siia") Vahemik ("A1"). Väärtus = i End Sub
Ok, oleme valmis. Käivitame selle koodi nüüd, vajutades klahvi F5, või saate koodi käivitada ka käsitsi, nagu on näidatud alloleval ekraanipildil.
Niipea kui olete selle koodi käivitanud, näeme sisendkasti.
Sisestage nimi ja klõpsake nuppu OK.
Niipea, kui sisestate nime ja klõpsate nuppu OK, näete lahtris A1 sisendkasti väärtust.
Märkus. Kui muutuja on õigesti määratletud, võime sisendkastist salvestada mis tahes väärtuse. Ülaltoodud näites olen määranud muutuja Variantiks, mis mahutab igat tüüpi andmeid.
Näiteks olen nüüd muutuja tüübi muutnud kuupäevaks.
Nüüd käivitage kood ja tüüp, välja arvatud kuupäev.
Klõpsake nuppu OK ja vaadake, mis vastus on.
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.
Seega valige vastavalt oma tüüp. Olen valinud parameetriks 1, st ainult numbrid.
Nüüd käivitage kood ja teksti väärtuse tüüp.
Klõpsake nuppu OK ja vaadake, mis juhtub.
Seal öeldakse, et number ei kehti. Nii saame sellesse sisendkasti sisestada ainult numbrid.
Asjad, mida meeles pidada
- Sisendikasti antud väärtuse salvestamiseks vajame muutujat.
- Kui kasutate InputBoxi ilma rakendusmeetodita, peaksite muutuja andmetüübi osas olema täiuslik.
- Kasutage andmetüüpi Variant, mis mahutab mis tahes tüüpi andmeid ja salvestusi.
