makro ile tarih farkını alma"gün ay yıl olarak"

[sirkülasyon]

Target.Offset(0, -2) = CDate(Target.Offset(0, -3).Value) - CDate(Target.Offset(0, -4).Value)

yukarıda ki kod ile iki tarih arasındaki farkı gün olarak buluyor.
Ben gün ay ve yıl olarak bulması için nasıl düzeltebilirim.
Teşekkür eder saygılarımı sunarım

 

[Ömer BARAN]

Merhaba.

Kod'a nasıl ekleyeceğinizi bilemiyorum ama belki fikir verir.
I16'da küçük tarih, I17'de büyük tarih varsa;
yıl = Evaluate("=DATEDIF(I16,I17,""y"")")
ay = Evaluate("=DATEDIF(I16,I17,""ym"")")
gün = Evaluate("=DATEDIF(I16,I17,""md"")")
şeklinde bulunabilir.

Ayrıca aşağıdaki konu sayfasına bir bakın isterseniz.
.http://www.excel.web.tr/f48/etar-hl-ve-datediff-komutu-hakkynda-t92867.html
.

 

[sirkülasyon]

Ömer bey
Çok çok teşekkür ederim.