IT系/VBA/基本/簡単な入出力（MsgBox・InputBox）

Last-modified: 2020-07-10 (金) 23:17:13

目次

概要

簡単な入出力（MsgBox・InputBox）に関するVBAのTIPS。

メッセージボックス(MsgBox関数)

  • メッセージを出力するダイアログボックスを表示。
  • ユーザーに選択（「はい」「いいえ」や「OK」「CANCEL」等）してもらい、その選択結果を受け取ることも可能。

用例

  • "Hello world"メッセージを出力 
    MsgBox "Hello world"
  • ボタンの種類「OKのみ」、タイトル付き 
    MsgBox "出来ました。", vbOKOnly, "タイトル"
  • 問合せダイアログを表示。ボタンの種類（はい／いいえ）、アイコンの種類（問合せ）、標準ボタン（2番目：デフォルトをいいえ）を指定。 
    Dim rtn As Integer
rtn = MsgBox("出来ましたか？", vbYesNo + vbQuestion + vbDefaultButton2, "確認")

インプットボックス(InputBox関数)

  • ダイアログボックスにメッセージとテキスト ボックスを表示し、ユーザーが入力した文字列を取得することができる。
  • 何も入力されなかったか、「キャンセル」ボタンが押された場合は、空白が返される。

用例

  • メッセージのみを指定 
    Dim message As String
message = InputBox("メッセージを入力してください")
  • メッセージ、タイトル、デフォルト値を指定 
    Dim strIn As String
strIn = InputBox("何か入力して下さい。", "ユーザー入力", "規定文字")
If strIn = "" Then
　　MsgBox "何も入力されませんでした。"
End If
  • メッセージ、表示位置（左上隅）を指定 
    Dim strIn As String
strIn = InputBox("何か入力して下さい。", , , 0, 0)

リンク集

重複を恐れないリンク集。

その他メモ