マクロで更新日表示。。。

質問

エクセルで今日の日付を自動で入れるときは、「=ｎｏｗ()」もしくは「=today()」でできますが、開いたシートのデータを更新したときだけ、任意のセルに今日の日付（更新日）が自動で入るようにしたいと思います。（シートを開いてもそのシートを修正しなかったら日付は変わらないようにしたいです）

マクロを作成しないとできないと思いますが、なにせマクロ初心者なものでよく分かりません。

シートのどこかのセルが修正されたら、日付を入れたいセルに「ｃｔｒｌ＋；」で更新日が入るようなマクロを作ればよいと思うのですが、具体的にどうすれば、このようなマクロが作成できるのでしょうか？？？？

回答No.1

merlionXX

１．設定したいシートのタブを右クリックし、「コードの表示」を選択。
２．出てきたVisualBasicEditor（白い部分）に下記のコードをコピペ。

'*****ここから下をコピペ*****

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Range("A1") = Format(Date, "yyyy/m/d")
Application.EnableEvents = True
End Sub

'*****ここより上までをコピペ*****

３．AltキーとF11キーを同時に押してワークシートへもどります。

これで、設定したしーとが変更された場合、A1セルに変更日が入ります。

お礼

できました。(^^♪

親切にありがとうございました。勉強になりました。