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

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

No.2 ベストアンサー 回答者： macchan1 回答日時： 2005/03/04 22:02

マクロで対応するならこんな感じでできます。

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」などとしてください。

この回答へのお礼

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

お礼日時：2005/03/05 09:48

No.1 回答者： sanpin-cha 回答日時： 2005/03/04 19:14

A1の「セルの書式設定」で「表示形式」をすべて日付にします。

２日にしたいシートのA1に　=Sheet1!A1+1　（Sheet1は1日）

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

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

この回答へのお礼

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

お礼日時：2005/03/05 10:05