特定セルの内容を更新したら、その更新日を自動的に表示する方法について

エクセルで、特定のセルの内容を更新すると、別の特定セルに　更新日付が自動的に表示させたいと思っております。
例えば『A1』へ新規に文字入力したり、セルの内容を更新した時に、セル『B1』にその日の日付が自動で表示される。
そして、違う日にもう一度、同じ欄に入力すれば、その入力した日付に随時更新されるようにするための方法を教えていただければ幸いでございます。

御手数ですが、エクセル関数またはＶＢＡ、マクロのいずれかで実現可能な方法があれば教えて下さい。
何卒、宜しくお願いいたします。

No.2 ベストアンサー 回答者： hallo-2007 回答日時： 2009/02/24 13:58

マクロの力を借りる事になります。

例えば、シートの名前のタブを右クリックして、コードの表示　をクリック
VBエディターが起動しますので
Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 3 Then'←の３はC列のこと
If Target.Value = "" Then
Cells(Target.Row, 2).Value = ""
Else
Cells(Target.Row, 2).Value = Date'←の２はB列に日付
Cells(Target.Row, 4).Activate'←の4はD列へ移動
End If
End If
End Sub
をコピィしてみてください。上記のコードでは
C列に変更があれば、B列に日付を入れて、C列へ移動します。
空白へ変更した場合はA列を空白に戻します。
ご自身のシートに合わせて編集してみてください。

この回答へのお礼

早々のご回答をありがとうございました。早速、試したところ希望通りの結果を得ることができました。空欄になった時まで考慮して頂きまして大変勉強になりました。また質問等をさせていただくこともあるかと思いますが宜しくお願い致します。

お礼日時：2009/02/25 21:39

No.3 回答者： hige_082 回答日時： 2009/02/24 18:11

一例です

対象シートに設定する

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address = "$A$1" Then Range("B1").Value = Date
End Sub

以上です

この回答へのお礼

早々のご回答をありがとうございました。早速、試したところ希望通りの結果を得ることができました。また質問等をさせていただくこともあるかと思いますが宜しくお願い致します。

お礼日時：2009/02/25 21:41

No.1 回答者： kuma56 回答日時： 2009/02/24 13:52

マクロで可能だと思います。

Worksheet_Change　イベントを使って、Ａ１セルが入力・編集されたら、その時間をＢ１セルに書き出してやればいいのでは？
詳しくは"エクセル　マクロ　Worksheet_Change"等をキーワードにしてＷＥＢ検索してみてください。
解説サイトが見つかると思います。

この回答へのお礼

早々のご回答をありがとうございました。早速、検索してみたいと思います。また質問等をさせていただくこともあるかと思いますが宜しくお願い致します。

お礼日時：2009/02/25 21:36