Otomatik tarih ve saat

[alperalper]

Ekte bulunan dosyayı incelermisiniz. İşlem tarihi ve saati hakkında..

 

[Levent Menteşoğlu]

Dosyanızdaki kodu aşağıdaki ile değiştirerek deneyin.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [B3:C22]) Is Nothing Then Cells(Target.Row, "I") = Now
If Not Intersect(Target, [F3:F22]) Is Nothing Then Cells(Target.Row, "J") = Now
End Sub

 

[alperalper]

Buraya bir bakarmısınız

 

[alperalper]

İlgili dosyayı bir incelerseniz sevinirim...