Hücredeki tarihe göre ay ismini yan hücreye otomatik atsın

[ASLAN7410]

Merhaba, hayırlı günler.

Ekte gönderdiğim excel dosyamın E sütununa tarih girdikçe, F sütununa E sütunundaki tarihin ay'ına atmasını istiyorum.
Örneğin E2 hücresine 06.01.2019 girdiğimde F2 hücresine Ocak yazmasını istiyorum. E2 hücresini sildiğim de F2 hücresi de silinsin istiyorum.

Sayfa üzerinde kodlar var, bu kodlar gayet güzel çalışıyor, içerisinde bulunduğumuz tarihin ay'ını atıyor, benim istediğim bu değil.

Yardımcı olur musunuz?

 

[çıtır]

Kodunuzu ekleyiniz.

Range("F" & Target.Row) = Format(Range("E" & Target.Row), "mmmm")

 

[ASLAN7410]

Sayın çıtır Bey, ellerinize sağlık, tam istediğim gibi çalışıyor, Allah razı olsun, çok teşekkür ediyorum.

Hayırlı günler diliyorum.

 

[çıtır]

Allah(C.C.) Cümlemizden razı olsun .Dönüş yaptığınız için teşekkür ederim.

 

[Orion1]

Sayın çıtırın kodundan farkı,F deki hücredeki değeri metin olarak değilde tarih olarak saklar.
Buyurun.

Range("F" & Target.Row) = CDate(Range("E" & Target.Row))
Range("F" & Target.Row).NumberFormat = "mmmm"

 

[ASLAN7410]

Sayın Evren Bey, size de çok teşekkür ediyorum, ellerinize sağlık.

Hayırlı günler diliyorum.

 

[Orion1]

Rica ederim.
İyi çalışmalar.
Hayırlı günler.