エクセルのマクロで

質問

前に、誰かが作ったエクセルマクロのツールで、下記のような機能がありました。

申請書を作成するツールで、エクセルを開くと申請書のフォーマットが開かれます。
そして『日付を入力してください』というメッセージウィンドウが出てきて、そのウィンドウに日付を入力します。
ウィンドウのOKをクリックすると、『氏名を入力してください』とか『部署を入力してください』などのウィンドウが出てきて、出てくるウィンドウの通りに入力していくと、申請書が仕上がるというものです。

このウィンドウはどうやって作るのですか？
マクロ初心者です。宜しくお願いします。

回答No.2

hige_082 · ベストアンサー

詳細がないので、サンプルのみ

'標準モジュールへ
Sub test()
Dim 質問 As Variant
Dim 出力先 As Variant
Dim i As Integer
質問 = Split("氏名 年齢 性別 生年月日 住所 電話番号")
出力先 = Split("A1 B1 A2 B2 C1 C2")
If UBound(質問) <> UBound(出力先) Then MsgBox "質問数と出力数が違います": Exit Sub
For i = 0 To UBound(質問)
Range(出力先(i)).Value = InputBox(質問(i) & "を入力してください")
Next i
End Sub

アレンジはご自分でお願いします

お礼

ご回答ありがとうございます。
マクロ組んだ事がないので、全然理解出来ないんですが、
教えて頂いたサンプルを本などで調べて勉強してみます！
ありがとうございます。

回答No.1

hana-hana3

INPUTBOX

http://officetanaka.net/excel/vba/tips/tips37.htm

お礼

お礼が遅くなってしまい、申し訳ございません。
教えて頂いた例をコピペして作ってみたら出来ました！
ありがとうございます。