- Katılım
- 9 Aralık 2009
- Mesajlar
- 532
- Excel Vers. ve Dili
- 2007,5
bir hücreye veri girilince başka hücreye girildiği tarihi atsın ve değişmesin ( her açılışta aktif tarihi vermesin )
Bir sayfada bu şekilde 3 stun olacak, yani üç sutunda veri girişini takip edip yanına giriş tarihini verecek..
bunu kod girişine şu formülü yazarak çozdüm ama bu iki stun için geçerli nasıl üç stun olacak uğraştım olmadı kod şu:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [c:l]) Is Nothing Then Exit Sub
If Target.Column = 3 Then Cells(Target.Row, "B") = Now
If Target.Column = 12 Then Cells(Target.Row, "M") = Now
End Sub
Bir sayfada bu şekilde 3 stun olacak, yani üç sutunda veri girişini takip edip yanına giriş tarihini verecek..
bunu kod girişine şu formülü yazarak çozdüm ama bu iki stun için geçerli nasıl üç stun olacak uğraştım olmadı kod şu:
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [c:l]) Is Nothing Then Exit Sub
If Target.Column = 3 Then Cells(Target.Row, "B") = Now
If Target.Column = 12 Then Cells(Target.Row, "M") = Now
End Sub