Dacă doriți să obțineți informații de la utilizator, puteți utiliza funcția INPUTBOX.
Această funcție afișează o casetă de dialog care permite utilizatorului să completeze orice și să returneze conținutul ca un șir.
Uneori doriți să decideți ce ar trebui să completeze utilizatorul, în loc să acceptați orice informații. Atunci folosiți metoda INPUTBOX:
Sub DecideUserInput () Dim bText As String, bNumber As Integer 'aici este funcția INPUTBOX: bText = InputBox ("Insert in a text", "This accepts any input")' aici este metoda INPUTBOX: bNumber = Application. InputBox („Introduceți un număr”, „Aceasta acceptă numai numerele”, 1) MsgBox „Ați inserat:„ & Chr (13) & _ bText & Chr (13) & bNumber,, „Rezultat din casetele INPUT” End Sub
Metoda INPUTBOX are un al treilea argument, Type, care decide ce este permis utilizatorului să insereze în dialogul INPUTBOX.
Tipul poate fi unul dintre următoarele:
Tip :
Intrare acceptată: 0 O formulă 1 Un număr 2 Text 4 O valoare logică (Adevărat sau Fals) 8 O referință de celulă, de ex. a Range-object 16 O valoare de eroare, de ex. # N / A 64 O serie de valori
Când rulăm macrocomanda vom vedea următoarele casete de intrare:
În acest fel putem obține rezultatul prin caseta de mesaj.