基本的に、2つの入力ボックスが必要です。最初の入力ボックスはユーザーに値を入力するように求め、ユーザーが [OK] をクリックすると 2 番目の入力ボックスにプロンプトが表示されます。2 番目の入力ボックスのデフォルト値は、最初の入力ボックスの値の 1 セル右の値になります。これは私が達成したいことですが、入力ボックスの問題は、キャンセルボタンがエラーメッセージをスローするか、サブを終了しないことです。
私の目標を達成するための他の同様のアプローチはありますか?よろしくお願いします!
必要な値であるため、. は使用しないでくださいInputBox
。を使用しApplication.Inputbox
ます。F1
Excel でマジック キーを押してApplication.Inputbox
入力すると、どこからともなくマジック テキストが表示されます ;)
使用例を次に示します。
Ret = Application.InputBox(prompt := "Please enter a value", type := 1)
タイプに注意してください1
。
私はあなたに正確な答えを与えることができますが、これであなたが始めることができると確信しています;)そうでない場合は、返信してください:)