Coba copas macro ini di VBE Sheet1, Private Sub Worksheet_Change(ByVal Target As Range) If Target.Column >= 3 And Target.Column <= 8 Then If Target.Row > 3 Then If Target.Count = 1 Then Cells(Target.Row, 2).Value = "=TODAY()" Cells(Target.Row, 2) = Cells(Target.Row, 2).Value End If End If End If End Sub
Jangan lupa save as sebagai file macro dan aktifkan macronya sebelum dijalankan. Salam, HK ________________________________ From: agus salim <agsali...@yahoo.co.id> To: "belajar-excel@yahoogroups.com" <belajar-excel@yahoogroups.com> Sent: Wednesday, 26 June 2013, 9:57 Subject: [belajar-excel] Tanggal Edit Input Dear All Mohon dibantu mungkin ini hampir sama dengan yg pernah dipermasalahin di miling list ini....tapi ini sedikit berbeda, seperti file terlampir : - Kita ingin mengetahui kapan data tersebut di input ataupun di edit.... - Di situ merupakan data stock Barang - Nah bagaimana membuat di kolom B otomatis muncul tanggal sesuai tanggal input/edit ...jika salah satu di kolom C-H di input data atau di edit datanya trima kasih asalim
