エクセルマクロVBA サンプルコード辞書
トップページ（目次）438.入力窓を表示して入力する
＜実行前後＞
→
Sub 入力窓を表示して入力する()
入力文字 = InputBox("", "文字を入力してください", "ここに入力")
Range("A1") = 入力文字
End SubSub 入力窓を表示して入力する()
入力文字 = InputBox("", "文字を入力してください", "ここに入力")
Range("A1") = 入力文字
End Sub