Coba copas macro ini pada Sheet VBA (Sheet1) Private Sub Worksheet_Change(ByVal Target As Range) With Target If .Column = 1 Then If .Count = 1 Then If .Value <> "" Then Target.Offset(0, 1) = Now() End If End If End If End With End Sub
Salam, Hendrik Karnadi ________________________________ From: Wawan Djuwanda <[email protected]> To: [email protected] Sent: Wednesday, 24 October 2012, 13:49 Subject: ]] XL-mania [[ Fungsi TODAY / NOW pada Ms Excel? Para suhu Excel yg sy hormati, Tolong mau Tanya nih, Bagaimana caranya kalo kita isi data pada cell A1, maka pada cell B1 terisi otomatis tanggal dan jam saat itu. ( Sesuai waktu diinput, tetap dan tidak berubah) Waktu berikutnya ketika isi data pada cell A2 , pada cell B2 pun terisi otomatis sesuai tanggal dan jam waktu diinput. (isi B1 dan B2 pasti berbeda) Ms Excel saya edisi 2007. Terima kasih atas pencerahannya.
