Pokud chcete od uživatele získat jakékoli informace, můžete použít funkci INPUTBOX.
Tato funkce zobrazí dialogové okno, které uživateli umožní vyplnit cokoli v hostinci a vrátí obsah jako řetězec.
Někdy se místo přijetí jakýchkoli informací chcete rozhodnout, co má uživatel vyplnit. Tehdy použijete metodu INPUTBOX:
Sub DecideUserInput () Dim bText jako řetězec, bNumber As Integer 'zde je funkce INPUTBOX: bText = InputBox („Vložit do textu“, „Toto přijímá jakýkoli vstup“)' zde je metoda INPUTBOX: bNumber = aplikace. InputBox („Vložte číslo“, „Toto přijímá pouze čísla“, 1) MsgBox „Vložili jste:“ & Chr (13) & _ bText & Chr (13) & bNumber, „Výsledek z VSTUPNÍCH boxů“ End Sub
Metoda INPUTBOX má třetí argument, typ, který rozhoduje o tom, co je uživateli povoleno vložit do dialogu INPUTBOX.
Typ může být jeden z následujících:
Typ:
Přijatý vstup: 0 A vzorec 1 A číslo 2 Text 4 Logická hodnota (pravda nebo nepravda) 8 Odkaz na buňku, např. a Range-object 16 Chybová hodnota, např. #N/A 64 Pole hodnot
Když spustíme makro, uvidíme následující vstupní pole:
Tímto způsobem můžeme získat výsledek prostřednictvím pole se zprávou.