【Excel】クリックするとその日の日付が表示されるようにしたい

こんなことができるでしょうか？
たとえばいくつか項目があるとします。１．２．３．４．と。
そのうち、２．を今日確認した。その、証拠として２．
の欄の横に最終確認日（当日）の日付を入れたいのです。

このようなことを行うとき、もっとも自然に行える方法を教えて
ください。よろしくお願いします！

No.3 回答者： tbobi 回答日時： 2003/03/09 08:56

ショートカットキーを使うのはどうですか？

Ctrl + ; (←セミコロン）
と打つと今日の日付が入力できます。

ちなみに、現在時刻を入力する場合は、
Ctrl + : （←コロン）です

No.2 回答者： imogasi 回答日時： 2003/03/09 07:18

例えばＢ列にデータがあり、確認してＣ列に確認日付けを

入れるとすると、ＶＢＡで
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Column = 3 Then
r = Target.Row
Cells(r, 3) = Date
End If
End Sub
If Target.Column = 3 Thenの３はＣ列だから３です。Ｄ＝４、Ｅ列＝５、・・・。
この例では、一律にＣ列としたが、あちこちのセルに散らばっているなら、Ｉｆ　Ｔｈｅｎの中を例えば
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
' If Target.Column = 3 Then
' MsgBox Target.Address
If Target.Address = "$C$4" Then
r = Target.Row
c = Target.Column
Cells(r, c) = Date
End If
End Sub
のようにする（上記はＣ４セルの例）。セルが複数あれば、テーブルにそれらのアドレスを持って、比較して該当するか調べると良い。
上記はワークシートが出ているところで、ＡＬＴを押しながらＦ１１を押し、出てきた画面のプロジェクトウインドウのＳｈｅｅｔ１をダブルクリックして、出てくる画面のＣｈａｎｇｅイベントに貼りつける。

No.1 回答者： taknt 回答日時： 2003/03/09 06:39

ボタンを設置し、そのボタンを押したときに、今日の日付を入れるようにしたらいいでしょう。

ま、これをやるには ＶＢＡ（マクロ）などをやらないとダメですけどね。

この回答へのお礼

Ｅｘｃｅｌに関する知識が全くないので簡単にできる方法はありませんでしょうか？

お礼日時：2003/03/09 06:40