エクセル ヘッダー(フッター)に更新日を挿入

エクセルで作成・更新した資料を管理する目的で、ヘッダーあるいはフッターに更新日を入れたいのですがどのようにすればよいでしょうか。
「ページ設定」－「ヘッダー／フッター」にある[日付]やTODAY関数では、ファイルを開いた日の日付が入ってしまい、過去に作成した資料も現在の日付で印刷されてしまいますので使えません。
イメージとしては、マクロ(？)を作成して、更新したシートをアクティブな状態にしてマクロを実行するとシートごとに更新日がフッターに挿入されるようなものをです。
さらに、わがままを言えば同一ブック内のシート間に参照がある場合、変更がされる参照先のシートのフッターも変更されると、なおありがたいです。

No.2 ベストアンサー 回答者： merlionXX 回答日時： 2006/10/30 17:03

VBAでやってみました。

VisualBasicEditorの、標準モジュールやシートのモジュールではなく、ThisWorkbookに貼り付けてください。
更新したシートをアクティブな状態にしてマクロを実行すると、更新日がそのシートの右ヘッダーに挿入されます。

Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
ActiveSheet.PageSetup.RightHeader = Format(Date, "yyyy/m/d 更新")
End Sub

この回答への補足

ご回答有難うございました。
ついでといっては何ですが、標準フォントは１１ｐｔの時にこのヘッダー内の更新日だけ８ｐｔにするためにはどうすればよいのでしょうか？
VBAの基本がわかっていないので＆８をどの部分に挿入すればよいのかわかりません。
よろしくお願いします。

補足日時：2006/11/01 13:26

No.1 回答者： redcycle 回答日時： 2006/10/30 16:26

(・∀・)ドモ

そのようなものが見当たらないため、サポート外と思われます。

よって、
自分で入れるしかないです！


なお
プログラムを使用すれば、出来ないことは無いと思いますが。

プログラム未経験者は厳しいですが。

では、頑張ってください！