mcetinkaya65
Altın Üye
- Katılım
- 1 Mart 2011
- Mesajlar
- 490
- Excel Vers. ve Dili
- 2021 türkçe
Ekteki dosyanın sayfa 1 in kod bölümüne
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo son
If Intersect(Target, [B:B]) Is Nothing Then Exit Sub
Cells(Target.Row, "A") = Now
son:
End Sub
kodu yazınca:B hücresine bir şeyler yazınca A hücresine bu günün tarhini otamatik olarak gün,ay,yıl ve saat olarak yazıyor.
Acaba sadece bu günü gün,ay ve yıl olarak yazması mümkün değil mi?
Şimdiden teşekkürler.
Private Sub Worksheet_Change(ByVal Target As Range)
On Error GoTo son
If Intersect(Target, [B:B]) Is Nothing Then Exit Sub
Cells(Target.Row, "A") = Now
son:
End Sub
kodu yazınca:B hücresine bir şeyler yazınca A hücresine bu günün tarhini otamatik olarak gün,ay,yıl ve saat olarak yazıyor.
Acaba sadece bu günü gün,ay ve yıl olarak yazması mümkün değil mi?
Şimdiden teşekkürler.