エクセルで「○年○月○日作成」を自動表示

エクセルで「○年○月○日作成」を自動表示する方法を教えてください。（書類を作成したその日の日付が自動入力されるよう）

No.8 ベストアンサー 回答者： imogasi 回答日時： 2002/10/09 17:20

VBAですが、ブックを閉じた時の日付けを例えばＤ１セルに表示するのはどうですか。

Private Sub Workbook_BeforeClose(Cancel As Boolean)
Cells(1, 4) = Date & "作成"
End Sub
開いた時は「02/10/09作成」（ブックを閉じた日）になります。
または
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
Cells(1, 4) = Date & "作成"
End Sub
の方が良いかもしれません
（１）ワークシートの画面でＡＬＴ＋Ｆ１１
（２）ＡＬＴ＋Ｉ、ＡＬＴ＋Ｍ
（３）ＶＢＡプロジェクトのThisWorkbookに上記コードを
貼り付け。

No.7 回答者： noname#8602 回答日時： 2002/10/09 17:08

印刷した日付とかファイルを開いた日付というご質問なら、すでに回答がついているとおりです。

保存した日という意味のご質問なら、ファイル名に「保存の年月日と識別文字列」を書き、ファイル名をヘッダにすれば、簡単にできると思います。私は、10年以上前から、この方法です。

No.6 回答者： aptiva 回答日時： 2002/10/09 17:04

みなさんの方法(TODAY関数)だと、現在の日付が表示されてしまいますよね？

つまり、書類を実際に作成した日は正しく作成日が表示されますが、後日その書類を開くと開いた日付に変わってしまいます。（そういう関数なので当たり前ですが。）

質問者の方が言われる作成した日＝開いた日（印刷した日等）でもよければいいのですが……。かといって、簡単な別の方法は思いつきません。
方法としたら、指定のセル（現在のセル位置等）に日付を入力するマクロ(VBA)を作るくらいかな……？

No.5 回答者： MSZ006 回答日時： 2002/10/09 16:45

TODAY関数ではそのエクセルファイルを開いた日付に更新されてしまうのでちょっと違うような気がします。

（自動計算をしない設定にしておけば大丈夫なような気もしますが…）
ファイルのプロパティの作成日付を持ってこればよいのでは？（方法はわかりません。VBAでできるかも…？）

No.4 回答者： sacoman 回答日時： 2002/10/09 16:16

一つのセルに表示させるなら、

=TEXT(TODAY(),"yyyy年mm月dd月")&"作成"
こんな具合です。
mmやddは、m、dと一文字にしておくと、つきや日が、一桁台の日は、頭に0が表示されないようになります。桁を合わせなくてよいなら、m、dそれぞれ一文字ずつにしてもいいと思います。

No.3 回答者： hinebot 回答日時： 2002/10/09 15:50

そのセルに

=TODAY()
と入れれば、現在の日付が表示されます。
あとは、セルの書式設定の表示形式－日付から、「○年○月○日」のものを選択してください。
次いで、そのセルの配置を「右寄せ」にします。
そして、その右隣のセルに「作成」を「左寄せ」で入れれば完成です。

No.2 回答者： papaianatsumi 回答日時： 2002/10/09 15:48

エクセルのヴァージョンにもよるかもしれないですけど・・・。

ファイル→ページ設定→ヘッダーフッター→ヘッダーに（上の方に表示する場合）はヘッダーの編集。フッターならフッターの編集→そうすると左側、中央部、右側という欄があると思うので自分が置きたい場所にカーソルを持っていき、カレンダーマークのボタンがあると思うのでそこをクリック。そして、ＯＫ。これがダメなら手で入力すれば出てきます。

No.1 回答者： Black_Tiger 回答日時： 2002/10/09 15:46

こんにちは。

単純な話「ＴＯＤＡＹ関数」と表示形式だけでＯＫでは？

任意のセルに「 =TODAY() 」とはる。
次にセルの書式設定で“表示形式”を“ユーザ定義”にし、「ggge"年"m"月"d"日作成"」とすればどうでしょう？