【Excelマクロ】インプットボックスの使い方をまとめておく【超簡易】

　こんにちは、masaです。

　今日は自分用のメモとして「インプットボックスの使い方」についてまとめておこうと思います。

　「メッセージボックス」と混同しがちだけど、正しいのは「インプットボックス」。 

　たまにしか使わないから忘れちゃうんですよね…。

インプットボックスの使い方

Sub インプットボックスの使い方()

Dim ans As Variant

ans = InputBox("任意のデータを入力してください", "データ入力", "")

’入力してあって、OKをクリックした場合にA1の値が入力されます。

If ans <> "" Then
Range("a1").Value = ans
End If

End Sub

▼起動するとこんな感じです。（コード内でAlt+F11）