öncelikle merhabalar kolaylıklar herkese
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [C:C]) Is Nothing Then Exit Sub
On Error Resume Next
Target.Offset(0, 2).Value = Empty
If Target.Value <> "" Then Target.Offset(0, 2).Value = Date
End Sub
c sütununa herhangi bir paremetre girdiğimde e sütununa otomatik güncel tarih yazıyor tarihi otomatik güncellemiyor burda bir sorunum yok ancak ben I sütununa da bir şey yazdığım zaman j ye tarih yazsın istiyorum aynı şekilde ama iki kodu malesef birlikte çalıştıramadım yardımınızı rica ediyorum
Private Sub Worksheet_Change(ByVal Target As Range)
If Intersect(Target, [C:C]) Is Nothing Then Exit Sub
On Error Resume Next
Target.Offset(0, 2).Value = Empty
If Target.Value <> "" Then Target.Offset(0, 2).Value = Date
End Sub
c sütununa herhangi bir paremetre girdiğimde e sütununa otomatik güncel tarih yazıyor tarihi otomatik güncellemiyor burda bir sorunum yok ancak ben I sütununa da bir şey yazdığım zaman j ye tarih yazsın istiyorum aynı şekilde ama iki kodu malesef birlikte çalıştıramadım yardımınızı rica ediyorum
Ekli dosyalar
Bu konu çözüme ulaşmıştır yüklü dosyaları indirmek için Bronz üye olunuz.
Bu dosyayı indirmek için yetkiniz bulunmamaktadır.
