エクセルで自動で日付と時間を入れることはできますか？

質問

こんにちは、今現在　
A列に　日付　B列に　日時　C列に管理番号を入力しています。
Ctrl＋；とCtrl＋：を使って　日付と日時を入力しているのですが
C列に管理番号を入力したらA列とB列に自動で入力される
マクロもしくはVBAは可能でしょうか？
ご存知の方いらっしゃいましたら、ご教示ください。
ｍ＿＿ｍ

回答No.4

ham_kamo · ベストアンサー

こんな感じでしょうか。

Private Sub Worksheet_Change(ByVal Target As Range)
　　If Target.Column = 3 Then
　　　　Cells(Target.Row, 1) = Date
　　　　Cells(Target.Row, 2) = Time
　　End If
End Sub

お礼

出来ました！！！！！！ありがとうございます！

回答No.3

marbin

日付と時刻を別々のセルに、でしたら、

Date：日付
Time：時刻

でそれぞれ取得できます。

ヘルプに使用方法があります。

お礼

ありがとうございます。
そのやり方だと、今現在の時刻が表示され
エクセルを起動のたびに更新されたりしませんでしょうか？
なにぶん初心者な者でもう少し詳しく教えていただけるとありがたいです。

回答No.2

221west

No.1です。値をコピーするのをマクロでやればと思ったのですが…。

しかしながら、勘違いしておりました。
=Now()は再計算しないと更新されない様です、失礼しました。

そこで、VBAにもNowという関数がある様ですので、使ってみて下さい。

Private Sub Worksheet_Change(ByVal Target As Range)
の中に、TargetがC列だったら実行する様にすれば良いと思います。

↓以下、「Now」のヘルプから抜粋
コンピュータのシステムの日付と時刻の設定に基づいて、現在の日付と時刻を表すバリアント型 (内部処理形式 Date の Variant) の値を返します。

お礼

せっかくご連絡いただいたのにもうしわけないです。
VBAまったくの初心者で
直ぐ左のAB列を指定して出力する仕方がわかりません＞＜
恐れ入りますがVBAを起動した後、どのようにすればよろしいのでしょうか

回答No.1

221west

あるセルに=Now()を使用して、そこから値をコピーする様にしてはどうでしょうか。

お礼

ありがとうございます。それだとショートカットで入力するほうが
早くないでしょうか？