あなたは値を入力するようユーザーに促すためにエクセルVBAでInputBox関数を使用することができます。ワークシート上のコマンドボタンを配置し、次のコード行を追加します。

1.まず、Variant型の変数myValueを宣言します。

Dim myValue As Variant

注:Variant型の変数が値の任意の型を保持することができますので、我々はここにVariant型の変数を使用します。この方法では、ユーザーは、テキスト、数字などを入力することができ

入力ボックスを表示するには、次のコード行を追加します。2.。

myValue = InputBox("Give me some input")

InputBox Function in Excel VBA

3.セルA1にmyValueの値を書き込みます。

Range("A1").Value = myValue

ユーザーが値5を入力し、[OK]ボタンをクリックしたときに生じます。

InputBox Function Result

  1. InputBox関数は、より多くのオプションの引数を持っています。次のコード行が示すタイトル入力ボックスには、タイトルバーに表示され、デフォルト値を持っています。他の入力が提供されていない場合は、デフォルト値が使用されます。

myValue = InputBox("Give me some input", "Hi", 1)

InputBox Function in Excel VBA

ユーザーが唯一のOKボタンをクリックしたときに生じます。

InputBox Function Result

注:Visual BasicエディターでInputBox関数にカーソルを置き、他のオプションの引数についてのヘルプはF1をクリックします。