E sutununa girilen tarihlerin arasındaki nokta otomatik gelsin?

balanar

Altın Üye
Katılım
22 Şubat 2021
Mesajlar
347
Excel Vers. ve Dili
Excel 2007
Altın Üyelik Bitiş Tarihi
09-03-2027
Merhaba,

E sutununun herhangi bir satırına örnek veriyorum tarih gireceğim.

Bunu yazarken her defasında aradaki noktayı koymak yerine biz direk 19042021 yazıp enterladığımızda 19.04.2021 olarak otomatik değişmesi mümkün mü? Bu konuda nasıl bir çözüm üretebilirim
 

Ömer

Moderatör
Yönetici
Katılım
18 Ağustos 2007
Mesajlar
22,184
Excel Vers. ve Dili
Microsoft 365 Tr
Ofis 2016 Tr
Merhaba,

Tavsiye etmediğim bir durum. Hataların önüne geçmek için tarih formatında yazmanızı tavsiye ederim.

Deneyiniz.
Kod:
Private Sub Worksheet_Change(ByVal Target As Range)
     If Intersect(Target, [E:E]) Is Nothing Then Exit Sub
     On Error GoTo atla
     Application.EnableEvents = False
     Target = CDate(Format(Target, "00-00-0000"))
atla:
     Application.EnableEvents = True
End Sub
 

balanar

Altın Üye
Katılım
22 Şubat 2021
Mesajlar
347
Excel Vers. ve Dili
Excel 2007
Altın Üyelik Bitiş Tarihi
09-03-2027
Formülle direk girilince değişmez mi hocam
 

Mahir64

Destek Ekibi
Destek Ekibi
Katılım
19 Nisan 2006
Mesajlar
6,677
Excel Vers. ve Dili
Excel 2013-Türkçe
Excel 2016-Türkçe
Merhaba,
Formülle aynı hücrede işlem yapılamaz.
 

YUSUF44

Destek Ekibi
Destek Ekibi
Katılım
4 Ocak 2006
Mesajlar
12,073
Excel Vers. ve Dili
İş : Ofis 365 - Türkçe
Ev: Ofis 365 - Türkçe
Bunun daha kolay yöntemi zaten var. Hücreleri istediğiniz gibi tarih şeklinde biçimlendirin. 19/04/2021 için sadece 19/4 ya da 19.4 ya da 19-4 yazın.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,171
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
İnceleyiniz.

 
Üst