Excel的時間函數能自動抓取電腦系統時間嗎??

Question

請問Excel的高手大大們
他的時間函數裡頭有能夠自動抓電腦系統時間的函數嗎
因為我想設計一各表格類似下面這樣
A B C D E..............
1
2
我1/24在A1中任意輸入一各數字
B1就能夠自動抓取當天輸入A1時的電腦系統時間
而A2我在1/27輸入任意一各數字後
B2又會在自動抓取當天數入B1的電腦系統時間
不知道在Excel中能不能讓我如此天馬行空的設定呢??

我可否再請教大大這段程式碼的相關內容
因為我沒學過VB
所以真的看不太懂這段程式碼
可以否請大大解說呢@@
另外我有試過這段程式碼帶出來的系統時間
連幾點幾分都會帶出來
如果我想只帶出系統時間中的年月日就好
可以這修改嗎??
謝謝^^"

Answer 1

下面VBA能讓您在A欄輸入資料後，對應的B欄顯示當時時間
Private Sub Worksheet_Change(ByVal Target As Range)

If Target.Column = 1 Then Range(Cells(Target.Row, Target.Column + 1), Cells(Target.Row, Target.Column + 1)).Value = Now()
End Sub
=====================================================
函數使用方式：
EXCEL畫面上按下「ALT+F11」，會出現下面視窗，接著在視窗左邊點選所需使用的SHEET（下圖為Sheet1），再把程式碼複製到右邊視窗，就可以關掉了，這樣程式碼就啟用了！

圖片參考：http://img95.imageshack.us/img95/2046/excel0123047lx.jpg


2007-01-25 11:58:12 補充：
把程式中後面的 = Now() 改成 = Date 即可。（記得檢查一下儲存格格式）

大概解釋就是：
If Target.Column = 1 為判斷是否在A欄輸入資料

Then Range(Cells(Target.Row, Target.Column 1), Cells(Target.Row, Target.Column 1)).Value = Date 為如果是在A欄時，把輸入格右邊的那一格數值輸入為當天日期