Jei norite gauti informacijos iš vartotojo, galite naudoti funkciją INPUTBOX.
Ši funkcija rodo dialogo langą, leidžiantį vartotojui užpildyti bet ką ir grąžinti turinį kaip eilutę.
Kartais jūs norite nuspręsti, ką vartotojas turėtų užpildyti, užuot priėmęs bet kokią informaciją. Tada jūs naudojate INPUTBOX metodą:
Sub DecideUserInput () Dim bText As String, bNumber As Integer 'čia yra INPUTBOX funkcija: bText = InputBox ("Įterpti į tekstą", "Tai priima bet kokį įvestį")' čia yra INPUTBOX metodas: bNumber = Application. „InputBox“ („Įterpti skaičių“, „Priimami tik skaičiai“, 1) „MsgBox“ „Įterpėte:“ & Chr (13) & _ bText & Chr (13) & bNumber,, „INPUT-box“ rezultatas
INPUTBOX metodas turi trečiąjį argumentą Type, kuris nustato, ką vartotojui leidžiama įterpti į INPUTBOX dialogą.
Tipas gali būti vienas iš šių:
Tipas:
Priimta įvestis: 0 A formulė 1 A skaičius 2 Tekstas 4 Loginė vertė (tiesa ar klaidinga) 8 Langelio nuoroda, pvz. a Range-object 16 Klaidos reikšmė, pvz. #N/A 64 Vertybių masyvas
Vykdydami makrokomandą pamatysime šiuos įvesties laukelius:
Tokiu būdu mes galime gauti rezultatą per pranešimų laukelį.