VBA関数のInputBox関数

InputBox関数は、VBA関数の中で制御・入出力関数に分類される関数です。

目次

• InputBox関数とは
• InputBox関数のサンプルコード
  • 実行結果
  • 解説

InputBox関数とは

InputBox関数は、文字列型 (String) の値を返します。ダイアログ ボックスにメッセージとテキスト ボックスを表示し、文字列が入力されるか、またはボタンがクリックされると、テキスト ボックスの内容を返します。

名前付き引数 helpfile と context の両方を指定すると、ユーザ-は F1 キー(Windows の場合) または Help キー (Macintosh の場合) を押してコンテキスト番号に対応するヘルプ トピックを参照できます。たとえば Microsoft Excel などのホスト アプリケーションでは、自動的にダイアログ ボックスに [OK] ボタンが追加されます。[OK] ボタンをクリックするか、または Enter キーを押すと、InputBox 関数はテキスト ボックスの内容を返します。[キャンセル] ボタンをクリックすると、InputBox 関数は長さ 0 の文字列 ("") を返します。
名前付き引数 prompt 以外の引数も指定する場合は、式の中で InputBox 関数を使う必要があります。この場合、引数を省略するには、それに対応する位置にカンマ区切り記号を記述します。

InputBox関数のサンプルコード

次の例は、InputBox 関数を使って、ユーザーに値を入力させます。位置 x と y の指定を省略すると、ダイアログ ボックスは、水平軸および垂直軸に対して中央に自動的に配置されます。[OK] がクリックされるか、Enter キーが押されると、変数 MyValue には、ユーザーの入力した値が入ります。[キャンセル] がクリックされると、InputBox 関数は長さ 0 の文字列を返します。

Sub Sample

Dim Message, Title, Default, MyValue
Message = "1 から 3 までの値を入力してください。"    ' 入力を求めるメッセージを設定します。
Title = "InputBox ﾃﾞﾓ"                ' タイトルを設定します。
Default = "1"                            ' 既定値を設定します。
' メッセージ、タイトル、既定値を表示します。
MyValue = InputBox(Message, Title, Default)

' 状況依存のヘルプを設定します。ヘルプ ボタンが自動的に追加されます。
MyValue = InputBox(Message, Title, , , , "DEMO.HLP", 10)

' ダイアログ ボックスを位置 100,100 に表示します。
MyValue = InputBox(Message, Title, Default, 100, 100)

End Sub

実行結果

解説

制御・入出力関数一覧