【エクセルVBAの基本】InputBox関数,InputBoxメソッドの使い方をわかりやすく解説

はじめに
InputBox関数の基本
1. InputBox関数の使用例
InputBoxメソッドの基本
1. InputBoxメソッドの使用例
InputBoxの応用
1. 数値のみを受け入れるInputBox
まとめ

はじめに

Excel VBAのプログラミングにおいて、InputBox関数とInputBoxメソッドはユーザーからの入力を受け取るために非常に重要です。この記事を読むことで、以下のメリットが得られます：

InputBox関数とInputBoxメソッドの基本的な使い方を理解できる。
VBAでのユーザー入力の取り扱い方を学べる。
実際のコード例を通して、VBAの基本的なスキルを身につけることができる。

InputBox関数の基本

Excel VBAでユーザーからの入力を受け取る簡単な方法の一つがInputBox関数です。この関数は、ダイアログボックスを表示し、ユーザーにテキストの入力を求めます。基本的な構文は以下の通りです：

Dim result As String
result = InputBox("メッセージ", "タイトル", "デフォルトのテキスト")

"メッセージ"：ユーザーに表示するメッセージ。
"タイトル"：ダイアログボックスのタイトル。
"デフォルトのテキスト"：テキストボックスに予め表示されるテキスト（オプション）。

InputBox関数の使用例

Sub ExampleInputBox()
    Dim userName As String
    userName = InputBox("あなたの名前を入力してください", "名前の入力")
    MsgBox "こんにちは、" & userName & "さん！"
End Sub

この例では、ユーザーに名前の入力を求め、その名前を使ってメッセージを表示します。

InputBoxメソッドの基本

InputBoxメソッドは、Applicationオブジェクトの一部として提供され、InputBox関数と似ていますが、より多くのオプションを提供します。構文は以下の通りです：

Dim result As String
result = Application.InputBox(prompt, title, default, left, top, helpfile, helpcontextid, type)

prompt：ユーザーに表示するメッセージ。
title：ダイアログボックスのタイトル（オプション）。
default：デフォルトのテキスト（オプション）。
left, top：ダイアログボックスの位置（オプション）。
helpfile, helpcontextid：ヘルプファイルとコンテキストID（オプション）。
type：入力データのタイプを指定（オプション）。

InputBoxメソッドの使用例

Sub ExampleApplicationInputBox()
    Dim age As Integer
    age = Application.InputBox("あなたの年齢を入力してください", "年齢の入力", Type:=1)
    MsgBox "あなたは " & age & " 歳です。"
End Sub

この例では、ユーザーに年齢の入力を求め、その年齢を使ってメッセージを表示します。

InputBoxの応用

InputBox関数とメソッドは、単純なテキスト入力だけでなく、数値や日付などの特定のタイプのデータを要求する場合にも使用できます。例えば、Typeパラメータを使用して、数値のみを受け入れるように設定することができます。

数値のみを受け入れるInputBox

Sub ExampleNumericInputBox()
    Dim number As Double
    number = Application.InputBox("数値を入力してください", "数値の入力", Type:=1)
    MsgBox "入力された数値は " & number & " です。"
End Sub

このコードでは、ユーザーが数値以外のものを入力すると、エラーメッセージが表示されます。