標題: [發問] 如何顥示當下輸入時間 [打印本頁]

---

作者: kkooo15    時間: 2016-3-17 07:59     標題: 如何顥示當下輸入時間

本帖最後由 kkooo15 於 2016-3-17 08:01 編輯

[attach]23467[/attach]
請問大大，如何讓a5顥示是當下輸入時間?
我現在a5 = IFERROR(IF(B5>0,TODAY(),""),"")
但是格天開檔案時間就變了
[attach]23466[/attach]

---

作者: stillfish00    時間: 2016-3-17 09:58

回復 1# kkooo15
用公式沒辦法吧，VBA用該工作表的 Change 事件
第一次填入B欄時紀錄時間

1. Private Sub Worksheet_Change(ByVal Target As Range)
   
2.     If Target.Column = 2 And Len(Cells(Target.Row, 1).Text) = 0 And Len(Target.Cells(1).Text) > 0 Then
   
3.         Cells(Target.Row, 1).Value = Now
   
4.     End If
   
5. End Sub

複製代碼

---

作者: kkooo15    時間: 2016-3-17 13:21

回復 2# stillfish00
感謝，很實用，謝謝。

---

歡迎光臨 麻辣家族討論版版 (http://forum.twbts.com/)