İki Yıl Arasında Hesaplama

[bilgi007]

Merhabalar bir konu da yardımcılarınıza ihtiyacım var.
Toplam hizmet süresinden belirlediğim hizmet süresini çıkartmak istiyorum bunu da kalan yıl ay gün şeklinde yapmak istiyorum bu konuda yardımcı olur musunuz
A1 hücresinde 34-02-13
A2 hücresinde 11-10-25
Sonuç: 22 yıl 3 ay 18 gün yada (22-3-18) kalacak şekilde nasıl yapabilirim.

 

[dEmir1]

Merhaba cevabınız linkte .
http://www.excel.web.tr/f14/ki-tarih-arasyny-gun-ay-yyl-oarak-hesaplama-t126236.html

=EĞER(VE(ETARİHLİ(A1;A2;"y")=0;ETARİHLİ(A1;A2;"ym")=0);(ETARİHLİ(A1;A2;"md")&" GÜN");EĞER(ETARİHLİ(A1;A2;"y")>0;ETARİHLİ(A1;A2;"y")&" YIL "&ETARİHLİ(A1;A2;"ym")&" AY "&ETARİHLİ(A1;A2;"md")&" GÜN";ETARİHLİ(A1;A2;"ym")&" AY, "&ETARİHLİ(A1;A2;"md")&" GÜN"))

Turist hocamdan alıntı

 

[asimavi50]

Merhabalar bir konu da yardımcılarınıza ihtiyacım var.
Toplam hizmet süresinden belirlediğim hizmet süresini çıkartmak istiyorum bunu da kalan yıl ay gün şeklinde yapmak istiyorum bu konuda yardımcı olur musunuz
A1 hücresinde 34-02-13
A2 hücresinde 11-10-25
Sonuç: 22 yıl 3 ay 18 gün yada (22-3-18) kalacak şekilde nasıl yapabilirim.

Yanlış anlamadıysam eğer;

C1 Hücresine formülünü deneyiniz.

=YIL(B1)-YIL(A1)-EĞER(YADA(AY(B1)<AY(A1);VE(AY(B1)=AY(A1);GÜN(B1)<GÜN(A1)));1;0)&" yıl, "&AY(B1)-AY(A1)+EĞER(VE(AY(B1)<=AY(A1);GÜN(B1)<GÜN(A1));11;EĞER(VE(AY(B1)<AY(A1);GÜN(B1) >=GÜN(A1));12;EĞER(VE(AY(B1)>AY(A1);GÜN(B1)<GÜN(A1));-1)))&" ay, "&B1-TARİH(YIL(B1);AY(B1)-EĞER(GÜN(B1)<GÜN(A1);1;0);GÜN(A1))&" gün"

 

[ataköylü-59]

Saygıdeğer arkadaşlar elimde bu işi gören kullanıcı tanımlı bir fonksiyonum var
Şu şekilde:
Function Tarih_farkı(Kücük_tarih As Date, Büyük_tarih As Date)
n = DateDiff("m", Kücük_tarih, Büyük_tarih + 1) + (Day(Büyük_tarih + 1) < Day(Kücük_tarih))

Y = n \ 12
m = n Mod 12
D = 0 + Büyük_tarih - DateAdd("m", m, DateAdd("yyyy", Y, Kücük_tarih))

Tarih_farkı = IIf(Y = 0, "", Y & " YIL" & IIf(Y = 1, " ", " ")) & IIf(m = 0, "", m & " AY " & IIf(m = 1, " ", "")) & IIf(D = 0, "", D & " GÜN" & IIf(D = 1, " ", ""))
End Function

asimavi50 ve dEmir arkadaşların kodlarına alternatif olarak paylaştım. Teşekkürler.