エクセルのシート間で連続した日付データを作りたい

質問

オートフィル機能をシート間の串刺しでやりたいと考えています。
現在、日付ごとに１日から３１日までの３１枚のシートがあります。
１枚目のシートのＡ１セルに１月１日と入力すると、その後３０枚のシートのセルＡ１にそれぞれ１月２日～３１日までの日付が自動で表示できるようにしたいのですが、どのようにすれば楽に処理できるのでしょうか？
なお、Ａ２セルには曜日も表示させる予定です。
ご存じの方がいらっしゃいましたら、ぜひお知恵を拝借させて下さい。

回答No.2

macchan1 · ベストアンサー

マクロで対応するならこんな感じでできます。
Alt+F11でVBEを起動して、「挿入」「標準モジュール」でこのコードを貼り付けで、エクセルで「ツール」「マクロ」からこのコードを実行してください。

Sub sample()
Dim i As Integer
For i = 1 To 30
Sheets(i + 1).Range("a1").Value = Sheets(i).Range("a1").Value + 1
Next i
End Sub

ちなみに曜日のほうは、一番左のシートを選択し、Shiftキーを押しながら一番右のシートを選択して作業グループにしてB1セルに「=A1」と入力してセルの書式設定でユーザー定義で「aaaa」などとしてください。

お礼

いままで、書店の参考書を探し回っても分からなかったことが、ビックリするくらい簡単に処理ができました。
本当に感謝しています！
ありがとうございました。

回答No.1

sanpin-cha

A1の「セルの書式設定」で「表示形式」をすべて日付にします。
２日にしたいシートのA1に　=Sheet1!A1+1　（Sheet1は1日）

３日にしたいシートのA1に　=Sheet1!A1+2

A2は　=A1　にして　
「セルの書式設定」→「表示形式」→「ユーザー定義」で　aaa　にします。

お礼

にすぐに回答していただきありがとうございました。
うれしかったです。